? Кто-нибудь работал с GSCGenGetSourceCode из под Delphi
Шимолин Сергей; 4.12.03

Нужно программно (из Delphi) изменить и перекомпилировать скрипты объектов. Для этого получаю компилированный скрипт PDLCSGetAction, перевожу в строковое представление с помощью GSCGenGetSourceCode. Код скрипта выдает следующий:


#include "apdefap.h"
long int _main (char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)
{
/*V103131AI_ALKALINE/T_PIPE_2163_2.EN_UPDATE305COLOR_PARAM_EN_UPDATE('AI_ALKALINE/T_PIPE_2163_2.EN_UPDATE')//@ExpEnde*/
#include "apdefap.h"
long _main(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName){
// WINCC:TAGNAME_SECTION_START
// syntax: #define TagNameInAction "DMTagName"
// next TagID : 2
#define TAG_1 "AI_ALKALINE/T_PIPE_2163_2.EN_UPDATE"
// WINCC:TAGNAME_SECTION_END

// WINCC:PICNAME_SECTION_START
// syntax: #define PicNameInAction "PictureName"
// next PicID : 1
// WINCC:PICNAME_SECTION_END

return (COLOR_PARAM_EN_UPDATE((unsigned long)GetTagDouble (TAG_1)));
}
}

Собственно, смущает что полученный код скрипта вложен еще в какой-то код, и в начале что-то в двоичном виде идет. Это формат какой-то кода скрипта или у меня ошибки. Ну и функция GSCGenGetSourceCode первый раз отрабатывает нормально, а затем Exception вылетает.

У кого-нибудь есть опыт по этой теме?