عدم إستجابة زر أثناء الضغط عليه

[hamou1982]

السلام عليكم ورحمة الله
في بعض الأحيان لا يستجيب زر يحمل الأمر close
علما ان الفورم المتواجد بها تحتوي على مكون rzpanel وبداخل هذا المكون زر إغلاق الفورم والذي يحتوي على أمر close
مع العلم ان الزر من نوع rzbitbtn
لماذا لم يستجيب هذا الزر علما ان كل الازرار ومن نفس النوع تستجيب الا الزر الذي يحتوي على الامر close هو الوحيد الذي لا يستجيب في بعض الاحيان
هل المشكل في نوع الازرار ام اين يكمل المشكل وماهو الحل الانسب لهذا المشكل
وبالتوفيق

[مبرمج مبتدأ]

ما هو الكود الذي يحمله الزر Close

[hamou1982]

ما هو الكود الذي يحمله الزر Close

شكرا على الرد
هذا هو الكود المستعمل في الحدث للزر

كود :

procedure TForm1.RzBitBtn1Click(Sender: TObject); begin Close; end;

[hamou1982]

هذة النافذة التي بها الكود

[bassem_43]

السلام عليكم
جرب هدا الكود مكانه
application.Terminate ;

[hamou1982]

السلام عليكم
جرب هدا الكود مكانه
application.terminate ;

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

[مبرمج مبتدأ]

لإغلاق النافذة

كود :

Form1.close ;

[S.FATEH]

السلام عليكم مكونات Raize لديها بعض المشاكل من هذه الناحية احيانا لاسباب مجهول تفقد المكونات الرابط مع الحدث
تأكد من ان اسم الزر RzBitBtn1 اذهب الى Object Inspector في الحدث OnClick قم بحذف الحدث ثم قم باعادة انشاء الحدث و اكتب ما تشاء ...

[hamou1982]

هل يمكن اضافة هذا الكود
بعد الكود CLOSE

PHP كود :

ModalResult := mrOk; 


أي

PHP كود :

procedure TForm1.RzBitBtn1Click(Sender: TObject);
begin
Close;
ModalResult := mrOk;
end; 


وهل هذا الإجراء يمكن ان يحل المشكل؟

[S.FATEH]

السلام عليكم

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