|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
Динамическая форма
Всем привет.
У меня есть динам. массив (к примеру Form1: array of TForm1) который хранит в себе образец формы, к примеру TForm1 Так же у меня есть лист бокс, один эелемент лист бокса= 1 форма, дабл клик по элементу и форма создается и затем открывается таким образом Form1[ItemIndex] := TForm1.Create(Application); Form1.....(ну и там пошло вообщем) затем она открывается. На форме у меня есть чек бокс (на форме которую я создаю) и во время нажатия на чекбокс переменной CheckBox я присваиваю значение Checked И если на одной форме я нажал на чекбокс, на ней присвоилось значение переменной, то на второй форме сделалось это же самое. Вообщем суть в том, что все переменные переплетаются между собой, никто не знает, каким путем можно сделать ? Еще варик попробовать перенести форму на фрейм и там же это все создавать |
#2
|
||||
|
||||
Если все правильно сделать, то ничего не переплетается. Без проблемного кода, могу предположить, что вы не создаете компоненты заново для каждой формы, а просто ссылку на уже существующий передаете. Хотя если у вас каждый компонент лежит на своей форме, то вы их правильно создаете... В общем показывайте ваш код.
Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#3
|
|||
|
|||
Что именно показывать ? Все компоненты на форме уже созданы, то есть в визуальном редакторе я их уже расположил и т.д.
Вот так именно я создаю форму Код:
ProjectForm[ProjectsListBox.SelectedItemIndex] := TEngineForm.Create(Application); ProjectForm[ProjectsListBox.SelectedItemIndex].Caption := ProjectsListBox.Items[ProjectsListBox.SelectedItemIndex].Caption; ProjectForm[ProjectsListBox.SelectedItemIndex].Show; Последний раз редактировалось Admin, 14.11.2015 в 12:13. |