다음문장을 만들고 델파이 lib에 저장한후 install component를 하고
compiler라는 버튼을 누르면 아래에 표시한 부분에 error가 나는데
그 이유를 좀 알려주세요

unit EnterDb;
interface
uses
    sysutils, wintypes, winprocs, messages, classes, graphics,
    controls,forms,dialogs,stdctrls,dbctrls;

type
    TEnterDbEdit = class(TDBEdit)

protected
    procedure Keypress(var key :char);override;
    procedure KeyDown(var key :Word; shift:TShiftState);override;

public
published
end;

procedure register;

implementation

procedure register;
     begin
          registerComponents('Samples',[TEnterDbEdit]);
     end;

procedure TEnterDbEdit.KeyPress(var key:char);
var
   MyForm:TForm;
   begin
        if key = #13 then begin

error******>>>  MyForm := GetParentForm(self);

           if not (MyForm = nil) then
                  SendMessage(myForm.Handle,wm_nextdlgctl,0,0);
                  key := #0;
        end;
        if key <> #0 then inherited KeyPress(Key);
   end;

procedure TEnterDbEdit.KeyDown(var key:word;shift:TShiftState);
var
   MyForm:TForm;
   CtlDir:Word;
begin
     if(Key=VK_UP) or (Key=VK_DOWN) then
        begin

error******>>> MyForm := GetParentForm(self);

             if Key = VK_UP then CtlDir := 1
             else CtlDir := 0;

             if not(MyForm=nil) then
                SendMessage(MyForm.Handle,WM_NEXTDLGCTL,CtlDir,0);
        end
     else inherited keydown(key,shift);
end;

end.