полный экран

← →
Гриха (2005-08-18 02:36) [0]

Помогите, пожалуйста!
Подскажите, как можно написать алгоритм, который в фуллскрине выводил бы текущую дату и время (как, например, виндоузовский скринсейвер, но просто текст, без всяких вращений и смены цвета)?

ЗЫ: С полным экраном не общался ни разу, поэтому, если можно, поподробнее.

← →
Джо © (2005-08-18 02:51) [1]

Делаешь у формы
BorderStyle := bsNone;
WindowState := wsMaximized;
Вот тебе уже и "фулскрин".
Далее, текущую дату и время в формате TDateTime возвращает функция Now();
Перевод из TDateTime в string осуществляет функция DateTimeToStr(..). Нежиданно?
Едем дальше. У формы есть событие OnPain, вызываемое каждый раз при перерисовке формы. Также, у формы есть свойство Canvas типа (не упади) TCanvas.
Этого достаточно для "написания алгоритма"? ;)

← →
Гриха (2005-08-18 03:53) [2]

Спасибо за совет...

полный экран Найти похожие ветки