procedure TForm1.FormCreate(Sender: TObject);
begin
keypreview := true;
end;
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if((ssalt in shift) and (key = VK_F4)) then
key := 0;
end;
에서요
ssalt가 의미하는 바가 Alt키가 눌러졌을때를 의미하더라구요..
그럼 in Shift가 의미하는 바를 모르겠구요..
key := 0 이 어떻게 동작하는지도 모르겠네요..
아무래도 이 부분이 종료를 못하게 하는거 같긴한데요..정확하게 잘 모르겠네요..
답변 부탁 드립니다.
key := 0; 라는 것은 키값을 null 상태로 바꿔주는 겁니다.
좀 더 쉽게 말하면 입력된 키보드의 키 값을 #0으로 지움으로써
키가 눌리지 않은 것처럼 인식처리하는 거지요~