پاسخ به رویدادها در حین پیشرفت پروسه

[mojtabamalaekeh]

سلام
خلاصه اینه که معادل فرمان DoEvents توی VB رو میخوام. اما مفصل:
فرض کنید یه پروسه طولانی به صورت زیر داریم:
for i := 1to 10 do begin
ProgressBar1.StepBy(10
sleep(500
end
برنامه تا پایان این پروسه قفل می شود و کاربر نمی تواند کاری بکند
مثلا اگر دکمه ای روی فرم باشد کاربر نمی تواند آن را کلیلک کند
چکار کنم که همزمان با پیشرفت این پروسه برنامه ام به سایر رویدادها نیز پاسخ بدهد؟

[lord_viper]

اخر حلقه for اینو بزار
application.processmessage;

[mojtabamalaekeh]

خیلی ممنون lord_viper
واقعاً کمکم کرد
امیدوارم دیگران هم استفاده کنند
اما چرا پاسخ به ایمیلم ارسال نشد؟

[ΛΛ Θ l-l $ Σ Ω]

اما چرا پاسخ به ایمیلم ارسال نشد؟

مدلشه