Windows Suche starten

[DeddyH]

Und wenn Du im Directory-Parameter das Verzeichnis noch einmal angibst?

[Björn Ole]

Du meinst so?
ShellExecute(0, 'find', 'I:\\', nil, 'I:\\', SW_SHOWNORMAL);
Geht leider auch nicht, gleiches Fehlverhalten.

Da muss ich mir wohl was anderes einfallen lassen.
Trotzdem danke für eure Antworten.

[himitsu]

Und wenn du mal einen korrekten Pfad angibst?

In C-Sprachen muß oftmals das \ maskiert werden und wird so zu \\,
wärend dieses in Delphi nicht der Fall ist.

PS: Hier kommt statt der Suche nur ein

Zitat:

[Window Title]
search-ms:crumb=location:C%3A%5C

[Content]
Der Datei ist kein Programm zum Ausführen dieser Aktion zugeordnet. Installieren Sie ein entsprechendes Programm, oder erstellen Sie in der Systemsteuerung unter "Standardprogramme" eine Zuordnung, wenn bereits ein Programm installiert ist.

[OK]

(in "Standardprogramme" finde ich allerdings nichts, was hierzu paßt)


PS: Eventuell gibt es ja auch eine API, um die Suche direkt im eigenem Programm zu nutzen und eine schöne Liste zu bekommen?

[Björn Ole]

Du hast Recht, einfache \ tun es auch. Aber irgendwas ist hier trotzdem faul.

ShellExecute gibt mir den gleichen Fehler (31) wie bei dir zurück, himitsu, aber nur mit diesem Pfad: C:\Users\Bjoern (englisches Windows 7 64bit). Das Explorer-Suchfenster öffnet sich erst gar nicht. Unterordner wie z.B. C:\Users\Bjoern\Desktop öffnen wieder problemlos.

Dieses komische Verhalten hab ich jetzt mal für folgenden Versuch missbraucht:

Versuch 1

Delphi-Quellcode:

ShellExecute(0, 'find', 'C:\Windows', nil, nil, SW_SHOWNORMAL);
// Suchfenster öffnet sich, listet mit * alle Dateien richtig auf

Diese Zeile habe ich dann durch folgende ersetzt, Anwendung neu kompiliert und gestartet.

Delphi-Quellcode:

ShellExecute(0, 'find', 'C:\Program Files\Internet Explorer', nil, nil, SW_SHOWNORMAL);
// Suchfenster öffnet sich, listet aber immer noch alle Dateien aus C:\Windows auf

Versuch 2

Delphi-Quellcode:

ShellExecute(0, 'find', 'C:\Windows', nil, nil, SW_SHOWNORMAL);
// Suchfenster öffnet sich, listet mit * alle Dateien richtig auf

Zeile durch folgende ersetzen, Anwendung neu kompilieren und starten.

Delphi-Quellcode:

ShellExecute(0, 'find', 'C:\Users\Bjoern', nil, nil, SW_SHOWNORMAL);
// Suchfenster öffnet sich nicht, ShellExecute liefert 31 zurück

Zeile durch folgende ersetzen, Anwendung neu kompilieren und starten.

Delphi-Quellcode:

ShellExecute(0, 'find', 'C:\Program Files\Internet Explorer', nil, nil, SW_SHOWNORMAL);
// Suchfenster öffnet sich, listet mit * alle Dateien aus dem Internet Explorer Ordner auf!?

Mir kommt es so vor, als ob hier ShellExecute oder vielleicht sogar die Windows Suche etwas falsch macht ein mir unbekanntes Feature hat. Ich bin jedenfalls mit meinem Latein am Ende.