SelectDirectoryDialog

[ratmalwer]

I try to preset the path before SelectDirectoryDialog. the following code is not correct but shows what I try to do.
any hints?

Code: Pascal  [Select][+][-]

1. procedure TForm1.btnQuellpfadClick(Sender: TObject);
2. var dir: string;
3. begin
4.   dir := 'p:\somepath';
5.   if SelectDirectoryDialog1.Execute then
6.     begin
7.       EditQuellpfad.Caption := SelectDirectoryDialog1(dir).FileName;
8.     end;
9.  
10. end;

[molly]

try SelectDirectoryDialog1.InitialDir := 'initialdir' before calling execute, see also here.

[ratmalwer]

Thanks... that works good.

Unforunately the scrollbar does not move down to the selected directory (or the list does not rise) ....
is there an option to do that too?
(using Windows7)

[molly]

tbh i have no idea. It might be that the OS widget is not capable of doing so.