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

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


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


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

Выпуск № 228
от 05.01.2004, 11:40

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


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

Vitally
Статус: Доверительный
Общий рейтинг: 160
[Подробней >>]
Trubler
Статус: Начальный
Общий рейтинг: 106.06
[Подробней >>]


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

Вопрос № 394. К вопросу 393 (о алгоритме движения): вижу меня не поняли - уточняю: не устраивает меня то, что пада... (ответов: 2)
Вопрос № 395. К вопросу 393 (о алгоритме движения): Trubler: не мудрено всё это на одной видеостранице провернуть,... (ответов: 1)

Вопросов: 2, ответов: 3


 Вопрос № 394

К вопросу 393 (о алгоритме движения): вижу меня не поняли - уточняю:
не устраивает меня то, что падающяя окружность мигает, all.tpu - модуль,
из него ничего не используется, кроме нормально работающей процедуры
инициализации графики (init(<путь к egavga.bgi)). Спасибо Drahus,
статью почитал, что-то получилось.



Вопрос отправлен: 30.12.2003, 20:39
Отправитель: Pavel

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

Отвечает Vitally

Доброе время суток, Pavel!
Прости, сейчас канун Нового Года - тестировать твою программу лень! :( Но, если проблема в мерцании, то, насколько я знаю, средствами Паскаля это не устранить. Проблема в синхронизации перерисовки экрана и вывода на экран. Это делается на ассемблере. Там есть кокая-то функция, сообщающая о том, что начинается ход луча, обновляющего экран. В этот момент тебе нужно выдать новое изображение.... Что-то типа того. :))
С Новым Годом!


Ответ отправлен: 31.12.2003, 17:25
Отправитель: Vitally


Отвечает Trubler

Приветствую Вас, Pavel!
Окружность мигает из-за того, что так работает сама процедура вырисовывания окружности, да и любых других фигур.
Ниже предлагаю немного другой простейший алгоритм организации движения. Я использую старые координаты для стирания окружности, затем новые для рисования окружности на новых координатах, присваюваю старым координатам значения новых и т.д. Лучше это видно в примере ниже.
Похожий алгоритм я использую для перемещения курсора мыши в некоторых своих программах на TurboPascal. Весь смысл в сохранении предыдущих координат.

Приложение:

Ответ отправлен: 01.01.2004, 01:28
Отправитель: Trubler


 Вопрос № 395

К вопросу 393 (о алгоритме движения): Trubler: не мудрено всё это на одной видеостранице провернуть,
фишка моего алгоритма в двух видеостраницах(цель-незаметная прорисовка).
Vitally: а если попробовать так: while (port[$3da] and 8) = 0 do;(из статьи)



Вопрос отправлен: 02.01.2004, 11:31
Отправитель: Pavel

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

Отвечает Vitally

Доброе время суток, Pavel!
Пришлось полисталь литературу. Оказывается запрос порта о перерисовке экрана и функция SetVisualPage - вполне заменяют друг друга. Только последняя работает несколько медленее. Ошибка была в программе!!! Ты сам показываешь пустую страницу. Отсюда и мерцание. Я кое что переделал в твоей программе. Все очень сыро, но работает правильно! Причеши сам, пожалуйста! :)
С Новым Годом!


Приложение:

Ответ отправлен: 02.01.2004, 19:00
Отправитель: Vitally



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

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

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

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

Ваше имя:

Ваш e-mail:

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


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

Ваш вопрос:


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


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


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

Программисту
Assembler (25)
C / C++ (18)
Perl (4)
Builder / Delphi (21)
Pascal (22)
Basic / VBA (3)
Java / JavaScript (5)
PHP (11)
Криптография (7)
WinAPI (13)
Пользователю
Windows 95/98/Me (42)
Windows NT/2000/XP (55)
"Железо" (28)
Поиск информации (19)
Администратору
Windows NT/2000/XP (29)
Linux / Unix (14)
Юристу
Гражданское право (15)
Семейное право (9)
Трудовое право (10)
КоАП (9)

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




Задать вопрос | Регистрация эксперта | Поиск в базе | Чат | Форумы | Новости
Проект экспертов RusFAQ.ru | Фотоальбом | Virus.RusFAQ.ru | Администрирование
Профессиональная WEB-Студия B.I.T.


Яндекс цитирования
© 2001-2003 Россия, Москва. Авторское право: Калашников О.А.

http://subscribe.ru/
E-mail: ask@subscribe.ru
Отписаться
Убрать рекламу

В избранное