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

← →
БурЖуй © (2003-01-22 20:56) [0]

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

← →
Anatoly Podgoretsky © (2003-01-22 21:01) [1]

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

← →
KDenis © (2003-01-22 21:03) [2]

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

← →
Anatoly Podgoretsky © (2003-01-22 21:20) [3]

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

← →
БурЖуй © (2003-01-22 21:36) [4]

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

← →
mrcat © (2003-01-22 21:38) [5]

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

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

← →
Kair © (2003-01-22 21:44) [6]

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

← →
Kair © (2003-01-22 21:47) [7]

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

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

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

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

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

... 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"ы

Программное создание обьектов Найти похожие ветки