السلام عليكم ورحمة الله وبركاته
أخواني أنا كنت أريد قبلا الوقت المستغرق للTimer و الحمدالله هذا الكود نجح معي
ولكن أريد أن يظهر 1 لكل 1000 بمعنى من ملي ثانيه الى ثانيه
وشكرا
أخواني أنا كنت أريد قبلا الوقت المستغرق للTimer و الحمدالله هذا الكود نجح معي
كود :
procedure TForm1.Timer1Timer(Sender: TObject);
begin
TimeNumber := Timer1.Interval;
end;
procedure TForm1.Timer2Timer(Sender: TObject);
begin
TimeNumber := TimeNumber + Timer2.Interval;
Label1.Caption := IntToStr(TimeNumber);
end;ولكن أريد أن يظهر 1 لكل 1000 بمعنى من ملي ثانيه الى ثانيه
وشكرا
اللهم علمنا ما ينفعنا و انفعنا بما علمتنا وَ زِدْنا علماً