genaue Zeitangabe

[SirThornberry]

du musst datum und zeit zusammen nehmen und dann damit rechnen. Bsp. anhand von zeit (muss noch für +datum erweitert werden:

Delphi-Quellcode:

var IZeit: Integer;
    SZeit: String;
begin
 SZeit := timetostr(time); //13:45:11
 IZeit := (strtoint(copy(SZeit, 1, 2)) * 3600)
 + (strtoint(copy(SZeit, 4, 2)) * 60)
 + (strtoint(copy(SZeit, 1, 2))); //also zeit als gesamtsekunden errechnen, und das ganze noch mit jahren..
end;

[edit=Sharky]Delphi-Tags korriegiert. Mfg, Sharky[/edit]