\
TList *lst = new TList();
// бла - бла
TLabel *lab = new TLabel(this);
lab->Caption = "YFPDFYBT";
lab->Parent = this;
lab->Top = Y;
lab->Left = X;
lab->Visible = 1;
lst->Add((void*)lab);
// бла - бла
TList *l = (TList *)lst->Items;
delete l;
Добавление обьектов в форму во время работы програмы...
Пробовал делать ниччё не получилося...
Цитата:
Originally posted by ZEREN
Как мене зделать так, чтобы во время работы программы я создавал обьект - например TLabel, и он был на форме TForm1?, Когда это один обьект - нормально,.. я его создал, спрятал, а потом когда надо достал,... А если мене надо таких обьектов достать штук СТО!!! и што мене их мышкой кликать, доставать??? за..мучаюся однако,... Хотелося бы связанным списком,.. или двухсвязным списком...
Пробовал делать ниччё не получилося...
Как мене зделать так, чтобы во время работы программы я создавал обьект - например TLabel, и он был на форме TForm1?, Когда это один обьект - нормально,.. я его создал, спрятал, а потом когда надо достал,... А если мене надо таких обьектов достать штук СТО!!! и што мене их мышкой кликать, доставать??? за..мучаюся однако,... Хотелося бы связанным списком,.. или двухсвязным списком...
Пробовал делать ниччё не получилося...
И что же ты пробовал делать?
Код:
в общих чертах
Цитата:
Originally posted by Fazil6
И что же ты пробовал делать?
в общих чертах
И что же ты пробовал делать?
Код:
\
TList *lst = new TList();
// бла - бла
TLabel *lab = new TLabel(this);
lab->Caption = "YFPDFYBT";
lab->Parent = this;
lab->Top = Y;
lab->Left = X;
lab->Visible = 1;
lst->Add((void*)lab);
// бла - бла
TList *l = (TList *)lst->Items;
delete l;
TList *lst = new TList();
// бла - бла
TLabel *lab = new TLabel(this);
lab->Caption = "YFPDFYBT";
lab->Parent = this;
lab->Top = Y;
lab->Left = X;
lab->Visible = 1;
lst->Add((void*)lab);
// бла - бла
TList *l = (TList *)lst->Items;
delete l;
в общих чертах
БОЛЬШОЕ СПАСИБА !!!
работает!!!
Я просто не знал про такую фишку как Листы...
Буду знать...
Цитата:
Originally posted by ZEREN
БОЛЬШОЕ СПАСИБА !!!
работает!!!
Я просто не знал про такую фишку как Листы...
Буду знать...
БОЛЬШОЕ СПАСИБА !!!
работает!!!
Я просто не знал про такую фишку как Листы...
Буду знать...
Ошибочка....
должно быть
Код:
// бла - бла
TLabel *l = (TLabel *)lst->Items;
delete l;
TLabel *l = (TLabel *)lst->Items;
delete l;
:D
Цитата:
Originally posted by Fazil6
:D
Код:
// бла - бла
TLabel *l = (TLabel *)lst->Items;
delete l;
TLabel *l = (TLabel *)lst->Items;
delete l;
:D
delete l это не лишнее?
Цитата:
Originally posted by rostyslav
delete l это не лишнее?
delete l это не лишнее?
Как это лишнее? Это обязательное. Это в крови должно быть.
Цитата:
Originally posted by Fazil6
Как это лишнее? Это обязательное. Это в крови должно быть.
Как это лишнее? Это обязательное. Это в крови должно быть.
если delete l вызываешь в конце работы, для каждого элемента списка, то ты прав. TList не удаляет объекты, на которых указывают его элементы.
но входе работы delete l убирает метку с формы и lst->Items указывает на недействитеьный адрес.
Цитата:
Originally posted by rostyslav
если delete l вызываешь в конце работы, для каждого элемента списка, то ты прав. TList не удаляет объекты, на которых указывают его элементы.
но входе работы delete l убирает метку с формы и lst->Items указывает на недействитеьный адрес.
если delete l вызываешь в конце работы, для каждого элемента списка, то ты прав. TList не удаляет объекты, на которых указывают его элементы.
но входе работы delete l убирает метку с формы и lst->Items указывает на недействитеьный адрес.
Как и когда удалять - это разработчик должен решать, но раз сделал new будь добр сделать delete