Bilder in mein Programm laden! Bitte helfen!

[DeddyH]

Und das am besten in einem try-finally-Block.

Delphi-Quellcode:

procedure TForm1.OpenFile(Sender: TObject);
  var o: TOpenDialog;
begin
  o:=TOpenDialog.Create(self);
  try
    if o.Execute then
      Image1.Picture.LoadFromFile(o.FileName);
  finally
    o.Free;
  end;
end;