TSelectDirExtOpts (Selectdirectory-Dialog)

[ichbins]

Was du meinst sind die selectdiropts, die gibts in 2005 auch noch und zu denen steht auch in der Onlinehilfe was.

Aber ich verwende ja die zweite Variante der überladenen Funktion.

Trotzdem danke für den Tipp, eigentlich hätte ich selbst da draufkommen müssen



Jetzt gehts jedenfalls:

Delphi-Quellcode:

function selectfolder(caption,root,dir:string):string;
var
  path:string;
begin
  if selectdirectory(caption,root,path,[filectrl.sdNewFolder,filectrl.sdNewUI],nil) then
    result:=path
  else
    result:='';
end;