Delphi - [решено] Проблемы при создании объекта TImage из программы (не показывается рисунок)

Serega · Конфигурация компьютера

Цитата Dock1100:

но есть одна проблема: Рисунок не виден »

Необходимо указать Parent, т.е.:

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
  img: TImage;
begin
  img:= TImage.Create(Form1);
  with img do
    begin
      SetBounds(50, 50, 20, 20);
      Picture.LoadFromFile('D:\1.bmp');
      Proportional:= True;
      Parent:= Form1;
    end;
end;

Dock1100 · Отправлено: **19:09, 23-11-2009** | #3

Помогло спасибо.