Текущий архив: 2008.09.21;
Скачать: CL | DM;
Вниз
Дата и Время в заголовке Найти похожие ветки
← →
TRSteep © (2008-08-12 11:35) [0]Пытаюсь вывести дату и время в заголовке - пока единственная мысль это таймер.
Делаю так:
Frm_Main.Caption := DateTimeToStr( Now );
case DayOfTheWeek( Now ) of
1:
begin
Frm_Main.Caption := " Понедельник " + Frm_Main.Caption;
end;
2:
begin
Frm_Main.Caption := " Вторник " + Frm_Main.Caption;
end;
3:
begin
Frm_Main.Caption := " Среда " + Frm_Main.Caption;
end;
4:
begin
Frm_Main.Caption := " Четверг " + Frm_Main.Caption;
end;
5:
begin
Frm_Main.Caption := " Пятница " + Frm_Main.Caption;
end;
6:
begin
Frm_Main.Caption := " Суббота " + Frm_Main.Caption;
end;
7:
begin
Frm_Main.Caption := " Воскресенье " + Frm_Main.Caption;
end;
end;
На таймере интервал 500 мс - частенько подмигивает надпись...
Можно ли сделать лучше?
Как сделать чтобы не мигало?
← →
Palladin © (2008-08-12 11:38) [1]таймер для этой задачи - самое то. вот только на кой тебе интервал в полсекунды. одной более чем достаточно. а 5 - самое то
← →
Medbe}I{onok XML © (2008-08-12 11:41) [2]Frm_Main.Caption := " Понедельник " + Frm_Main.Caption;
Это чтобы после энного тика получилось :
"Понедельник Понедельник Понедельник Понедельник Понедельник Понедельник ....... что-то там еще" ?
← →
TRSteep © (2008-08-12 11:44) [3]>Medbe}I{onok XML ©
там вначале caption задаеться строго:Frm_Main.Caption := DateTimeToStr( Now );
← →
TRSteep © (2008-08-12 11:45) [4]
> таймер для этой задачи - самое то. вот только на кой тебе
> интервал в полсекунды. одной более чем достаточно. а 5 -
> самое то
ну хотелось бы чтобы каждую секунду отображалось...
если проблема только в этом - я думаю так и сделаю
← →
Palladin © (2008-08-12 11:47) [5]делай. решение нормальное и правильное. секунда так секунда. довольно приемлимо.
← →
TRSteep © (2008-08-12 11:55) [6]Всем спасибо за советы!
← →
{RASkov} © (2008-08-12 12:00) [7]> На таймере интервал 500 мс - частенько подмигивает надпись...
Хм... можно сделать вначале проверку на смену даты, если не сменилась, то и не "рисовать" ее(дату в кэпшене) т.е. выход из процедуры....
Если секунды таки необходимо отображать, то нет смысла в этой затеи... интервал таймера только нужно увеличить...
← →
oldman © (2008-08-12 12:03) [8]
> TRSteep © (12.08.08 11:35)
> Пытаюсь вывести дату и время в заголовке
А не лучше ли в "строке состояния"?
← →
TRSteep © (2008-08-12 12:03) [9]хотя есть еще одна мысль - может выводить не в заголовке
наверно он все таки предназначен для другого :)
Если выводить например в label
или вобще самому прорисовывать на PaintBox?
← →
oldman © (2008-08-12 12:06) [10]
> TRSteep © (12.08.08 12:03) [9]
Я убежден, что часы и календарь с информационной точки зрения в программах не нужны.
Часы же есть.
← →
TRSteep © (2008-08-12 12:24) [11]oldman я пишу для тренировки (и для себя) будильник
хотелось бы получить все то что я хочу получить от программы
и заодно учиться писать программы
И хотелось бы видеть время - прямо тут где и задаешь звонок :)
← →
oldman © (2008-08-12 12:29) [12]
> TRSteep © (12.08.08 12:24) [11]
Так и показывай (меняй) только время.
При достижении 00:00 меняй дату и день недели
← →
Ega23 © (2008-08-12 12:30) [13]
> Я убежден, что часы и календарь с информационной точки зрения
> в программах не нужны.
> Часы же есть.
Секунды не показывает. Надо специально кликать.
Если секунды не нужны - тогда да. Но часто бывает, что нужны.
← →
oldman © (2008-08-12 12:32) [14]
> Ega23 © (12.08.08 12:30) [13]
> Секунды не показывает.
У меня показывает.
И на руке, и на стене, и в сотовом.
← →
MsGuns © (2008-08-12 14:54) [15]Код в сабже - издевательство над паскалем и вообще програмированием
Страницы: 1 вся ветка
Текущий архив: 2008.09.21;
Скачать: CL | DM;
Память: 0.5 MB
Время: 0.015 c
