SHBrowseForFolder

← →
Керик (2005-04-23 14:08) [0]

Пользуясь сабжом для вызова диалога поиска папки, мне необходимо указать в структуру TBrowseInfo адрес процедуры-обработчика, но при следующем коде на строке lpfn := @DlgProc; компайлер ругается "Variable required":
with BrowseInfo do begin hwndOwner := hParent; lpszTitle := PChar(CaptionText); pszDisplayName := @FNBuffer; lpfn := @DlgProc; end;
DlgProc - это сама процедура. Как правильно записать адрес процедуры в переменную структуры, что компилятор не ругался?

← →
Юрий Зотов © (2005-04-23 14:22) [1]

Покажите объявление DlgProc.

← →
Керик (2005-04-23 19:21) [2]

C этой проблемой я уже справился, но у меня возникла другая: Я создал свой тип вида:
TMyType = (Value1, Value2, Value3);
А потом сделал из него другой тип - набор, например: TXMyType = set of TMyType;
В своём компоненте я пытаюсь у свойства с таким типом сделать default - значение:
property MyType: TXMyType read FXMyType write FXMyType default [Value1, Value3]; Компайлер не ругается, но после компиляци и установки его в Delphi IDE и последующей установки его экземпляра на форму умалчиваемые свойства не применяются, а только выделяются жирным шрифтом (как изменённые). Когда я их меняю вручную на умалчиваемые, которые я ставил, жирный шрифт убирается. Но мне нужно, чтобы умалчиваемые свойства применялись по умолчанию автоматически.
ЗЫ: В процедуре-конструкторе тоже пробовал менять на умалчиваемое, но эффект тот-же. Может у кого было такое же и как с этим справиться?

Керик (23.04.05 19:21) [2] не относится к теме вопроса.

SHBrowseForFolder Найти похожие ветки