Автор Mail задал вопрос в разделе Другие языки и технологии
Delphi. Узнать сколько время сейчас и получил лучший ответ
Ответ от Миоко Таканава[гуру]
//Текушие дата и время
Edit1.Text := DateTimeToStr(Now);
//Текущее время
Edit2.Text := TimeToStr(Time);
//Текущая дата
Edit3.Text := DateToStr(Date);
Ответ от Gennady[гуру]
procedure TForm1.Button1Click(Sender: TObject);
var
T : TDateTime;
H, M, S, mS : Word;
begin
T := Time;
DecodeTime(T, H, M, S, mS);
Caption := IntToStr(H) + ':' + IntToStr(M) + ':' + IntToStr(S);
end;
Выведет в заголовок формы текущее время.
Можно формировать результирующую строку и так
Caption := Format('%2.2d:%2.2d:%2.2d', [H, M, S]);
procedure TForm1.Button1Click(Sender: TObject);
var
T : TDateTime;
H, M, S, mS : Word;
begin
T := Time;
DecodeTime(T, H, M, S, mS);
Caption := IntToStr(H) + ':' + IntToStr(M) + ':' + IntToStr(S);
end;
Выведет в заголовок формы текущее время.
Можно формировать результирующую строку и так
Caption := Format('%2.2d:%2.2d:%2.2d', [H, M, S]);
Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с ответами на Ваш вопрос: Delphi. Узнать сколько время сейчас
Delphi: выполнение действия в заданное время.
Есть класс TTimer
Есть текущее время Now
Есть функция FormatDateTime.
Делаешь
подробнее...
спросили в Таймеры
Как сделать таймер на Delphi?
добавил таймер (TTimer) на форму поставил свойство интервал 1000 млсек Enable=false
отдельно в
подробнее...
Как сделать таймер на Delphi?
добавил таймер (TTimer) на форму поставил свойство интервал 1000 млсек Enable=false
отдельно в
подробнее...
как сделать на делфи часы. Чтобы показывала три разных времени. Алматы. Москва, Лондон.
Прибавляйте разницу во времени к текущему времени.
Будет и Москва, и Лондон, и Лос-Анжелес то
подробнее...