Динамический запуск формы

← →
Id (2006-09-16 14:36) [0]

Здраствуйте.
Нужно в зависимости от выбора той или иной строки в ListBox-e
запускать разные формы. Для каждой строки своя форма. Подскажите, как это сделать??

← →
Desdechado © (2006-09-16 15:29) [1]

Например, анализом содержимого строки или связанного с ней признака в Objects

← →
Id (2006-09-18 09:23) [2]

Пробую вот так:
var forma:TForm; begin forma:=Form2; forma:=xxx.Create(form1); forma.ShowModal; forma.Free; end;
Вместо "ххх", что нужно указать?

← →
Palladin © (2006-09-18 09:42) [3]

1.
в случае уже созданных форм добавляется в листбокс сам экземпляр формы

listbox.AddItem("form2",form2); listbox.AddItem("form3",form3); listbox.AddItem("form3",form3); listbox.AddItem("form3",form3);

и позже

TForm(listbox.Items.Objects[listbox.ItemIndex]).ShowModal;

2.
либо в случае динамически создаваемых

listbox.AddItem("form2",TObject(Tform2)); listbox.AddItem("form3",TObject(Tform3)); listbox.AddItem("form4",TObject(Tform4)); listbox.AddItem("form5",TObject(Tform5));

и позже

With TFormClass(listbox.Items.Objects[listbox.ItemIndex]).Create(Nil) Do Try ShowModal; Finally Free; End;

← →
Id (2006-09-18 10:01) [4]

Спасибо за помощь, получилось.

Динамический запуск формы Найти похожие ветки