Где прописивать и как прописивати коди клавиш

[Олександр17]

Где у delphi 7 нужно прописать код ALT+X чтоби у любой момент при нажатии етих клавиш виходило из проги???

[Гром]

Событие формы OnKeyDown. Параметр Shift этой функции отвечает за нажатие клавиш Ctrl-Alt-Shift. Проверяете Key и Shift - получаете сочетание нажатых клавиш.

[Олександр17]

А OnKeyDown нужно брать в Events Form1?

[Waqq]

А OnKeyDown нужно брать в Events Form1?

Да там. Но если ты создал форму на API то надо в функцие WinMain прописать в конце примерно такой код

      if IsKeyDown(VK_ESCAPE) then
        finished := True;

[Beermonza]

Сообщение от Олександр17

Где у delphi 7 нужно прописать код ALT+X чтоби у любой момент при нажатии етих клавиш виходило из проги???

Да в Events формы на OnKeyDown:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  // Shift из набора: ssShift, ssAlt, ssCtrl, ssLeft, ssRight, ssMiddle, ssDouble
  If (Key = Ord('X')) And (ssAlt in Shift) then
    Begin
      // тут операции или процедуры, сработающие на Alt+X
    end;
end;

[Олександр17]

спасибо. Очень помогло...