ورود

View Full Version : تشخيص فشردن شدن كليد Insert


kamand314
جمعه 01 خرداد 1388, 21:19 عصر
با سلام
من يك فرم اصلي در برنامه ام دارم كه ميخوام هر گاه كليد Insert را زدم فرم ورود اطلاعات
به نمايش درآيد
از متد keypreview استفاده كردم اما متاسفانه كدكليد insert را نمي دانم
آيا استفاده از keypreview صحيح است يا بايد از متد ديگري استفاده كنم
و لطفا كد كليد هاي Insert و delete را بهم بگيد

با تشكر
سعید صابری
جمعه 01 خرداد 1388, 21:29 عصر
من هميشه از KEYDOWN استفاده مي كنم
VK_INSERT و VK_DELETE
Delphi-Man
جمعه 01 خرداد 1388, 21:32 عصر
با سلام
در رویداد onkeydown فرم کد زیر رو وارد کنید:


if (key=vk_insert) and (shift=[]) then begin
showmessage('insert detected!');
end;

البته اگه یه کلید دیگه مثل p رو قبلا نگه دارید و بعد insert رو بزنید بازم عمل میده ولی خیلی مهم نیست چون در مورد shift و control و... عمل نمیده.