+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف اجعل الزر يعمل مع entrer (/showthread.php?tid=5518)
كيف اجعل الزر يعمل مع entrer - hmidadz - 04-09-2013
السلام
كيف يمكنني جعل زر في البرنامج يعمل مع انتر
عندما اضغط على انتري او ادخال في مفتاح المفتيح يتم click1 في الزر
اتمني ان المشكل واضح سلام
كيف اجعل الزر يعمل مع entrer - Najy Ibraheem - 04-09-2013
السلام عليكم...
اضبط الخاصية Default للزر على True.
سلام.
كيف اجعل الزر يعمل مع entrer - SMP3 - 04-09-2013
PHP كود :
procedure WMHotKey(var Msg: TWMHotKey); message WM_HOTKEY;
procedure TMain.FormCreate(Sender: TObject);
begin
RegisterHotKey(Handle, 0, 0, VK_RETURN);
end;
procedure TMain.FormDestroy(Sender: TObject);
begin
UnregisterHotKey(Handle, 0);
end;
procedure TMain.WMHotKey(var Msg: TWMHotKey);
begin
inherited;
if Msg.HotKey = 0 then
begin
Button1.Click;
end;
end;
كيف اجعل الزر يعمل مع entrer - h-farid - 04-09-2013
و عليكم السلام و رحمة الله
كود :
Button1.default:=true;لماذا التعقيد عند توفر حل بسيط
كيف اجعل الزر يعمل مع entrer - Najy Ibraheem - 04-09-2013
السلام عليكم...
h-farid كتب :+1كود :button1.default:=true;
سلام.
كيف اجعل الزر يعمل مع entrer - SMP3 - 05-09-2013
إقتباس :لماذا التعقيد عند توفر حل بسيطليس تعقيد أخي ..
هذه هي الطريقة الصحيحة
حتى تفهم أكثر :
أضف زر جديد للفورم
ضع في الحدث click :
PHP كود :
Caption:='Btn1';
ضع في الحدث الزر الثاني :
PHP كود :
Caption:='Btn2';
شغل البرنامج و اضغط على زر أنتر !!!!!!!!
----------------------------------------
الخاصية Default مرتبطة بحالة المكونات الاخرى ( Focus )..
+
ماذا لو تم استبدال Button ب SpeedButton ؟؟
كيف اجعل الزر يعمل مع entrer - S.FATEH - 05-09-2013
السلام عليكم او ببساطة انقل اجعله focused
كود :
Button1.SetFocus;عندما يكون مفعل عند الضط على enter يعمل عادي