как найти компонент

← →
desc (2007-01-31 15:53) [0]

with TPanel.Create(self) do begin Name:="aaa"; ........ end;
Если так создаю компонент, то как потом по имени обратиться?
Или как, вообще, его найти?

← →
Efir (2007-01-31 15:58) [1]

FindComponent

← →
Сергей М. © (2007-01-31 16:00) [2]

> как потом по имени обратиться?

"Потом" - это когда ?
В обработчике какого события какого объекта ?

← →
desc (2007-01-31 16:11) [3]

Потом - это когда я уже "не в with".

>> FindComponent
да вот что-то ошибку дает

Хотя проверил - работает это:

procedure TForm1.Button1Click(Sender: TObject); begin with TPanel.Create(self) do begin Parent:=self; Name:="aaa"; Visible:=True; end; end; procedure TForm1.Button2Click(Sender: TObject); begin TPanel(FindComponent("aaa")).Width:=TPanel(FindComponent("aaa")).Width+50; end;

буду разбираться.........

> проверил - работает это

Потому что в теле Button1Click и Button2Click self"ом выступает один и тот же объект

как найти компонент Найти похожие ветки