Скачать: CL | DM;

Уважаемые мастера, помогите разобраться с TList !!!!   Найти похожие ветки 

← →
Object   (2005-02-19 12:19) [0]

Уважаемые мастера!!!
Завис - помогите!
Ситуация такая:
По кнопке создаю на форме элементы TPanel, каждый раз с новыми координатами.

var
 IH :  TPanel;
begin
 IH:=TPanel.Create(nil);
 IH.Name := ..
 IH.Caption:=..
 IH.Left:=..
 ....
 ну и т.д.

В type описываю список Pan:TList;  
В формкреэте создаю: Pan:=TList.Create;

Мне нужно, чтобы при создании Panel-и добавлялись в список.
Какой код написать и где?
И как сделать, чтобы ещё каждый раз в Edit выводились элементы списка, чтобы видеть чего там в списке есть.

Заранее благодарю!

---

← →
saNat ©   (2005-02-19 12:25) [1]

Panel в сам список? или ее имя (координаты)?. А в списках есть, например, поле Items. Там можно считать содержимое определенного элемента элемента.

С уважением, ЕВА

---

← →
Юрий Зотов ©   (2005-02-19 12:40) [2]

type
 TForm1 = class(TForm)
 ...
 private
   FPan: TList;
 ...
 end;

В OnCreate формы:
FPan := TList.Create;

В OnDestroy формы:
FPan.Free.

В обработчике OnClick кнопки:
with TPanel(FPan[FPan.Add(TPanel.Create(Self))]) do
begin
 Name := ...;
 Parent := Self;
 ...
 Edit1.Text := Name
end;

---

← →
panov ©   (2005-02-19 15:29) [3]

Поле "Тема вопроса" не оформлено.

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.022 c