Como criar TIMAGE em tempo de execução?

procedure TForm1.LImagemClick(Sender: TObject);
begin
  with TImage.Create( Form1 ) do
    begin
      Parent  := Form1;
      Left    := 112;
      Top     := 32;
      Width := 273;
      Height := 257;
      Stretch := True;
  if OpenPictureDialog1.Execute then
  Picture.LoadFromFile(OpenPictureDialog1.FileName);
  Visible := True;
  end;
end;