Einzelnen Beitrag anzeigen

TurboMagic

Registriert seit: 28. Feb 2016
Ort: Nordost Baden-Württemberg
2.942 Beiträge
 
Delphi 12 Athens
 
#1

TBrowseForFolder Abbrechen erkennen

  Alt 5. Jan 2024, 22:24
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
  Mit Zitat antworten Zitat