Zitat von
newuser01:
Fehler: inkompatible Typen Integer und String
Natürlich, Format gibt einen String zurück, den du aber in eine Integervariable schreibst.
Gemeint war es so:
Delphi-Quellcode:
procedure Tfrm_timer.Timer1Timer(Sender: TObject);
begin
iTime := iTime + 1;
l_Time.Caption := Format('%d.2',[iTime div 3600]) + ':' + Format('%d.2',[iTime div 60]) + ':' + Format('%d.2',[iTime mod 60]);
end;