답변주신것 감사합니다. 그런데, 제가 클래스를 잘못 넣었네요. TEdit 입니다.
TEdit 를 보니, OnKeyDown, OnKeyUp 종류들은 property로 되어 있어 제가 어떻게
기능들은 재정의 해서 사용할수 있을까 했었는데, 답을 얻었습니다. 함수 원형이
TWinControl 클래스 안에 들어 있더군요. ^^;;;
저와 같이 실수 하지지 마세요.
선언부에
published
{ Published declarations }
procedure KeyPress(var key : Char);override;
procedure KeyDown(var Key: Word; Shift: TShiftState); override;
procedure KeyUp(var Key: Word; Shift: TShiftState); override;
정의하시구요.
구현부에
procedure TPWEdit.KeyDown(var Key: Word; Shift: TShiftState);
begin
inherited KeyDown(Key,Shift);
end;
.
.
.
동일하게 하시면 기능을 모두 상속받고, 아래에 기능들을 덧 붙일 수 있습니다. ^^
|