Registriert seit: 14. Aug 2005
1.859 Beiträge
Delphi 11 Alexandria
|
Re: String To Int/Time
19. Mai 2008, 23:28
Hallo Stelo,
oder so:
Delphi-Quellcode:
var
min: Extended;
UhrZeit: Extended;
I: Integer;
begin
min:= strToTime('00:01');
for I := 0 to 61 do
begin
UhrZeit:= min*i;
ShowMessage(FormatDateTime('HH:NN',UhrZeit));
end;
end;
Bis bald Chemiker
wer gesund ist hat 1000 wünsche wer krank ist nur einen.
|