Установка свойств компонента по умолчанию

← →
Konstantionov (2003-04-30 01:46) [0]

Создаю компонент, к примеру потомок TLabel.
Пытаюсь изменить шрифт, используемый по умолчанию и добавить несколько
своих свойств, но больше не до чего не додумался, кроме как написать:

public constructor Create(AOwner: TComponent); override; ... constructor TMyCustomLabel.Create(AOwner: TComponent); begin inherited Create(AOwner); ControlStyle := ControlStyle + [csOpaque, csReplicatable]; Width := 65; Height := 17; FMyProperty := 50; Font.Name := "Arial Black"; end;
почему не работает default в объявлении свойства MyProperty?

type TMyLabel = class(TLabel) private FMyProperty:integer; procedure SetMyProperty(Value:integer); published property MyProperty:integer read FMyProperty write SetMyProperty default 50; end;
можно ли применить default к свойству Font.Name?

нутром чувствую - написал лажу!

Нужен ли деструктор?
Что будет, если указанного шрифта не окажется в системе? (Мне нужен любой True Type)

извините за ламерство и сумбурное изложение.

← →
default (2003-04-30 01:55) [1]

прописывай умалчиваемые значения в конструкторе
директива "default" означает нечто другое - см. Дельфёвый хелп
(это означает что при совпадении св-ва со значением после default-а оно не будет сохранено в .dfm)

← →
Навичек (2003-04-30 03:47) [2]

default сообщает коду поточной обработки что значние этого свойства настраивается кодом инициализации компонента (т.е. в create)

деструктор то тебу зачем
есть простое правило если ты сам создаешь объект то должен сам его и уничтожить.... используй free или freeandnil(освобождает память + устанавливает все ссылки на объект в nil)...... а деструктор нужен если ты при жизненном цикле компонента используешь какойнить ресурс.... тогда его стоит использовать.... при использовании метода free вызывается деструктор так что зачем те его делать

Установка свойств компонента по умолчанию Найти похожие ветки