TBrowseForFolder Abbrechen erkennen

[TurboMagic]

Hallo,

ich benutze die VCL TBrowseForFolder Action um einen Ordner auswählen zu lassen.
Ich benutze das wie folgt:

Delphi-Quellcode:

var
  nFolder: TBrowseForFolder;
begin
     nFolder:= TBrowseForFolder.Create(nil);
     try
        nFolder.BrowseOptions:= [bifDontGoBelowDomain, bifNewDialogStyle ];
        nFolder.UseFileDialog:= True;
        nFolder.Folder:= nInitFolder;
        if nFolder.Execute then
          SelectedFolder := nFolder.Folder
        else
          Result := false;
     except
        on E: exception do
           begin
              Result := false;
              Exit;
           end;
     end;

nInitFolder ist ein String mit einem evtl. in der letzten Programmsitzung
ausgewählten Ordner.

Nur: drückt der Anwender "Abbrechen", ist if nFolder.Execute trotzdem true,
weil das ja was anderes aussagt. Wie bekomme ich also raus, dass Abbrechen
angeklickt wurde?

Grüße
TurboMagic

[Uwe Raabe]

Dafür gibt es ExecuteResult: http://docwiki.embarcadero.com/Libra....ExecuteResult

[Delphi.Narium]

Suchst Du danach? Use TBrowseForFolder the right way

[TurboMagic]

Zitat von Uwe Raabe:

Dafür gibt es ExecuteResult: http://docwiki.embarcadero.com/Libra....ExecuteResult

Danke, das war der für die Situation passende Lösungsansatz. Den anderen mit dem Event schätze ich natürlich auch,
der hätte aber mehr Änderungen am Programmablauf erfordert.