Forum: Sonstige Fragen zu Delphi
Delphi
by himitsu,
24. Nov 2009
k.A., aber vielleicht war mal sowas geplant? :angel2:
...
Result := Std < 24;
if Result then TimeSum := EncodeTime(Std,Min,Sec,0);
end;
Forum: Sonstige Fragen zu Delphi
Delphi
by himitsu,
24. Nov 2009
Wenn in Time wirklich nur Zeiten und kein Datum enthalten ist, dann
function TFrmMain.AddTimes(Time1, Time2: TTime; var TimeSum: TTime): Boolean;
begin
TimeSum := Time1 + Time2;
Result := TRUE;
end;
vor dem Komma wären die Tage, statt dem Datum (Datum = Tage seit 30.12.1899)
function TFrmMain.AddTimes(Time1, Time2: TTime; var TimeSum: TTime): Boolean;