Forum: Sonstige Fragen zu Delphi
Delphi
by Mirilin,
22. Okt 2003
...
Start : TTime;
...
procedure TForm1.TimerTimer(Sender: TObject);
begin
LabelTime.Caption := FormatDateTime('nn"::"ss"::"zzz',Now-Start);
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
Forum: Sonstige Fragen zu Delphi
Delphi
by Mirilin,
22. Okt 2003
Du willst 1/100 folglich wäre es wohl Interval = 10.
Forum: Sonstige Fragen zu Delphi
Delphi
by Mirilin,
22. Okt 2003
:hi:
@Matze
procedure TForm1.TimerTimer(Sender: TObject);
begin
inc(Hun);
if Hun = 100 then
begin