Zitat von
norbert3:
Gibt es noch eine einfachere Lösung?
Die hat dir marabu bereits vor 1,5 Stunden beschrieben:
Delphi-Quellcode:
procedure Demo;
var von, bis : TDateTime;
s : string;
begin
von := StrToTime('08:30');
bis := StrToTime('17:00');
s := FloatToStr(24 * (bis - von));
end;
Gruß Hawkeye