Wie öffnet man Windows Explorer, wenn ich auf eine Schaltfläche klicke?

Question

Ich habe ein Formular in einem Delphi-Projekt. Es gibt einen Knopf auf dem Formular. Wenn der Benutzer auf die Schaltfläche klickt, möchte ich, dass Windows Explorer geöffnet wird.

Welchen Code benötige ich, um dies zu erreichen?

Answer 1

Versuchen Sie folgendes:

ShellExecute(Application.Handle, nil, 'explorer.exe', nil, nil, SW_NORMAL); 

Sie werden ShellAPI auf Ihre verwendet Klausel hinzufügen müssen.

Answer 2

Aufbauend auf Mason Wheeler sagte: Sie auch in einem Verzeichnis als Argument übergeben können, das Fenster zu einem Nicht-Standard-Speicherort zu öffnen, zu erhalten:

uses 
    ShellAPI; 

... 

    ShellExecute(Application.Handle, 
    nil, 
    'explorer.exe', 
    PChar('c:\'), //wherever you want the window to open to 
    nil, 
    SW_NORMAL  //see other possibilities by ctrl+clicking on SW_NORMAL 
    ); 

Answer 3

Nun, wenn Sie brauchen, um einige wählen bestimmte Datei im Explorer ich habe die folgende Funktion, die ich verwenden

procedure SelectFileInExplorer(const Fn: string); 
begin 
    ShellExecute(Application.Handle, 'open', 'explorer.exe', 
    PChar('/select,"' + Fn+'"'), nil, SW_NORMAL); 
end; 

und Sie können es nennen:

SelectFileInExplorer('C:\Windows\notepad.exe'); 

EDIT: Wie bereits erwähnt ShellAPI muss

Answer 4

Nach http://msdn.microsoft.com/en-us/library/bb762153%28VS.85%29.aspx zu Ihrer uses-Liste hinzugefügt werden, ShellExecute unterstützt auch die ‚erforschen‘ Verb, das ‚erkundet‘ ein Ordner von lpFile angegeben, so sollte diese Arbeit:

ShellExecute(Application.Handle, 'explore', '.', nil, nil, SW_NORMAL);