+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف اجعل tgauge تتقدم من البداية للنهاية بحسب انترفال التايمر (/showthread.php?tid=6931)
كيف اجعل tgauge تتقدم من البداية للنهاية بحسب انترفال التايمر - rabihpascal - 10-04-2015
السلام عليكم كيف اجعل tgauge تتقدم من البداية للنهاية بحسب انترفال التايمر
كيف اجعل tgauge تتقدم من البداية للنهاية بحسب انترفال التايمر - Mr.DOS - 10-04-2015
السلام عليكم
شاهد المثال المرفق
كيف اجعل tgauge تتقدم من البداية للنهاية بحسب انترفال التايمر - rabihpascal - 11-04-2015
هذا مثال جيد ولكن كيف يكون التقدم بحسب الانترفال اي اذا كان التايمر كل 3 توان ان تعيد tgauge العملية نفسها كل 3 ثوان ،كما انه لا مشكلة في استعمال 2 تايمر
كيف اجعل tgauge تتقدم من البداية للنهاية بحسب انترفال التايمر - Agmcz - 11-04-2015
PHP كود :
procedure GaugeStart(Gauge: TGauge);
begin
Gauge.Progress := 0;
repeat
Gauge.Progress := Gauge.Progress + 1;
Application.ProcessMessages;
until Gauge.Progress = Gauge.MaxValue;
end;
كيف اجعل tgauge تتقدم من البداية للنهاية بحسب انترفال التايمر - rabihpascal - 11-04-2015
شكرا اخي اعتقد ان هذا هو الحل الانسب شكرا جزيلا لك