Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.11.13;
Скачать: [xml.tar.bz2];

Вниз

Как сделать массив обьектов?   Найти похожие ветки 

 
Anonim-777   (2003-10-28 21:16) [0]

Хотел бы узнать как динамически управлять большим количеством кнопок или EDIT"ов? Например нужно сделать 22 кнопки или 15 потоков...
Тоесть я хоте спросить как и как правильно работать с массивами обьестов?
Спасибо.


 
Makhanev A.S.   (2003-10-28 21:35) [1]

TObjectList


 
Anonim-777   (2003-10-28 21:54) [2]

А где это в 7-ой версии? Где можно взять описание этого типа?
А просто массивом можно?


 
Zacho   (2003-10-28 22:09) [3]


> Anonim-777 (28.10.03 21:54) [2]
> А где это в 7-ой версии?

Поищи в файлах, находящихся в $(DELPHI)\SOURCE\ строку TObjectList и узнаешь. Или в хелпе посмотри.

> Где можно взять описание этого типа?

В хелпе.

> А просто массивом можно?

Можно. Например так:
procedure TForm1.Button1Click(Sender: TObject);
var
a:array[0..10] of TEdit;
i:integer;
begin
for i:=0 to 10 do a[i]:=TEdit.Create(Self);
end;


 
Anonim-777   (2003-10-28 22:13) [4]

Огромное спасибо, а может кто-то рассказать в чём преимущества TObjectList?


 
Юрий Федоров   (2003-10-28 23:38) [5]

Преимущества в
1. наличии методов Add, Insert, Delete, Sort
2. автоматическом оссвобождении объектов при очистке списка


 
Makhanev A.S.   (2003-10-29 01:48) [6]

TObjectList maintains a list of (owned) objects.

Unit

Contnrs

Description

Use TObjectList to store and maintain a list of objects. TObjectList provides properties and methods to add, delete, rearrange, locate, access, and sort objects. If the OwnsObjects property is set to True (the default), TObjectList controls the memory of its objects, freeing an object when its index is reassigned; when it is removed from the list with the Delete, Remove, or Clear method; or when the TObjectList instance is itself destroyed.


 
Anonim-777   (2003-10-31 00:06) [7]


> procedure TForm1.Button1Click(Sender: TObject);
> var
> a:array[0..10] of TEdit;
> i:integer;
> begin
> for i:=0 to 10 do a[i]:=TEdit.Create(Self);
> end;


Если так сделать, то Едиты не видны...


 
default   (2003-10-31 00:12) [8]

на этом сайте статья про это есть


 
Anonim-777   (2003-10-31 00:21) [9]

где?


 
default   (2003-10-31 00:26) [10]

млин, в разделе "Статьи" посмотри


 
Zacho   (2003-10-31 00:30) [11]


> Anonim-777 (31.10.03 00:21) [9]

http://www.delphimaster.ru/articles/components-rt.html



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

Форум: "Основная";
Текущий архив: 2003.11.13;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.033 c
1-41543
TSa
2003-10-20 00:37
2003.11.13
Просмотр ДОС


1-41632
Matrex
2003-10-25 21:29
2003.11.13
RichEdit


1-41688
karburator
2003-11-03 13:02
2003.11.13
Поток


3-41001
KIR
2003-10-16 11:03
2003.11.13
При запуске UDF разрывается коннект с базой...?!


4-42224
dolmat
2003-09-02 16:37
2003.11.13
Создание раздела в реестре





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский