Форум: "Основная";
Текущий архив: 2003.06.30;
Скачать: [xml.tar.bz2];
Вниз
Или глюк с TShellTreeView или я чегото не понимаю. Найти похожие ветки
← →
Reanimator (2003-06-18 22:20) [0]Очень интерестный глюк у меня тут происходит.
Имеется на форме ТShellTreeView, вот он то и работает странно. Он отображает корневую папку а под ней содержимое конечной. Тоесть если задать свойство Root дапустим C:\Program Files\Borland\Delphi7 то в дереве я вижу папку Program Files а под ней содержимое папки Delphi7.
Вот так приблизительно:
Program Files
|--[+]Bin
|--[+]Demos
|--[+]Doc
|--[+]Help
|--[+]Imports
|--[+]Lib
|--[+]Objrepos
|--[+]Ocx
|--[+]Projects
|--[+]Rave5
|--[+]Source
А поидее вместо Program Files должна быть папка Delphi7
Что за бред? И как его лечить ?
← →
Ученик (2003-06-18 22:54) [1]{ Demos\ShellControls\ShellCtrls.pas }
procedure TCustomShellTreeView.CreateRoot;
...
Text := {ExtractFileName(}GetDisplayName(DesktopShellFolder,
TShellFolder(Data).AbsoluteID,
SHGDN_FORPARSING){)};
...
← →
Reanimator (2003-06-19 01:15) [2]2 Ученик
Огромное спасибо, навел меня на путь истинный,. :)
SHGDN_NORMAL поменял на SHGDN_FORPARSING и ExtractFileName у меня отсутствовал и я его добавил иначе у меня отображался весь путь к заданной папке .
А я уже думал все потеряно. Еще раз спасибо...
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.06.30;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.098 c
