Проблема с созданием класса

[stragedog]

я начинающий,проблема такая:есть главная форма Form1.
Дочерняя форма Form2.
Нужно создать модуль класса Form3 такой чтобы:
TForm3=class(TImageEnVect)
при открытии OpenDialog он загружал в форму Form2 картинку (TImageEnVect компонент что-то типа картинки )
Вопросы:
Что неправильно в коде?
(ошибку пишет: Method 'Create' hides virtual method of base type 'TImageEnVect'):
constructor TForm3.Create(AOwner: TComponent;CanCloseFromForm:boolean =true; Name:ShortString=''; X: Integer=10; Y: Integer=10; Width: Integer=700; Height: Integer=700);
var i:Byte;
begin
inherited Create(AOwner);
Self.ObjGraphicRender:=True;
Self.OnNewObject:=IENewObjectN;
Self.Left:=X;
Self.Top:=Y;
Self.Width:=Width;
Self.Height:=Height;
SechForm:=TList.Create;
Self.Proc.AutoUndo:=True;
Self.Name:=Name;
if Name<>'' then
begin
KadrForm:=TKadrForm.Create(AOwner);
KadrForm.CanCloseFromForm:=CanClose FromForm;
KadrForm.Caption:=Name;
KadrForm.Kadr:=Self;
Self.Parent:=KadrForm;
Self.Align:=alClient;
Self.GripPen.Style := psSolid;
Self.GripPen.Color:=clAqua;
Self.GripBrush.Style := bsclear;
Self.GripSize:=5;
Self.MouseInteractVt:=[miObjectSelect];
Self.OnZoomIn:=Form2.NewZoom;
Self.OnZoomOut:=Form2.NewZoom;
end;
end;


И еще: как назначить компоненту vSpinEdit1Change метод по обработке изменения масштаба этой самой картинки.
Пишу такое (но вылазит баг):
procedure TForm2.JvSpinEdit1Change(Sender: TObject);
begin
TForm3(Form3).Zoom := JVSpinEdit1.Value;
end;

procedure TForm2.NewZoom(Sender: TObject; var NewZoom: Double);
begin
JVSpinEdit1.Value:=Round(NewZoom);
end;

в чем ошибка?

[stragedog]

И еще: как назначить компоненту vSpinEdit1Change метод по обработке изменения масштаба этой самой картинки.
Пишу такое (но вылазит баг):
procedure TForm2.JvSpinEdit1Change(Sender: TObject);
begin
TForm3(Form3).Zoom := JVSpinEdit1.Value;
end;

procedure TForm2.NewZoom(Sender: TObject; var NewZoom: Double);
begin
JVSpinEdit1.Value:=Round(NewZoom);
end;
может кто ПОМОЧЬ??