Вопрос по FindComponent

← →
BLAST © (2003-05-03 19:24) [0]

Методом класса TComponent FindComponent найден объект, тип которого на самом деле TSpeedButton. Каким образом можно "достучаться" до его (TSpeedButton) свойств и методов?

Всем заранее спасиба

Вот такие вот дела
Blast ;)

← →
Morfein © (2003-05-03 19:28) [1]

Например, таким:
var spd : TSpeedButton; begin spd:=FindComponent("SpeedButton1") as TSpeedButton; spd.Caption:="I found it! I found it!"; end;

← →
Blast © (2003-05-03 19:30) [2]

Пасиба ;)

Кому не очень понятна:

(TComponent as TSpeedButton) .

Всем ПАСИБА за внимание ;)

Вот такие вот дела
Blast ;)

Привести к нужному классу (если Вы уверены, что нужный компонент точно будет найден):

with TSpeedButtton(FindComponent("...")) do
begin
...
end;

А если не уверены, то сначала проверьте его класс оператором is, а потом то же самое:

var
Comp: TComponent;
...
Comp := FindComponent("...");
if Comp is TSpeedButtton then
with TSpeedButtton(Comp) do
begin
...
end;

Вопрос по FindComponent Найти похожие ветки