Thema: Delphi Grafik in TImage laden

Einzelnen Beitrag anzeigen

Benutzerbild von dahead
dahead

Registriert seit: 16. Mai 2005
620 Beiträge
 
#2

Re: Grafik in TImage laden

  Alt 29. Nov 2005, 16:10
ja.

du kannst entweder den normalen TOpenDialog oder den TOpenPictureDialog verwenden.

das ganze funktioniert so ähnlich:

Delphi-Quellcode:
var
  OD: TOpenDialog;
begin
  OD := TOpenDialog.Create(Self);
  with OD do
   begin
    OD.Title := 'Datei auswählen...';
    OD.Filter := 'Bitmaps (*.bmp)|*.bmp|Jpeg-Dateien (*.jpg)|*.jpg'; // usw.
    OD.InitialDir := GetCurrentDir; // Öffnen-Pfad = Aktuelles Verzeichnis
    if OD.Execute then // Wenn geöffnet, dann
     Image1.Picture.LoadFromFile(Filename); // Bild in Image1 laden
   end;
  OD.Free; // Dialog wieder aus Speicher entfernen
end;
  Mit Zitat antworten Zitat