Drivebombo- und DirectoryListbox "vorbefruchten"

[padavan]

danke schön, habe beide Varianten ausprobiert. Klappt wunderbar.

für eine DirectoryListbox hab ich´s dann so gelöst.

Delphi-Quellcode:

procedure TForm1........(Sender: TObject);
var s: string;
    l: integer;
begin
    try
      l := length(Label1.Caption);
      s := Label1.Caption;
      delete(s,l+1,255);
      DirectoryListBox1.Directory := s;
    except
    end;
end;