À©µµ¿ì ÇÁ·Î±×·¡¹Ö ÀÚ·á

HomePage Backward Forward Post Reply List
Delete Modify
  Á¦¸ñ   [Delphi] ´ÜÃàÅ° 1998/11/28 (11:38)
À̸§ ±èÈ¿¿ø
¹øÈ£ 70
Á¶È¸ 555
º»¹® F2Å°¸¦ ´©¸£¸é FormÀÌ Á¾·áµÇ´Â ¿¹Á¦.

FormÀÇ KeyPreview¸¦ True·Î ¼³Á¤

OnKeyDown, OnKeyUp, OnKeyPress À̺¥Æ®·Î
¸ðµç Å° ´­¸²À» ÀÚµ¿ÀûÀ¸·Î º¸³½´Ù.

procedure TForm1.FormKeyDown(Sender:TObject;
var Key; Word;
Shift:TShiftState);
begin
if Key=VK_F2 then
 Close
end;


HomePage Backward Forward Post Reply List
1998 by swindler