04-09-2013, 02:14 PM
04-09-2013, 04:00 PM
السلام عليكم...
اضبط الخاصية Default للزر على True.
سلام.
اضبط الخاصية Default للزر على True.
سلام.
04-09-2013, 04:03 PM
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;
04-09-2013, 06:10 PM
و عليكم السلام و رحمة الله
لماذا التعقيد عند توفر حل بسيط
كود :
Button1.default:=true;لماذا التعقيد عند توفر حل بسيط
04-09-2013, 06:57 PM
السلام عليكم...
سلام.
h-farid كتب :+1كود :button1.default:=true;
سلام.
05-09-2013, 12:56 AM
إقتباس :لماذا التعقيد عند توفر حل بسيطليس تعقيد أخي ..
هذه هي الطريقة الصحيحة
حتى تفهم أكثر :
أضف زر جديد للفورم
ضع في الحدث click :
PHP كود :
Caption:='Btn1';
ضع في الحدث الزر الثاني :
PHP كود :
Caption:='Btn2';
شغل البرنامج و اضغط على زر أنتر !!!!!!!!
----------------------------------------
الخاصية Default مرتبطة بحالة المكونات الاخرى ( Focus )..
+
ماذا لو تم استبدال Button ب SpeedButton ؟؟
05-09-2013, 12:49 PM
السلام عليكم او ببساطة انقل اجعله focused
عندما يكون مفعل عند الضط على enter يعمل عادي
كود :
Button1.SetFocus;عندما يكون مفعل عند الضط على enter يعمل عادي