Laden von .jpg in Listbox funzt net

[SaFu]

Die Bilder müssen aber über das Opendialog in einem dafür angelegten ordner gespeichert werden macht das opendialog das nicht automatisch

bei mir liegen die ordenr in diesem ordner auf den greift dann die FileListbox zu

Delphi-Quellcode:

Bilddat:= ExtractFilePath(ParamStr(0))+'\Bilder\'; //Pfad in Variable übergeben
  FileListBox1.Directory:= Bilddat; //Laden des Ordners aus dem Pfad

muss man da jetzt ein savefile rein schreiben in die procedure

Delphi-Quellcode:

procedure TForm4.Button7Click(Sender: TObject);
begin
if OpenDialog1.Execute then
  FileListBox1.Items.Add(ExtractFileName(OpenDialog1.FileName));
end;

oder muss nicht die Filelistbox sondern der ordner angegeben werden??