04-12-2012, 06:40 PM
أهلا أخي الكريم ...
لتجاوز التعليق في أي دالة تكرارية مثل
بالتوفيق أخي الكريم
لتجاوز التعليق في أي دالة تكرارية مثل
كود :
procedure TForm1.Button1Click(Sender: TObject);
begin
while {الشرط الذي تريده} do
begin
// الأوامر هنا التي يعلق البرنامج عليها
Application.ProcessMessages; // قم بإضافة هذا الأمر
end;
end;بالتوفيق أخي الكريم