تعریف کلیدهای ترکیبی

[سیروس مقصودی]

با سلام
من چگونه میتوانم از کلیدهای ترکیبی جهت انجام کاری استفاده کنم مثلا میخواهم کلیدهای Ctrl+F3 را برای انجام دادن کاری تعریف کنم کد کلید Ctrl+F3 را چگونه بایستی تعریف کنم
با تشکر

[Valadi]

[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]