Zitat von
Orhan:
Ich weiß dass 1000 ms. eine sekunde macht. Ich habe etwas aderes gemeint. Trotzdem danke ich euch.
Was meinst Du denn dann?
Zitat von
Orhan:
Ich will die Timer interval von (millisecond) in sekunden haben. Gibt es dazu eine Funktion
Wenn ich versteh was Du willst, denn wäre das halt, den Wert mal 1000 zu nehmen. Wenn das in eine eigene Function soll, na gut dann vieleicht so..
Delphi-Quellcode:
function TForm1.SetTimerInterval(Var Timer : TTimer):Boolean;
begin
SetTimerInterval := true;
try
Timer.Interval := Timer.Interval * 1000;
ShowMessage(IntToStr(Timer.Interval));
except
SetTimerInterval := false;
end;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
SetTimerInterval(Timer1);
SetTimerInterval(Timer2);
SetTimerInterval(Timer3);
SetTimerInterval(Timer4);
SetTimerInterval(Timer5);
end;
Gruß Jens