Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Mustangpeak - VirtualShellTools (https://www.delphipraxis.net/158507-mustangpeak-virtualshelltools.html)

ATS3788 20. Feb 2011 09:59

Mustangpeak - VirtualShellTools
 
Hallo
wie kann ich bei der Komponente
TVirtualExplorerTreeview (Mustangpeak - VirtualShellTools) das
Verzeichnis und/oder Laufwerk
auslesen.

Die Tools sind ja mal so was von mächtig,
gibt es da vielleicht ein Manual dazu.

Wahrscheinlich suche ich mal wieder nicht
an der richtigen Ecke

ATS3788 20. Feb 2011 12:47

AW: Mustangpeak - VirtualShellTools
 
Ja ich habe mal wieder den sprichwörtlichen Wald nicht gesehen

Delphi-Quellcode:
procedure TNewGetFile.VirtualExplorerTreeviewFocusChanged(
  Sender: TBaseVirtualTree; Node: PVirtualNode; Column: TColumnIndex);
var
  OldCursor: TCursor;
begin
  OldCursor := Screen.Cursor;
  Screen.Cursor := crHourglass;
  try
   BuEject.Caption := VirtualExplorerTreeview.SelectedPath;

    VirtualShellAutoComplete.CurrentDir := VirtualExplorerTreeview.SelectedPath;
    VirtualShellAutoComplete.Refresh;
    LB.Items := VirtualShellAutoComplete.Strings;
  finally
    Screen.Cursor := OldCursor
  end
end;
vielleicht hilft das mal jemand anderem


Alle Zeitangaben in WEZ +1. Es ist jetzt 22:52 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