openpicturedialog .. kleines Problemchen

[NoXeno]

Hallo,

steh hier auf den Schlau. Ich hab nen openpicturedialog, möchte dass er aber immer von dem initialdir anfängt. Mach er hier aber nicht, er startet da, wo ich das letzte bild geöffnet habe.

Kann mir jemand hierzu etwas Nachhilfe geben

Code:

procedure TForm1.Button1Click(Sender: TObject);
begin
    openpicturedialog1.InitialDir:=ExtractFilePath(Application.ExeName);
    IF openpicturedialog1.Execute THEN
    BEGIN
         image1.picture.loadfromfile(openpicturedialog1.filename);
    END;
end;