Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.08.27;
Скачать: 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 вся ветка

Текущий архив: 2010.08.27;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.046 c
2-1271881604
Б
2010-04-22 00:26
2010.08.27
Как вызвать процедуру по указателю на неё?


15-1267169309
abhtr
2010-02-26 10:28
2010.08.27
Как сложить данные из одной таблицы


2-1273133453
Rail
2010-05-06 12:10
2010.08.27
открыть pdf


15-1269254185
TpaTaTa
2010-03-22 13:36
2010.08.27
RichEdit


15-1265990116
awex
2010-02-12 18:55
2010.08.27
Привет Beeline, или новый развод....