Здравствуйте, Sinclair, Вы писали:
S>Здравствуйте, KBH, Вы писали:
S>Так вот, оператор
S>AnObject is AClass
S>проверяет, является ли класс объекта AnObject потомком класса AClass. Возвращает true если так. S>S>if Sender is TLabel then TLabel(Sender).Caption:= 'Vow';
S>
Опять-таки F1 помогает:
if Sender.InheritsFrom(TLabel) then TLabel(Sender).Caption := 'Vow';
При использовании динамической линковки с bpg(это я про Билдер) никаких проблем не возникает...