Hi Leute,
ich per Buttonklick einen Ordner öffnen. Geht das?

Zitat von gordon freeman:

Hi Leute,
ich per Buttonklick einen Ordner öffnen. Geht das?

Was meinst Du denn mit "Ordner öffnen"? Einen Ordner aus dem Aktenschrank?

Ich hab einen Ordner auf der Festplatte, dessen Pfad mir bekannt ist. In diesem Ordner sind .Doc Dateien. Da Delphi ja Doc-Dateien mit integrierten Bildern nicht anzeigen kann?! habe ich mir gedacht, dass der Benutzer den Ordner geöffnet bekommt und nur noch die Datei mit seinem Micro$oft Word öffnen muss. Dazu muss der Ordner jedoch zur Laufzeit geöffnet werden.

Zitat von gordon freeman:

.... Dazu muss der Ordner jedoch zur Laufzeit geöffnet werden.

Öffne ihn doch einfach im Explorer. Oder meinst Du genau das?

So:
ShellExecute(Application.Handle,PChar("explore"),PChar(DeinPfad),PChar(""),PChar(DeinPfad),SW_SHOW); Wenn du nicht den Explorer sondern eine normale Ordneransicht willst dann so:
ShellExecute(Application.Handle,PChar("open"),PChar(DeinPfad),PChar(""),PChar(DeinPfad),SW_SHOW);

DANKE

Oder so:

markieren

Delphi-Quellcode:

procedure TForm1.Button4Click(Sender: TObject);
var
 ordner : String;
begin
  ordner := 'c:\Programme';
  ShellExecute(application.handle,'open',PChar(ordner),nil,nil,sw_shownormal);
end;

Das kommt wenn man zum ersten Mal ShellExecute verwendet...da kann man ja auch nil nehmen

ZU Hasue funzt et leider nicht. Da benutze ich Delphi 4! kann es sein das "Shell" noch nicht in Delphi 4 implementiert ist? Ich soll es nämlich definieren, aber wie?

Hast du vielleicht
uses ShellAPI; vergessen?