Mam pytanie:
przyklawdowo mam cos takiego:
procedure.button1click(sneder TObject)
begin
showcursor(false)
end;
end.
Jak zrobić skrot do tej procedure zeby po nacisnieciu np. ctrl+n lub po prostu entera program wykonal procedure?????
Mam pytanie:
przyklawdowo mam cos takiego:
procedure.button1click(sneder TObject)
begin
showcursor(false)
end;
end.
Jak zrobić skrot do tej procedure zeby po nacisnieciu np. ctrl+n lub po prostu entera program wykonal procedure?????
KeyPreview := True;
w OnKeyDown:
if (ssCtrl in Shift) and (Key = Ord('C')) then
Button1.Click;
To jedno z rozwiązań.
Wrzuć na formę ActionList. Dodaj akcję (Action), przypisz mu skrót (ShortCut) i w zdarzeniu OnExecute wpisz button1click;