Форум — Ответы     (  К темам )

?	VAdim: Как из availible form перевести в созданные...или создать прог-но ? (17-02-2003 07:31:14)
Есть доступные формы, хотелось бы при необходимостти создавать какую либо из доступных...как сделать, каков синтаксис...если можно то пример плжалуйста!!
Георгий (17-02-2003 19:38:35)
Как я понял у тебя есть заранее спроектированные формы например TForm1 и ты хочешь создать несколько экземпляров этой формы? Если это так, то вот пример: void __fastcall TForm1::Button1Click(TObject *Sender) { TForm1* pForm; //обьявление указателя на экземпляр класса TForm1 pForm=new TForm1(this); //создание экземпляра класса TForm1 и запись его адреса в переменную pForm pForm->Show(); //показ только что созданной формы на экране } Соответственно вместо TForm1 может быть любая форма или визуальный компонент Можно создать массив (список) созданных таким образом элементов и програмно делать с ними, что хочешь (но не забывать освобождать память, когда элементы станут не нужными). Это то, что тебе надо?
Павел (17-02-2003 22:11:40)
Есть доступная форма Form2, создаем ее, показываем, удаляем void __fastcall TForm1::Button1Click(TObject *Sender) { Application->CreateForm(__classid(TForm2), &Form2); Form2->ShowModal(); delete Form2; }
VAdim (18-02-2003 01:14:38)
Спасибо большое ! Очень помогло, особенно вторая подсказка ! Если что, пишите в г.Владивосток мне на мыло.