Скачать: CL | DM;

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

← →
Гриха   (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]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.025 c