Einzelnen Beitrag anzeigen

Benutzerbild von RomanK
RomanK

Registriert seit: 7. Jun 2002
Ort: Kirchheim unter Teck
1.036 Beiträge
 
Delphi 7 Personal
 
#22
  Alt 13. Mär 2003, 16:32
Hoi, das hat Luckie doch schon gesagt:
Ersetzte die Uhrzeit durch Edit1.text.
Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
    if TimeToStr(now) >= Edit1.text then
  begin
    timer1.enabled:=false;
    Showmessage(TimeToStr(now)); // Hier die Message, hier die genau Uhrzeit
  end;
end;
Jetzt musst du im EDIT1 die Uhrzeit im Format HH:MM:SS (z.B. 16:31:55) reinschreiben und fertig.
Roman Keller
Krieg ist Gottes Art den Amerikanern Geographie beizubringen!
  Mit Zitat antworten Zitat