Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Automatische Vervollständigung für Verzeichnisse (https://www.delphipraxis.net/169463-automatische-vervollstaendigung-fuer-verzeichnisse.html)

axellang 21. Jul 2012 16:45

Automatische Vervollständigung für Verzeichnisse
 
Hallo an alle,

ich möchte in einer ComboBox, eine automatische Vervollständigung für Verzeichnisse einbauen wie es in Windows unter Ausführen oder in der Adresszeile des Explorers möglich ist.

Also wenn der User C:\ eingibt, soll die ComboBox automatisch alle Verzeichnisse auf C:\ anzeigen. Gibt der User dann z.B. C:\Temp\ ein, soll alles auch die Dateien die in C:\Temp\ drin sind, angezeigt werden.

Gibt es eine API oder Beschreibung dafür? Nach was muss ich da Suchen? Oder der wie kann man das implementieren?

Ich hoffe das meine Beschreibung verständlich war, ansonsten einfach mal in der Adresszeile des Explorers mal C:\ eingeben.


Gruß

Alexander

daywalker9 21. Jul 2012 17:08

AW: Automatische Vervollständigung für Verzeichnisse
 
Ja gibt es:

Delphi-Quellcode:

uses shlwapi;


type
  TDUmmyComboBox = class(TComboBox); //Damit EditHandle Property sichtbar ist


      if not FAutoCompleteSet and (TDummyCombo(cbFilename).EditHandle <> 0) then
        begin
          if S_OK = SHAutoComplete(TDummyCombo(cbFilename).EditHandle, SHACF_FILESYSTEM) then
            FAutoCompleteSet := true;
        end;

axellang 21. Jul 2012 17:14

AW: Automatische Vervollständigung für Verzeichnisse
 
@daywalker9

Danke sehr schön, ähmmm, wie verwende ich es?

Axel

daywalker9 21. Jul 2012 17:32

AW: Automatische Vervollständigung für Verzeichnisse
 
Vor dem Show/ShowModal ruft Du die Funktion
Delphi-Quellcode:
SHAutoComplete
auf.

axellang 21. Jul 2012 19:10

AW: Automatische Vervollständigung für Verzeichnisse
 
Sorry, musste mal kurz weg.

Danke stand auf dem Schlauch :wall:

MSDN-Library durchsuchenSHAutoComplete function

Axel


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:06 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz