Суть такова:
к некоторым отчетам необходимо создавать настройки, причем вип с созданием настроек компилится вместе с отчетом в один рес файл.
При попытке добавить еще один ресурсник с созданием новых настроек, после модификации реестра настроек старые настройки пропадают.
Пример:
сначала создали настройки:
Код: Выделить всё
#include CreateTune.vih
Handler with replace Gal_DateModifyTune on ExtensionPoint
epDateModifyTune (TS : ObjStartCreateTune)
Action
{
TS.SetLastDateModTune(21,02,2010);
Result := true;
}
Handler with replace Gal_CreateTuneComponent on extensionPoint
epCreateTuneComponent (TR: ObjCreateTuneEx)
Action
{
Result := true;
TR.SetComponent('');
TR.AddPart (ttSysUserTune,'exttunes','Tune','Доп настройки',0);
TR.AddPart (ttSysUserTune,'exttunes.zakaz','exttunes','Загрузка',0);
TR.AddTune (ttSysTune,'exttunes.zakaz.kodorg','exttunes.zakaz','Классификатор',ftComp,'0','',0);
TR.AddIntrTune ('exttunes.zakaz.kodorg','zakaz_IntrTune');
TR.AddTune (ttSysTune,'exttunes.zakaz.orgattrmc','exttunes.zakaz','Классификатор2',ftComp,'0','',0);
TR.AddIntrTune ('exttunes.zakaz.orgattrmc','zakaz_IntrTune');
}
создаем еще настройки:
Код: Выделить всё
#include CreateTune.vih
Handler with replace Gal_DateModifyTune on ExtensionPoint
epDateModifyTune (TS : ObjStartCreateTune)
Action
{
TS.SetLastDateModTune(21,02,2010);
Result := true;
}
Handler with replace Gal_CreateTuneComponent on extensionPoint
epCreateTuneComponent (TR: ObjCreateTuneEx)
Action
{
Result := true;
TR.SetComponent('');
TR.AddPart (1,'exttunes','Tune','Доп настройки',0);
TR.AddPart (1,'exttunes.ard_rep','exttunes','Отчеты ard',0);
TR.AddTune (2,'exttunes.ard_rep.price_nrec','exttunes.ard_rep','Прайс лист',ftComp,'0','',0);
TR.AddIntrTune('exttunes.ard_rep.price_nrec','ard_tune_GETPAYMENT');
}
Подскажите плиз, что не так делаю.