Class Tmyedit is not applicable to module 是什麼問題？


 我把新的控件放到form時出現上面問題，不知道是什麼問題呀？  這個控件的代碼非常簡單：如下：
unit myedit;
interface
uses
  SysUtils, Classes, QControls, QStdCtrls;type
  Tmyedit = class(TEdit)
  private    { Private declarations }
  protected
    { Protected declarations }
  public
    { Public declarations }
   Constructor Create(AOwner:TComponent);Override;
  published
    { Published declarations }
    
  end;procedure Register;implementationprocedure Register;
begin
  RegisterComponents('Samples', [Tmyedit]);
end; Constructor Tmyedit.Create(AOWner:TComponent);
Begin
  Inherited Create(AOwner);
End;
end. 謝謝大家