-
Мне параметром ему хендл главной формы присваивать?
-
О боже)...
Ты в состоянии средствами отладчика отсановиться на строчке
Result := LongInt(TfrmTest.Create(Application);
и посмотреть, чему равно значения Application.MainForm, Application.MainForm.Visible, Application.MainForm.FormStyle ?
-
В состоянии :) Application = nil так что я думаю, что все остальное тоже nil
-
> Application = nil
Да быть того не может !
Что угодно, но только не nil там должно быть.
Если, конечно же, над этим не потрудились твои очумелые ручки)
-
Вот ShowMessage(Application.MainForm.Name) у меня frmMain, то есть как и должно быть
-
Ну ?!
А говоришь nil)
> то есть как и должно быть
Еще должно быть Application.MainForm.FormStyle = fsMDIForm - давай, проверяй ...
-
В вызове написал
if Application.MainForm.FormStyle = fsMDIForm then ShowMessage('1');
выскочило access violation
-
Все нормально! теперь fsMdiForm
-
Что дальше?
-
А с чего ты взял, что причиной AV явилось именно Application=nil ?
Ты давай уже не мудри, а воспользуйся для проверки отладчиком)
А кустарщину с ShowMessage оставь для иных случаев)
-
> Все нормально! теперь fsMdiForm
Ну раз fsMdiForm, то пробуй так:
Application.CreateForm('TfrmTest', frmTest);
-
я такого не говорил, сейчас все нормально, Application.MainForm := frmMain;
Application.MainForm.FormStyle := fsMDIForm; Теперь как мне форму вызвать чтобы она стала дочерней, делаю как ранее:
frmTest := TfrmTest.Create(Application);
frmTest.FormStyle := fsMDIChild;
frmTest.Show;
он не ругается - но подвисает
-
> frmTest.FormStyle := fsMDIChild;
Что мешает выставить FormStyle=fsMDIChild у формы прямо в дизайн-тайм ?
-
Application.CreateForm(TfrmTest,frmTest); - программа просто висит - никаких реакций
-
> frmTest.Show;
Это лишнее.
При создании MDIChild-формы она автоматически станет видимой
-
Пробуй:
try
Application.CreateForm(TfrmTest,frmTest);
except
on e:exception do ShowMessage(e.Classname + ' ' + e.Message);
end;
Что видишь ?
-
никаких реакций, что я не так делаю :(
-
> что я не так делаю
Приводи уже полный текст тестового dll-проекта ..
-
После отлова exception вывалил debugger fault notification а перед этим висел :(
-
почту или аську мож дашь чтобы не светить - можешь прислать на intruderlab@mail.ru