Hi Leute.
Das Umwandeln von Longint in ein FormatDateTime hab ich
Delphi-Quellcode:
Function TForm1.Zeit(rTime: LongInt):String;
var
s: TTime;
begin
s:= StrToTime(IntToStr(0)+':'+IntToStr(Trunc((rtime/1000)/60))+':'+
Inttostr(Trunc(rtime/1000 ) mod 60)+','+
FloatToStr( rtime mod 1000));
Result:=FormatDateTime('nn:ss:zzz',s);
end;
aber nun brauche ich es in umgekeherter Form ( string nach Longint)
und hab keine Ahnung!!!
den anfang habe ich, aber dann???? kein Denken mehr
Delphi-Quellcode:
Function TForm1.ZeitToInt(s: String): LongInt
var
t: TTime;
begin
t:=StrToTime(s);
end;
Ich Hoffe Ihr könnt mir helfen?
Gruss Alf