27-05-2011, 03:41 AM
27-05-2011, 09:29 PM
السلام عليكم
إقتباس :يقوم مباشرة بالتعليق على ctrlلم أفهم هذه! ممكن مثال؟
27-05-2011, 11:09 PM
اخوي كاش شكراً لمرورك
انا اقصد ارغب عمل اختصارات لأحرف الكيبورد على الفورم
فمثلاً عند الضغط على Button يقوم مباشرة بالضغط على الاختصار المطلوب
اوضح اكثر : ارغب في الوصول الى زر ctrl او f11 من البرنامج دون الرجوع للكيبورد والاستخدام اليدوي
انا اقصد ارغب عمل اختصارات لأحرف الكيبورد على الفورم
فمثلاً عند الضغط على Button يقوم مباشرة بالضغط على الاختصار المطلوب
اوضح اكثر : ارغب في الوصول الى زر ctrl او f11 من البرنامج دون الرجوع للكيبورد والاستخدام اليدوي
28-05-2011, 06:32 AM
شيء مثل هذا:
PHP كود :
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_F11 then
ShowMessage('F11 Down!');
end;
procedure TForm1.Button1Click(Sender: TObject);
var
Ky: Word;
begin
Ky := VK_F11;
Self.KeyDown(Ky, []);
end;
29-05-2011, 12:29 AM
اخوي كاش بعد البحث وجدت اضافة جميله
كيبورد على الفورم والتحكم باالاومر عبره لكن اعطو مثال واحد فقط
ارغب بباقي الاكود الخاصة بالكيبورد لكي اصل اليها
وهذا رابط الاضافة
وهذا ملف pdf شرح الاضافة
كيبورد على الفورم والتحكم باالاومر عبره لكن اعطو مثال واحد فقط
كود :
AdvSmoothTouchKeyBoard1.PostKey(VK_CAPITAL, [], true, 29);وهذا رابط الاضافة
كود :
http://www.tmssoftware.com/site/atkbd.aspكود :
http://www.tmssoftware.com/site/manuals/TMS%20TAdvTouchkeyboard.pdfكود :
http://www.tmssoftware.com/Images/advtouchkeyboard.png29-05-2011, 08:37 AM
السلام عليكم ورحمة الله
http://www.delphi4arab.net/forum/showthread.php?tid=91
إقتباس : بباقي الاكود الخاصة بالكيبوردراجع هذا الموضوع
http://www.delphi4arab.net/forum/showthread.php?tid=91