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

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

Программное создание обьектов [D6]


БурЖуй ©   (2003-01-22 20:56:00) 

Господа!
Мне нужно создать программно энное количество editов! Причём какое именно количество я не знаю, и место где они будт размещаться, заранее я не знаю. Помогите понять как осуществить добавление на форму этих едитов!
Заранее спасибо!


mrcat   (2003-01-22 22:04:00) [1]

...
var
...
Count_of_edit: integer = 0;
Edit_list: TList;

implementation

procedure TfrmMain.btnMake_editClick(Sender: TObject);
begin
inc(Count_of_edit, 50);
Edit_list.Add(TEdit.Create(self));
{ Заносим в list, шоб удобней юзать }
TEdit(Edit_list[pred(Edit_List.Count)]).Parent := self;
TEdit(Edit_list[pred(Edit_List.Count)]).Top := Count_of_edit;
end;


procedure TfrmMain.FormCreate(Sender: TObject);
begin
Edit_list := TList.Create;
end;

procedure TfrmMain.FormDestroy(Sender: TObject);
var
edit_index: byte;

begin
for edit_index := 0 to pred(Edit_list.Count) do
TEdit(Edit_list.Items[edit_index]).Destroy;
Edit_list.Destroy;
end;


и присваивай каждому объекту TEdit свои Events"ы


Anatoly Podgoretsky   (2003-01-22 21:58:00) [2]

БурЖуй © (22.01.03 21:36)
Вот это другое дело, а то сначала местонахождение неизвестно.
Ну и создавай их с помощью Create, после создания устанавливай их свойства по вкусу, все доступные свойства можно посмотреть или в Object Inspector а их описания в хелпе, там же есть и примеры. Кроме того куча примеров есть в FAQ, Demos да и в самих исходниках VCL

Вот если что конкретно не понятно, тогда задай вопрос, если не сможещь разобраться с помощью выше указанных средств.

А то сейчас это выглядит так, научите меня программировать.


БурЖуй   (2003-01-22 21:53:00) [3]

mrcat, мне нужно будет работать с ними также как и с обычными обьктами. Но и нужно будет к ним как-то по хитрому обращаться, тобишь я ведь не знаю какое имя будет у этого объекта....
Kair, спасиб тебе, хотя зачем ждать до завтра ? :)


Kair   (2003-01-22 21:47:00) [4]

Он же вам "заранее спасибо!" сказал (обратите особое внимание на слово "спасибо").


Kair   (2003-01-22 21:44:00) [5]

Если да завтрашнего вечера ответ не найдёшь, МОЖЕТ БЫТЬ я смогу ответить?
Да скажите ему.


mrcat   (2003-01-22 21:38:00) [6]

БурЖуй © (22.01.03 21:36)
...
создать в зависиомсти от количества параметров необходимое количество едитов!
...


ну создадите Вы их и что дальше? Любоваться ими будете?


БурЖуй   (2003-01-22 21:36:00) [7]

Я имел введу, что у меня в параметрическом файле задано энное количество едитов и ихнее размещенее, мне нужно создать в зависиомсти от количества параметров необходимое количество едитов!


Anatoly Podgoretsky   (2003-01-22 21:20:00) [8]

ScrollBox предназначен для прокрутки


KDenis   (2003-01-22 21:03:00) [9]

<<где они будт размещаться>>
Эту проблему решает ScrollBox


Anatoly Podgoretsky   (2003-01-22 21:01:00) [10]

Первое неважно, создавай сколько хочешь, а вот со вторым ты влетел, что же ты будешь с ними делать, как различать, да и зачем тогда они тебе.


Наверх

Титульная страница Поиск, карта сайта Написать письмо