Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Дата/Время [D7, XP]


REX ©   (2010-06-05 13:58:00) 

Написал такой код, а он не форматирует не Дату, не Время:
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;

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


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

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


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

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


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

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


Демо   (2010-06-05 14:38:00) [4]

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:32:00) [5]

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


oldman   (2010-06-05 14:07:00) [6]


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


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


Anatoly Podgoretsky   (2010-06-05 14:07:00) [7]

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

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


oldman   (2010-06-05 14:05:00) [8]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо