Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**Haegar**

hab das bisher so gemacht!

Delphi-Quellcode:

			procedure TForm1.timerTimer(Sender: TObject);

begin

 dauer:=Now-start+bisher;

 lbl_zeit.Caption:=FormatDateTime('t',dauer);

end;

//im FormCreate

ShortTimeFormat:='hh "h" nn "min" ss "s"';

gruss haegar

Haegar Registriert seit: 10. Dez 2002 Ort: Peitz 319 Beiträge Delphi 7 Professional	#5 21. Apr 2003, 16:26 hab das bisher so gemacht! markieren Delphi-Quellcode: procedure TForm1.timerTimer(Sender: TObject); begin dauer:=Now-start+bisher; lbl_zeit.Caption:=FormatDateTime('t',dauer); end; //im FormCreate ShortTimeFormat:='hh "h" nn "min" ss "s"'; gruss haegar
	Zitat