|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
Проблемы с дочерним окном
Доброго времени суток. Подскажите пожалуйста решение моей проблемы.
При создании дочернего окна в программе вылетает ошибка. Собственно код Код:
//родительское окно procedure TMainForm.CreateMDIChild(const Name: string); var Child: TChildForm; begin Child := TChildForm.Create(Application); Child.Caption := Name; if FileExists(Name) then Child.SynEdit.Lines.LoadFromFile(Name); end; //дочернее окно procedure TChildForm.FormCreate(Sender: TObject); begin ListKeyWorld:=TListBox.Create(ChildForm); ListKeyWorld.Parent:=ChildForm; ListKeyWorld.Visible:=false; ListKeyWorld.Clear; end; при вызове процедуры родительского окна CreateMDIChild вылетает ошибка Access violation at address in module 'Writer.exe'. Никак не могу разобраться. Ошибка в строке Код:
ListKeyWorld:=TListBox.Create(ChildForm); |
#2
|
||||
|
||||
А в какой момент локальный Child превращается в глобальный ChildForm?
Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |