Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RusFAQ.ru: Программирование на языке Pascal


Информационный Канал Subscribe.Ru

RusFAQ.ru: Программирование на языке Pascal

Выпуск № 328
от 12.10.2004, 20:50

Администратор:
Имя: Sensey
URL: Информационный ресурс
ICQ: 105679124
Украина, Харьков
О рассылке:
Задано вопросов: 525
Отправлено ответов: 1991
Активность: 379.2 %
[Задать вопрос >>][Регистрация эксперта >>]
[Поиск в базе][Обсудить на форуме]


 Список экспертов, ответы которых опубликованы в данном выпуске

Boriss
Статус: Профессиональный
Общий рейтинг: 157.16
URL: Программирование на Паскале
[Подробней >>]
Snowm@n
Статус: Опытный
Общий рейтинг: 106.9
[Подробней >>]
Василевский Александр
Статус: Доверительный
Общий рейтинг: 115.11
[Подробней >>]
 
Tigran K. Kalaidjian
Статус: Профессиональный
Общий рейтинг: 182.66
URL: Персональная страничка
[Подробней >>]
sir henry
Статус: Профессиональный
Общий рейтинг: 163.18
[Подробней >>]
Strory
Статус: Опытный
Общий рейтинг: 159.37
URL: МУАТ
Телефон: +7 (845-3) 54-16-74
[Подробней >>]


 Краткий перечень вопросов

Вопрос № 523. Здраствуйте. Пиши оболочку, но вот что-то файлы не выводятся. Когда пишу отдельную прогу которая про... (ответов: 6)

Вопросов: 1, ответов: 6


 Вопрос № 523

Здраствуйте.
Пиши оболочку, но вот что-то файлы не выводятся. Когда пишу отдельную прогу которая просто выводит файлы - всё работает,а в облочке не пашет.


Приложение:


Вопрос отправлен: 09.10.2004, 12:33
Отправитель: Семен

[Следующий вопрос >>] [Список вопросов]

Отвечает Boriss

Доброе время суток, Семен!
Ну и естественно, что ничего не видите:
1) кто установил textatr:=0? Это ж черные буквы на черном фоне!!
2) куда Вы пишете? gotoxy(x,y)!! а оба равны 1 !!!

Ответ отправлен: 09.10.2004, 13:28
Отправитель: Boriss


Отвечает Snowm@n

Добрый день, Семен!
Исправленный текст в приложении, в комментариях всё сказано.
Вот основные ошибки:
1) textattr=0
2) после вывода очередного имено забываешь увеличивать y
3) x=1,y=1, а надо x=2,y=2
4) просто ужасный стиль :) - не программирования, а оформления текста программы, надо делать отступы!
Добавил тебе вывод папок и подсветку файлов и папок. Сначала выводятся папки потом файлы.
Мысли на будущее:
1) Не мешало бы хранить найденные записи sr в динамическом массиве
2) Надо завести константы, например для хранения ширина экрана, так как в ИДЕ ширина 24, а в ДОС 28, да и писать будет легче.

Приложение:

Ответ отправлен: 09.10.2004, 14:10
Отправитель: Snowm@n


Отвечает Василевский Александр

Доброе время суток, Семен!
У Вас в программе меняются аттрибуты символов. Выводятся чёрные символы на чёрном фоне - ничего не видно. Добавьте что-нибудь типа
textattr( $07 );
Ещё одна потенциальная ошибка - координаты на экране в Pascal отсчитываются с (1,1).


Ответ отправлен: 11.10.2004, 10:48
Отправитель: Василевский Александр


Отвечает Tigran K. Kalaidjian

Доброе время суток, Семен!
В районе 75-й строки поместите 2 строчки.
1. Смена аттрибутов символов вывода. А то у Вас выводится чёрным текстом по черному фону.
2. Изменение координат на каждой итерации. А то у Вас x=y=1 и всё, что выводится, отображается в левом верхнем углу, стирая предыдущий результат.

Ответ отправлен: 09.10.2004, 21:02
Отправитель: Tigran K. Kalaidjian


Отвечает sir henry

Здравствуйте, Семен!
Значит дело в самой оболочке, а ее кода-то как раз и нет. :)

Ответ отправлен: 11.10.2004, 10:19
Отправитель: sir henry


Отвечает Strory

Доброе время суток, Семен!
Во-первых, файлы находятся и выводятся на экран, но чёрным цветом :) Добавьте перед while'ом "textattr := 7;".
Во-вторых, не вычисляются координаты для GotoXY и имена файлов выводятся поверх друг друга в координату (1;1)...

Ответ отправлен: 10.10.2004, 16:13
Отправитель: Strory



Форма отправки вопроса

Внимание!
Мы рекомендуем открывать рассылку в программе Internet Explorer 5.0+ или отправлять вопросы с сайта по адресу: http://rusfaq.ru/cgi-bin/Message.cgi.

(C) 2002-2003 Команда RusFAQ.ru.

 Персональные данные

Ваше имя:

Ваш e-mail:

Опубликовать мой e-mail в рассылке


 Вопрос и дополнение

Ваш вопрос:


Приложение (если необходимо):


Получить ответов:


 Выбор рассылки

Программисту
Assembler (27)
C / C++ (17)
Perl (8)
Builder / Delphi (17)
Pascal (20)
Basic / VBA (9)
Java / JavaScript (8)
PHP (19)
Криптография (9)
WinAPI (14)
Радиоэлектроника (16)
Пользователю
Windows 95/98/Me (45)
Windows NT/2000/XP (62)
"Железо" (40)
Поиск информации (23)
Администратору
Windows NT/2000/XP (41)
Linux / Unix (17)
Юристу
Гражданское право (7)
Семейное право (4)
Трудовое право (6)
КоАП (5)

Отправить вопрос всем экспертам выбранной рассылки.





http://subscribe.ru/
http://subscribe.ru/feedback/
Подписан адрес:
Код этой рассылки: comp.soft.prog.pasplus
Отписаться

В избранное