Manager ошибка при выходе — различия между версиями
Материал из wiki.standart-n.ru
BeTePoK (обсуждение | вклад) (Новая страница: «==Ошибка после закрытия Managera== Если возникает ошибка после выхода из менеджера -нужно про…») |
Aleksnick (обсуждение | вклад) |
||
(не показана одна промежуточная версия этого же участника) | |||
Строка 2: | Строка 2: | ||
Если возникает ошибка после выхода из менеджера | Если возникает ошибка после выхода из менеджера | ||
− | -нужно пройтись по вкладкам менеджера и в "TMS инициализации" везде где есть создание форм - изменить nil на Application | + | -нужно пройтись по вкладкам менеджера и в "TMS инициализации" везде где есть создание форм - изменить '''nil''' на '''Application''' |
после чего сохранить | после чего сохранить | ||
Строка 9: | Строка 9: | ||
в Unit1 | в Unit1 | ||
− | pn:=gsender.FindComponent('pnTop'); | + | pn:=gsender.FindComponent('pnTop'); |
'''frm:=TfrmCtrls.Create(nil);''' | '''frm:=TfrmCtrls.Create(nil);''' | ||
frm.bInited:=false; | frm.bInited:=false; | ||
Строка 18: | Строка 18: | ||
нужно изменить на | нужно изменить на | ||
− | pn:=gsender.FindComponent('pnTop'); | + | pn:=gsender.FindComponent('pnTop'); |
'''frm:=TfrmCtrls.Create(Application);''' | '''frm:=TfrmCtrls.Create(Application);''' | ||
frm.bInited:=false; | frm.bInited:=false; |
Текущая версия на 16:31, 3 февраля 2016
Ошибка после закрытия Managera
Если возникает ошибка после выхода из менеджера -нужно пройтись по вкладкам менеджера и в "TMS инициализации" везде где есть создание форм - изменить nil на Application после чего сохранить
пример: Менеджер - вкладка сводные остатки - TMS инициализации в Unit1
pn:=gsender.FindComponent('pnTop'); frm:=TfrmCtrls.Create(nil); frm.bInited:=false; frm.pnButtons.Parent:=pn; frm.pnButtons.Align:=alLeft; frm.pnButtons.Left:=gSender.Width;
нужно изменить на
pn:=gsender.FindComponent('pnTop'); frm:=TfrmCtrls.Create(Application); frm.bInited:=false; frm.pnButtons.Parent:=pn; frm.pnButtons.Align:=alLeft; frm.pnButtons.Left:=gSender.Width;