delphi4arab منتديات دلفي للعرب

نسخة كاملة : عدم إستجابة زر أثناء الضغط عليه
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
السلام عليكم ورحمة الله
في بعض الأحيان لا يستجيب زر يحمل الأمر close
علما ان الفورم المتواجد بها تحتوي على مكون rzpanel وبداخل هذا المكون زر إغلاق الفورم والذي يحتوي على أمر close
مع العلم ان الزر من نوع rzbitbtn
لماذا لم يستجيب هذا الزر علما ان كل الازرار ومن نفس النوع تستجيب الا الزر الذي يحتوي على الامر close هو الوحيد الذي لا يستجيب في بعض الاحيان
هل المشكل في نوع الازرار ام اين يكمل المشكل وماهو الحل الانسب لهذا المشكل
وبالتوفيق
ما هو الكود الذي يحمله الزر Close
مبرمج مبتدأ كتب :
ما هو الكود الذي يحمله الزر Close
شكرا على الرد
هذا هو الكود المستعمل في الحدث للزر
كود :
procedure TForm1.RzBitBtn1Click(Sender: TObject); begin Close; end;
هذة النافذة التي بها الكود
السلام عليكم
جرب هدا الكود مكانه
application.Terminate ;
bassem_43 كتب :السلام عليكم
جرب هدا الكود مكانه
application.terminate ;

مشكور أخي على الرد
لكن هذا الكود يغلق البرنامج كليا وليس اغلاق نافذة فقط
لإغلاق النافذة
كود :
Form1.close ;
السلام عليكم مكونات Raize لديها بعض المشاكل من هذه الناحية احيانا لاسباب مجهول تفقد المكونات الرابط مع الحدث
تأكد من ان اسم الزر RzBitBtn1 اذهب الى Object Inspector في الحدث OnClick قم بحذف الحدث ثم قم باعادة انشاء الحدث و اكتب ما تشاء ...
هل يمكن اضافة هذا الكود
بعد الكود CLOSE
PHP كود :
ModalResult := mrOk; 

أي
PHP كود :
procedure TForm1.RzBitBtn1Click(Sender: TObject);
begin
Close
;
ModalResult := mrOk;
end; 
وهل هذا الإجراء يمكن ان يحل المشكل؟
السلام عليكم

بالرغم من كونك لم توضح مشكلتك بالضبط
يمكن اضافة اي شيئ بعد الـ Close لانها لا تقوم بتحرير اي شيئ من الذاكرة في الحقيقة قمت باغلاق/اخفاء الفورم
فقط ...
الصفحات : 1 2