با سلام
من چگونه میتوانم از کلیدهای ترکیبی جهت انجام کاری استفاده کنم مثلا میخواهم کلیدهای Ctrl+F3 را برای انجام دادن کاری تعریف کنم کد کلید Ctrl+F3 را چگونه بایستی تعریف کنم
با تشکر
با سلام
من چگونه میتوانم از کلیدهای ترکیبی جهت انجام کاری استفاده کنم مثلا میخواهم کلیدهای Ctrl+F3 را برای انجام دادن کاری تعریف کنم کد کلید Ctrl+F3 را چگونه بایستی تعریف کنم
با تشکر
[LEFT]Form1.KeyPreview:=True;[
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (Key = VK_F3) and ([ssCtrl] = Shift) then
begin
Key := 0;
ShowMessage('Got Ctrl+f3');
end
end;
/LEFT]