EasyDelphi Q&A
+4 تصويتات
40 مشاهدات
السلام عليكم

مشكلتي تكمن في انه  عند حدث on key press للاديت سميتها password_edit والذي جعلته يتحقق فيما اذا كان المفتاح المضغوط هو Entrer يقوم بالضغط على زر ok_btn كما هو مبين

procedure TLogin_form.password_editKeyPress(Sender: TObject; var Key: Char);

begin

if key=#13 then ok_btn.Click;

end;

كل شيئ يعمل بشكل عادي، لكن عند الضغط على زر Enter يرافقه صوت اعتبره مزعج فهل يوجد حل لازالته.
تم إغلاقه بملاحظة: تمت الاجابة عليه
سُئل في تصنيف vcl بواسطة (2,110 نقاط)
مغلق بواسطة | 40 مشاهدات

1 إجابة واحدة

+3 تصويتات
أفضل إجابة

وعليكم السلام

if key = #13 then
begin
key:= #0;
btn_ok.click;
end;

 

تم الرد عليه بواسطة (1,230 نقاط)
مختارة بواسطة
تم حل المشكل، جازاك الله خيرا يا اخي.

اسئلة متعلقة

+1 تصويت
1 إجابة
سُئل نوفمبر 15، 2018 في تصنيف vcl بواسطة Amar Gozim (10,790 نقاط) | 115 مشاهدات
+3 تصويتات
2 إجابة
سُئل نوفمبر 6، 2018 في تصنيف vcl بواسطة MohammedAmine (360 نقاط) | 109 مشاهدات
+3 تصويتات
2 إجابة
سُئل سبتمبر 3، 2018 في تصنيف vcl بواسطة َAbdallah (2,110 نقاط) | 80 مشاهدات
+2 تصويتات
2 إجابة
سُئل أغسطس 7، 2018 في تصنيف vcl بواسطة KHALED (7,610 نقاط) | 55 مشاهدات
ادعُ اصدقائك في الفايسبوك لمشاركتك
Comodo SSL

مرحبًا بك إلى EasyDelphi Q&A، حيث يمكنك طرح الأسئلة والحصول على الإجابة عليها من المستخدمين الآخرين.

لا يسمح بطلب او السؤال عن كراك او تفعيل او كسر او فك او اي شيء يخالف اتفاقيات الترخيص  مهما كان السبب ومهما كان البرنامج ونوعه. ولا حتى نشر روابط تحتوي على مثل هذه الاشياء لا في الاسئلة ولا في الاجابات ولا التعليقات . نهائيا

427 سؤال
659 إجابة
1,169 تعليق
250 مستخدم