Главная страница
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.055 c
2-1270106019
Kolan
2010-04-01 11:13
2010.08.27
Пакет компилиться в свою папку


3-1239892608
Сантропе
2009-04-16 18:36
2010.08.27
Подскажите утилиту для работы с PARADOX


6-1219479860
Rembo
2008-08-23 12:24
2010.08.27
winsock2 клиент сервер connect 10035


2-1272357036
oleg_teacher
2010-04-27 12:30
2010.08.27
DateTimePicker2.


15-1264345015
test
2010-01-24 17:56
2010.08.27
Конец света.