Текущий архив: 2003.05.15;
Скачать: CL | DM;

Вниз

Вопрос по 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 ;)

---

← →
Юрий Зотов ©   (2003-05-03 19:33) [3]

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

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

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

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

---

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

Текущий архив: 2003.05.15;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.02 c