Вниз
Скачать: CL | DM;

Дата/Время   Найти похожие ветки 

 
REX   (2010-06-05 13:58) [0]

Написал такой код, а он не форматирует не Дату, не Время:
procedure TForm1.Timer1Timer(Sender: TObject);
var t,d:TDateTime;
begin
t:=Time();
FormatDateTime("am/pm",t);
label1.Caption:=TimeToStr(t);
d:=Date();
FormatDateTime("dddddd",d);
label2.Caption:=DateToStr(d);
end;

Подскажите пожалуйста в чем проблема ?


 
oldman ©   (2010-06-05 14:05) [1]

Что значит "не форматирует"?
В Labels что пишется?


 
oldman ©   (2010-06-05 14:07) [2]


> var t,d:TDateTime;
> begin
> t:=Time();
> d:=Date();


var t: TDateTime;
begin
t:=Now();


 
Anatoly Podgoretsky ©   (2010-06-05 14:07) [3]

> REX  (05.06.2010 13:58:00)  [0]

А что тут делают функции FormatDateTime, если результат никак не
используется


 
REX   (2010-06-05 14:32) [4]

To oldman:
              label1 "13:12:08"
              label2 "05.06.10"


 
Демо ©   (2010-06-05 14:38) [5]

The following example uses FormatDateTime to set the string variable S to a sentence indicating a meeting time in 3 hours. The sentence has the form "The meeting is on Wednesday, February 15, 1995 at 2:30 PM".

S := FormatDateTime(""The meeting is on " dddd, mmmm d, yyyy, " at " hh:mm AM/PM", Now + 0.125);


 
REX   (2010-06-05 14:58) [6]

Демо © спасибо. Есть все-таки люди которые отвечают на вопрос, а не наливают воду.


 
Плохиш ©   (2010-06-05 16:44) [7]

Чтение справки вслух нахаляву. Ещё одному немощному подали..


 
нет имени   (2010-06-05 17:09) [8]

Удалено модератором



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

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



Память: 0.46 MB
Время: 0.045 c
2-1266395128
urgun
2010-02-17 11:25
2010.08.27
TThread+TMemoryStream = исключения при чтении в буффер


11-1221153345
Ayaha
2008-09-11 21:15
2010.08.27
Где найти kol_unicode.inc?


15-1273005004
Юрий
2010-05-05 00:30
2010.08.27
С днем рождения ! 5 мая 2010 среда


2-1273989815
fallen_from_skies
2010-05-16 10:03
2010.08.27
создание программы для тестирования учащихся


2-1269445511
Kurilkin
2010-03-24 18:45
2010.08.27
TFrame




   Наверх