با سلام خدمت دوستان
میخواهم با فشردن کلید F12 پیامی نمایش داده شود.من از کد زیر با مثل Esc میتوانم پیام را نمایش دهم ولی برای F12 نمیدانم از چه کدی استفاده نمایم؟ متشکرم
if Key=Char(123) then showmessage(strCompany);
Printable View
با سلام خدمت دوستان
میخواهم با فشردن کلید F12 پیامی نمایش داده شود.من از کد زیر با مثل Esc میتوانم پیام را نمایش دهم ولی برای F12 نمیدانم از چه کدی استفاده نمایم؟ متشکرم
if Key=Char(123) then showmessage(strCompany);
سلام.
VK_F12
با تشکر از پاسختان به صورت زیر کد جواب نداد.
کد HTML:if Key=Char(VK_F12) then showmessage(strCompany);
با تشکر از جناب آقای زالی
این را در نت پیدا کردم.
کد HTML:procedure TfrmMainForm.FormKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);begin if (Shift = []) and (Key = VK_F12) then ShowMessage(strCompany);end;