Скачать: CL | DM;

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 и последующей установки его экземпляра на форму умалчиваемые свойства не применяются, а только выделяются жирным шрифтом (как изменённые). Когда я их меняю вручную на умалчиваемые, которые я ставил, жирный шрифт убирается. Но мне нужно, чтобы умалчиваемые свойства применялись по умолчанию автоматически.
ЗЫ: В процедуре-конструкторе тоже пробовал менять на умалчиваемое, но эффект тот-же. Может у кого было такое же и как с этим справиться?

---

← →
panov ©   (2005-04-23 19:54) [3]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.023 c