| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

как найти компонент [D6, WinXP]

desc ©   (2007-01-31 15:53:00) 

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

---

Сергей М.   (2007-01-31 16:14:00) [1]

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


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

---

desc   (2007-01-31 16:11:00) [2]

Потом - это когда я уже "не в 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;

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

---

Сергей М.   (2007-01-31 16:00:00) [3]

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


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

---

Efir   (2007-01-31 15:58:00) [4]

FindComponent

---

Наверх