Как поставить компонент на другой компонент

[Heng]

Пытаюсь вытащить созаный Класс типа Edit На Image, но он не появляется
как исправить ?

Var
Text:TEdit;
begin
   Text:=TEdit.Create(img1);
   Text.Height:=strtoint(edt1.text);
   Text.Width:=strtoint(edt1.text)*5;
   Text.Left:=x;
   Text.Top:=y;
   img1.InsertComponent(Text);
end;

[Аватар]

Во-первых не задаете Parent
Во-вторых и это не поможет - Image не может быть контейнером для других контролов

[Heng]

Сообщение от Аватар

Во-первых не задаете Parent
Во-вторых и это не поможет - Image не может быть контейнером для других контролов

Ясно, сделал на PictureBox, а теперь как удалять предыдущий при создании нового ???
Сделать как проверку на нахождение объекта на форме, если он на форме то .Destroy иначе создаем новый объект

[Heng]

Проблема решена, Но появилась новая, не рисует текст который я ввожу в созданный Edit

 TextItem - это переменная которая = 1 если создан Edit и 0 если нет

if (btn3.Down = true) then    
  begin
   if TextItem = 1 then begin
     img1.Canvas.TextOut(x,y,Text.Text);
    scrlbx1.Components[0].Destroy; TextItem:=0;
    end;
   Text:=TEdit.Create(scrlbx1);
   Text.Height:=strtoint(edt1.text);
   Text.Width:=strtoint(edt1.text)*5;
   Text.Left:=x;
   Text.Top:=y;
   scrlbx1.InsertControl(Text);
   TextItem:=1;
  end;