Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.03.06;
Скачать: 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 вся ветка

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

Наверх




Память: 0.47 MB
Время: 0.071 c
14-1108491536
Fr+++
2005-02-15 21:18
2005.03.06
Небольшой вопрос по PHP


14-1108516196
БаТоН
2005-02-16 04:09
2005.03.06
ПОЧЕМУ foo и bar() ?


14-1108478312
nw
2005-02-15 17:38
2005.03.06
icq и delphi


1-1108643680
Ivolg
2005-02-17 15:34
2005.03.06
Мышь


1-1109071003
mmms
2005-02-22 14:16
2005.03.06
Ребят, подскажите, как можно "таскать" TGroupBox по форме