![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
|
|
#1
|
||||
|
||||
|
Создан проект с материнским окном, в нем MainMenu, при запуске формы при попытке открыть дочернее окно через MainMenu выскакивает ошибка прикрепленная ниже.
текст самого проект(хз нафиг, но выложу вдруг в чем поможет) Код:
program AppName;
uses
Forms,
Main in 'Main.pas' {MainForm},
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {Form2},
Unit3 in 'Unit3.pas' {Form3},
Unit4 in 'Unit4.pas' {Form4},
Unit5 in 'Unit5.pas' {Form5},
Unit6 in 'Unit6.pas' {Form6},
Unit7 in 'Unit7.pas' {Form7},
Unit8 in 'Unit8.pas' {Form8},
Unit9 in 'Unit9.pas' {Form9},
Unit10 in 'Unit10.pas' {Form10},
Unit11 in 'Unit11.pas' {Form11},
Unit12 in 'Unit12.pas' {Form12};
{$R *.RES}
begin
Application.Initialize;
Application.CreateForm(TMainForm, MainForm);
Application.CreateForm(TForm3, Form3);
Application.CreateForm(TForm4, Form4);
Application.CreateForm(TForm5, Form5);
Application.CreateForm(TForm7, Form7);
Application.CreateForm(TForm8, Form8);
Application.CreateForm(TForm9, Form9);
Application.CreateForm(TForm10, Form10);
Application.CreateForm(TForm11, Form11);
Application.CreateForm(TForm12, Form12);
Application.CreateForm(TForm2, Form2);
Application.CreateForm(TForm6, Form6);
Application.Run;
end. |
|
#2
|
|||
|
|||
|
лучше бы вы выложили тот код, которым вызываете дочернее окно.
|
|
#3
|
||||
|
||||
|
Цитата:
|
|
#4
|
|||
|
|||
|
а на форме этой в OnActive (OnShow) ничего нет?
|
|
#5
|
||||
|
||||
|
Попробуй этот код tform2.create(self)
|
|
#6
|
|||
|
|||
|
оооо, кстати да, не заметил что Form2 не создается автоматически, конечно тогда будет ошибка.
|
|
#7
|
||||
|
||||
|
Код:
begin Application.Initialize; Application.CreateForm(TMainForm, MainForm); Application.CreateForm(TForm3, Form3); Application.CreateForm(TForm4, Form4); Application.CreateForm(TForm5, Form5); Application.CreateForm(TForm7, Form7); Application.CreateForm(TForm8, Form8); Application.CreateForm(TForm9, Form9); Application.CreateForm(TForm10, Form10); Application.CreateForm(TForm11, Form11); Application.CreateForm(TForm12, Form12); Application.CreateForm(TForm2, Form2); Application.CreateForm(TForm6, Form6); Application.Run; end. |
|
#8
|
||||
|
||||
|
Цитата:
предпологаю что нет =) Последний раз редактировалось RusSTEEL, 28.03.2011 в 18:11. |