SHBrowseForFolder - Wie ändert man das Window-Caption?

[GeorgPeifer]

Danke schonmal für die Tipps. Die fldrbrowser-Unit sieht schonmal gut aus, wegen der Filterfunktion. Bei mir funktioniert das Teil leider nicht - Es öffnet sich gar kein Dialog. Intern ist pidlResult sofort auf Nil.

Mein Aufruf:

Code:

procedure TForm2.BitBtn1Click(Sender: TObject);     //Dialog für die Pfadsuche oeffnen
var fb:TFolderBrowser;
    hwndDlg: HWnd;
begin

  fb := TFolderBrowser.Create(hwndDlg,'Bitte wählen Sie einen Ordner',edit4.text,FALSE,FALSE  );
  if(fb <> nil) then
  try
     if(fb.Execute) then begin
        Verzeichnis:=fb.SelectedItem;
        Edit4.Text:=Minimizename(Verzeichnis+'\',canvas,edit4.width);
        ComboBox1.Setfocus;
        if Verzeichnis [length(Verzeichnis)]<>'\' then Verzeichnis:=Verzeichnis+'\';
     end;
  finally
     fb.Free;
  end;
end;

Mein Hauptproblem is aber eh die Beschriftung der Tasten und des Fensters selber - und das WindowCaption ist eben nicht lpszTitle.

@Christian Seehase - ja, ich habe bereits die Suchfunktion mit SHBrowseForFolder benutzt, aber ich fand keine Lösung für mein Problem