|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
29.06.2011, 14:26 | #1 |
Пользователь
Регистрация: 16.06.2011
Сообщений: 42
|
graph. Часы на паскале
Привет всем! Вот недавно решил написать часы, на паскале для себя) а тут получилось не часы а эхолокатор какой-то, помогите исправить ошибку в коде, чтобы всё норм было!
Код:
Помог? тогда жми на весы
Девушка что оператор мобильной связи, когда денег нет, то она не доступна ©Радио Маяк Последний раз редактировалось ivannes; 29.06.2011 в 14:42. |
29.06.2011, 17:08 | #2 |
Delphi master
Пользователь
Регистрация: 28.05.2011
Сообщений: 96
|
Цифры на циферблате можно вывести функциями OutTextXY и OutText.
Более подробно о выводе текста на экран Вы можете узнать на сайте http://pascaler.ru/pascal/graphic/3/ БЯЯЯГГАААААА
|
29.06.2011, 17:24 | #3 | |
Форумчанин
Регистрация: 08.06.2011
Сообщений: 693
|
Цитата:
OutTextXY(50,50,'1'); {в ячейках 50x50 написать "1"} {русский не подд.} OutTextXY(60,60,'2'); и т.д. |
|
29.06.2011, 17:33 | #4 | |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
вот, нашёл поиском по форуму:
CLOCKS.rar Цитата:
а ещё ОЧЕНЬ рекомендую сходить сюда: Часы в Паскале |
|
30.06.2011, 04:45 | #5 |
Пользователь
Регистрация: 16.06.2011
Сообщений: 42
|
пасибо, но у меня есть ещё вопросы
как сделать отчистку, чтобы сильно не рябило, и как правильно использовать gettime, чтобы и время правильно показал, и часы шли? Код:
Помог? тогда жми на весы
Девушка что оператор мобильной связи, когда денег нет, то она не доступна ©Радио Маяк Последний раз редактировалось ivannes; 30.06.2011 в 06:00. |
30.06.2011, 08:02 | #6 | |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Цитата:
Оформи код вывода часов в процедуру, которой будешь передавать колор. Тогда Код:
I'm learning to live...
|
|
30.06.2011, 10:28 | #7 |
Пользователь
Регистрация: 16.06.2011
Сообщений: 42
|
а можно что-нить попроще т.к. я в паскале не так долго и не умею писать процедурки такого профиля
Помог? тогда жми на весы
Девушка что оператор мобильной связи, когда денег нет, то она не доступна ©Радио Маяк |
30.06.2011, 15:22 | #8 | |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
Цитата:
Stilet абсолютно правильно предложил. выкиньте cleardevice; (из-за него и "мигает") вместо него, измените алгоритм. НАЧАЛО ЦИКЛА прежде, чем считать новое время, рисуйте стрелки часов ЦВЕТОМ ФОНА (это равносильно стиранию нарисованного ранее) потом считываете новое время, пересчитываете новое положение стрелок выводите их своими цветами. делайте задержку (маленькую. например, на 1/100 секунды - это Delay(100); потом повторяете цикл (переход на НАЧАЛО ЦИКЛА) и всё... примерно так: Код:
Последний раз редактировалось Serge_Bliznykov; 30.06.2011 в 17:19. |
|
22.07.2011, 14:33 | #9 |
Пользователь
Регистрация: 16.06.2011
Сообщений: 42
|
спасибо! вот что-то такое мне и надо было!
Помог? тогда жми на весы
Девушка что оператор мобильной связи, когда денег нет, то она не доступна ©Радио Маяк |
08.01.2014, 00:45 | #10 |
Новичок
Джуниор
Регистрация: 08.01.2014
Сообщений: 1
|
можно стрелку закрашивать цветом фона как на видео:
http://www.youtube.com/watch?v=eYAipib1cAU И никакого мигания нет. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
паскаль.Как подключить модуль ''graph'' в паскале abc? | AndrewPl | Помощь студентам | 11 | 22.03.2013 19:11 |
программа цифровые часы на Паскале | ЯН_КА | Помощь студентам | 16 | 21.11.2010 13:40 |
graph в паскале | Милана Р | Помощь студентам | 0 | 07.06.2010 15:34 |
Работа с графическим модулем Graph на Паскале | ifen | Помощь студентам | 0 | 09.06.2009 19:51 |
2 задачи на Graph в Паскале | Rise | Помощь студентам | 1 | 30.05.2009 18:04 |