Manager ошибка при выходе

Материал из wiki.standart-n.ru
Версия от 16:31, 3 февраля 2016; Aleksnick (обсуждение | вклад)

(разн.) ← Предыдущая | Текущая версия (разн.) | Следующая → (разн.)
Перейти к: навигация, поиск

Ошибка после закрытия 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;