delphi4arab منتديات دلفي للعرب
مشكلة في الدخول ال form - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : مشكلة في الدخول ال form (/showthread.php?tid=11046)

الصفحات: 1 2


مشكلة في الدخول ال form - medreg - 21-09-2020

السلام عليكم ورحمة الله تعالى وبركاته
عندما اضغط على زر الدخول الى نافذة من النوافذ المتواجدة بالبرنامج
يستغر تقريبا 10 ثواني او 15 ثانية وبعدها تظهر النافذة
الكود المستعمل في حدث الزر هو
كود :
var Frm:TForm2; begin   Frm:=TForm2.create(self);   Frm.ShowModal;   Frm.Free;
ونفس الشي بالنسبة لزر الخروج من البرنامج
الكزد الكستعمل في حدث الخروج من البرنامج هو
application.Terminate;
كيف اعالج هذه المشكلة
بارك الله فيكم


RE: مشكلة في الدخول ال form - لؤي - 22-09-2020

السلام عليكم

مثال ممكن أن تعدل عليه للوصول لما تصبو إليه :


كود :
procedure TMainForm.ProgressFormClose(Sender: TObject); begin   ProgressForm.Free; end; procedure TMainForm.LaunchButtonClick(Sender: TObject); begin   ProgressForm:=TProgressForm.Create(nil);   ProgressForm.OnClose:=ProgressFormClose;  ProgressForm.ShowModal; end;



RE: مشكلة في الدخول ال form - Delphi4Us - 22-09-2020

وعليكم السلام ورحمة الله
الطريقة التي استخدمها وتعمل بشكل عادي جدا 
حيث يتم التأكد من وجود النموذج بالذاكرة اولا

كود :
If not Assigned(Form1) then Form1:=Tform1.Create(nil); Form1.Show;

وفي حدث اغلاق النموذج قم بتحريره من الذاكرة 

كود :
Form1:=nil; Action:=cafree;

الان باي مكان واي زر يمكنك اغلاق النموذج بشكل عادي

كود :
Form1.Close;



RE: مشكلة في الدخول ال form - محمد عبد العزيز - 22-09-2020


وعليكم السلام ورحمة الله وبركاته
عامة إن إستغرق ظهور الForm أكثر من 3 ثوان عليك بتغيير أسلوبك في البرمجة.
أعد التفكير بما يوجد بالForm من مكونات وكيف تعاملك معها.



RE: مشكلة في الدخول ال form - medreg - 24-09-2020

شكرا على المرور
المشكلة لازالت قائمة
اخي عبدالعزيز 99 بالمائة تكون المشكلة في الأسلوب والتعامل مع المكونات كما قلت
لكن يمكنك ان تعطينا البعض من الاسباب التي ربما تكون في الغالب سبب في هذا المشكل ولو جزء منها
جزاكم الله عنا كل خير


RE: مشكلة في الدخول ال form - sofiane201 - 24-09-2020

هل تستعمل مكونات اضافية؟
هل يمكنك مشاركة المشروع؟


RE: مشكلة في الدخول ال form - medreg - 24-09-2020

لا يمكن مشاركة المشروع
المشروع كبير لا يمكنني

ماذا تقصد بمكونات اضافية
المكونات التي استعملها هي tms فقط


RE: مشكلة في الدخول ال form - sofiane201 - 25-09-2020

إذا لا يمكن معرفة السبب لأن الاحتمالات كثيرة.
هل البطء يحدث بعد انشاء الفورم TForm2 فقط؟, ام قبلها ايضا؟


RE: مشكلة في الدخول ال form - medreg - 25-09-2020

من فضلك أذكر بعض الإحتمالات التي ربما تكون السبب


RE: مشكلة في الدخول ال form - محمد عبد العزيز - 26-09-2020

هل لديك مكونات قواعد بيانات يتم الاتصال بها في الForm ؟
هل لديك بيانات يتم عرضها بDBGrid أو StringGrid ؟ و الأهم هل تقوم بحسابات أو معالجة بيانات بحلقة قبل عرضها ؟