Thema: Delphi Uhrzeiten Addieren?

Einzelnen Beitrag anzeigen

Neon-chan

Registriert seit: 25. Okt 2004
24 Beiträge
 
Delphi 7 Enterprise
 
#13

Re: Uhrzeiten Addieren?

  Alt 10. Okt 2006, 11:56
Zur Not kannst du es übe StringList und Delimited String machen

Delphi-Quellcode:

var
  Sekunden:Integer;
  Buffer: TStringList;
begin
  Buffer := TStringList.Create;
  try
    Buffer.Delimiter := ':';
    Buffer.DelimitedText := '5:30'; //hier kommt dann halt deine stringvariable hin

    Sekunden := (StrtoInt(Buffer.Strings[0]) * 60 ) + StrToInt(Buffer.Strings[1]);
  finally
    Buffer.free;
  end;
end;
sollte so klappen, auch wenns sicher eleganter geht ^^
  Mit Zitat antworten Zitat