OpenDirDialog.InitialPath при UNICODE

← →
Rocket © (2008-01-17 14:44) [0]

...не работает - всегда выделяется "Мой компьютер". Использую MCK, свойства после помещения TOpenDirDialog на форму оставляю по умолчанию. Версия KOL и MCK - 2.84.

← →
=BuckLr= © (2008-01-17 20:35) [1]

Ага, глюк. Я щас проверил - в юникоде работает паскаль-версия Execute, видимо, тут проблема. Покопайся там... Я тоже пороюсь за компанию :)

← →
=BuckLr= © (2008-01-17 20:38) [2]

Ну всё ясно, ё... Чё ж оно будет работать, если
BI.pidlRoot := nil;

исправь на

BI.pidlRoot := PKOLChar(FInitialPath);

← →
=BuckLr= © (2008-01-17 20:40) [3]

За одним к Владимиру Кладову просьба - замените пожалуйста
(43259)BI.pidlRoot := nil;
на
(43259)BI.pidlRoot := PKOLChar(FInitialPath);

← →
=BuckLr= © (2008-01-17 20:53) [4]

Прошу прощения, разумеецо, надо так:
BI.pidlRoot := PItemIDList( FInitialPath );
описалцо :)

← →
Vladimir Kladov © (2008-01-17 21:13) [5]

А что там насчёт UNICODE_CTRLS? (т.е. для не UNICODE как-то работает?). Ладно, посмотрю в выходные.

← →
=BuckLr= © (2008-01-17 21:31) [6]

> т.е. для не UNICODE как-то работает

Да, потому что для юникода используется паскаль, а для анси - асм. Там, где паскаль, присваивается nil, в асме всё нормально

Заменил на BI.pidlRoot := PItemIDList( FInitialPath ). Теперь в диалоге единственный пункт без названия (или с названием из мусора в памяти) и с плюсом, не раскрывается.

На самом деле причина в колбэк функции OpenDirCallBack.
Юникодному диалогу для смены стартовой директории нужно посылать сообщение BFFM_SETSELECTIONW.

> Теперь в диалоге единственный пункт без названия

Странно... У меня же работало...

> причина в колбэк функции OpenDirCallBack

Спасибо. Попробую так вечером. А то ещё вылезет когда-н то, о чем сказал Rocket :(

OpenDirDialog.InitialPath при UNICODE_CTRLS... Найти похожие ветки