|
#1
|
||||
|
||||
DLL и Формы
Всем привет.
Меня мучает пару вопросов: 1. Можно ли в DLL добавить несколько форм например штук 5-7. 2. Как вызвать форму в MDI приложении (у меня постаянно ошибка: не наиденно не одной активной формы) |
#2
|
|||
|
|||
1. можно.
2. поднятие формы в MDI есть куча примеров у меня например сделано вот так: есть процедура которая креатит формы: Код:
procedure TDM.CreateMDIChild(const Name: string;frm:integer); var fno:integer; Child: Tform; Temp:TFormClass; NewItem: TMenuItem; begin { create a new MDI form } fno:=1; case frm of 1:begin Temp:=TForm3; c_z:=c_z+1; fno:=c_z; end; 2:Temp:=Tform2; 4:Temp:=Tform4; end; Child := Temp.Create(Application); Child.name := 'NONAME' + IntToStr(Form1.MDIChildCount + IDWindows); child.Show; end; и собственно вызов: Код:
dm.CreateMDIChild('Импорт звонков ' + IntToStr(MDIChildCount + 1),1) Новый вирус - "БОМЖ"! Он просто роется в Корзине...и спит под ярлычком "Сетевое окружение" |