OnlyNumber Delphi/간단하게 간단하게 Edit에서 숫자만 입력 받기 procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin // 0~9, 백스페이스, 엔터만 입력 허용 if not (Key in ['0'..'9', #8, #13]) then begin Key := #0; end; end; 이전 1 다음