Скрипт C. Вызов Picture Window на родительском окне с другого PW

[swaips-87]

Добрый день, прошу помощи, запутался немного.
Ситуация такая, требуется с одного PW открыть кнопкой второе PW на родительском окне с присвоением определенных свойств окну
Вот что у меня в скрипте на кнопке:

char *pictureName = "@SFP_trend.Pdl";
char *windowName = "WindowSensor";
char *windowTitle = "CaptionText";
char *titleContent = "";
char *objectName = "lblHeader1";
char *propertiesText = "Text";

char ArchiveTagName [100];
char value [100];

// Получение родительского изображения
char *lpszPicture = GetParentPicture(lpszPictureName);

//Получаем заголовок окна изображения
char *titleContent = GetPropChar(lpszPicture, windowName, windowTitle);

// Устанавливаем текст для заголовка
SetPropChar(lpszPictureName, objectName, propertiesText, windowTitle);

sprintf(ArchiveTagName, "Archive_Trend_RH\\%sDataForDCSPowerStation_RH_Tank1_Level_r", value);

SetPictureName(lpszPictureName, windowName, pictureName);
SetPropChar (lpszPictureName, windowName, windowTitle, titleContent);

SetVisible (lpszPicture, windowName, TRUE);

SetPropChar(pictureName,"Trend","TrendTagName",ArchiveTagName);
SetPropDouble(pictureName,"Trend","ValueAxisEndValue",1);
SetPropChar(pictureName,"Trend","TrendRename",titleContent);

[makesstr]

Обязательно на Си писать?

[swaips-87]

Обязательно на Си писать?

Добрый день, там всё на Си написано, хотелось бы не менять структуру, если менять только это, то придется менять всё (ну что в пределах этого скрипта).
У вас есть какое-то иное предложение? VBS?

[makesstr]

Откуда берется текст "НС1 Давление факт PT-1 Гросс, МПа"?

[+] На будущее

Называть переменные также как называются свойства объектов - плохая затея.

Отправлено спустя 11 минут 2 секунды:

[+] Непонятно откуда берутся Название тренда, Путь к тренду, Название окна

Dim PwTrend
Set PwTrend = item.Parent.Parent.Parent.ScreenItems("WindowSensor")

PwTrend.PictureName = "SFP_trend.Pdl"
PwTrend.CaptionText = "Название окна"
PwTrend.Visible = 1

PwTrend.Screen.ScreenItems("lblHeader1").Text = "Название тренда"
PwTrend.Screen.ScreenItems("Trend").ValueAxisEndValue = 1
PwTrend.Screen.ScreenItems("Trend").TrendTagName = "Путь к тренду"
PwTrend.Screen.ScreenItems("Trend").TrendRename = "Название тренда"

[swaips-87]

Откуда берется текст "НС1 Давление факт PT-1 Гросс, МПа"?
Это старое окно, открывается и прописывалось индивидуально на каждый датчик
вот код:
char *tagPrefix = "NS1";
char *pictureName = "@SFP_trend.Pdl";
char *windowName = "WindowSensor";
char *windowTitle = "CaptionText";
char *titleContent = "НC1 Давление факт PT-1 Гросс, МПа";

char ArchiveTagName [100];
char value [100];



sprintf(ArchiveTagName, "Archive_Trend_RH\\%sData_AI_Data[1]_Out_value", value);


SetTagPrefix(lpszPictureName, windowName, tagPrefix);
SetPictureName(lpszPictureName, windowName, pictureName);
SetPropChar (lpszPictureName, windowName, windowTitle, titleContent);

SetVisible (lpszPictureName, windowName, TRUE);

SetPropChar(pictureName,"Trend","TrendTagName",ArchiveTagName);
SetPropDouble(pictureName,"Trend","ValueAxisBeginValue",0);

SetPropDouble(pictureName,"Trend","ValueAxisEndValue",1);
SetPropChar(pictureName,"Trend","TrendRename",titleContent);

[iceman]

День добрый.
Попробуем разобраться.

char *pictureName = "@SFP_trend.Pdl";
char *windowName = "WindowSensor";
char *windowTitle = "CaptionText";
char *titleContent = "";
char *objectName = "lblHeader1";
char *propertiesText = "Text";

char ArchiveTagName [100];
char value [100];

//Доп переменная
char MainName[MAX_PATH];

// Получение родительского изображения
char *lpszPicture = GetParentPicture(lpszPictureName);

//формируем путь
sprintf(MainName, "%s.%s:%s", lpszPicture, windowName, pictureName);

//Получаем заголовок окна изображения
char *titleContent = GetPropChar(lpszPicture, windowName, windowTitle);
Заголовок получаем из окна механизма для последующей склейки? Или заголовок определяется в переменной char *titleContent = "";?

// Устанавливаем текст для заголовка
Зачем дополнительный заголовок в окне, если уже есть название окна с таким же текстом?
И строку скрипта переносим вниз

sprintf(ArchiveTagName, "Archive_Trend_RH\\%sDataForDCSPowerStation_RH_Tank1_Level_r", value);

//обращаемся к PW на родительском окне, а не на текущем - значит lpszPicture
SetPictureName(lpszPicture, windowName, pictureName);
SetPropChar (lpszPicture, windowName, windowTitle, titleContent);

SetVisible (lpszPicture, windowName, TRUE);

// Устанавливаем текст для заголовка
SetPropChar(MainName, objectName, propertiesText, windowTitle);
SetPropChar(MainName,"Trend","TrendTagName",ArchiveTagName);
SetPropDouble(MainName,"Trend","ValueAxisEndValue",1);
SetPropChar(MainName,"Trend","TrendRename",titleContent);

[swaips-87]

iceman, Спасибо огромное, заработало.

char *titleContent = GetPropChar(lpszPicture, windowName, windowTitle);
Заголовок получаем из окна механизма для последующей склейки? Или заголовок определяется в переменной char *titleContent = "";?

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

sprintf(ArchiveTagName, "Archive_Trend_RH\\%sDataForDCSPowerStation_RH_Tank1_Level_r", value);

, для выбора нужного тега из архива.

[iceman]

Не могли бы вы помочь еще, пожалуйста, как возможно сделать так, чтобы в зависимости от какого либо свойства ( к примеру имя) элемента, динамически менять конструкцию

sprintf(ArchiveTagName, "Archive_Trend_RH\\%sDataForDCSPowerStation_RH_Tank1_Level_r", value);

, для выбора нужного тега из архива.

День добрый.

Конструкция sprintf(ArchiveTagName, "Archive_Trend_RH\\%sDataForDCSPowerStation_RH_Tank1_Level_r", value); уже динамическая.
Переменная value подставляется в строку (вместо %s). Кстати, непонятно где она задается.
Возможно, чтобы не менять идеологию работы данного скрипта, имя тега задавать через переменную. Заголовки задаются и имя тега тоже можно. А собрать строку не составить проблем.
Либо в окно с графиком передавать префикс и часть скрипта переносить в @SFP_trend.Pdl на событие OpenPicture.

[swaips-87]

iceman,

Archive_Trend_RH\\%sDataForDCSPowerStation_RH_Tank1_Level_r", value

Вот эта часть , просто добавлена мной, я сам прописал это, по сути, мне при нажатии на ту или иную кнопку, нужно менять значение "DataForDCSPowerStation_RH_Tank1_Level_r", как его поменять я пока не понимаю

char *pictureName = "@SFP_trend.Pdl";
char *windowName = "WindowSensor";
char *windowTitle = "CaptionText";
char *titleContent = "SRT3000RMXLI";
char *objectName = "lblHeader1";
char *propertiesText = "Text";

char ArchiveTagName [100];
char value [100]; Вот тут я его обозначил

//Доп переменная
char MainName[MAX_PATH];

// Получение родительского изображения
char *lpszPicture = GetParentPicture(lpszPictureName);

//формируем путь
sprintf(MainName, "%s.%s:%s", lpszPicture, windowName, pictureName);

sprintf(ArchiveTagName, "Archive_Trend_RH\\%sDataForDCSPowerStation_RH_Tank1_Level_r", value); тут по сути (выделенное) я прописываю архив, и имя архивного тега (но в ручную), по сути мне нужно получать свойство или имя тут , и переписывать его.

//обращаемся к PW на родительском окне, а не на текущем - значит lpszPicture
SetPictureName(lpszPicture, windowName, pictureName);
SetPropChar (lpszPicture, windowName, windowTitle, titleContent);

SetVisible (lpszPicture, windowName, TRUE);

// Устанавливаем текст для заголовка
SetPropChar(MainName, objectName, propertiesText, windowTitle);
SetPropChar(MainName,"Trend","TrendTagName",ArchiveTagName);
SetPropDouble(MainName,"Trend","ValueAxisEndValue",1);
SetPropChar(MainName,"Trend","TrendRename",titleContent);

Вот скрипт который вызывает первое окно:
char *tagPrefix = "PT_OUT";
char *pictureName = "AI_Window.Pdl";
char *windowName = "WindowAI_Edit";
char *windowTitle = "CaptionText";
char *titleContent = "НС1 Давление выход";

SetTagPrefix(lpszPictureName, windowName, tagPrefix);
SetPictureName(lpszPictureName, windowName, pictureName);
SetVisible (lpszPictureName, windowName, TRUE);
SetPropChar (lpszPictureName, windowName, windowTitle, titleContent);

SetWidth(lpszPictureName,"WindowAI_Edit",250);
SetHeight(lpszPictureName,"WindowAI_Edit",181);

SetBackColor("AI_Window.Pdl","B_Chek",RGB(0,255,0));
}

[iceman]

char value [100];

получаем префикс окна параметра ("НС-1 давление выход"), который получается из - char *tagPrefix = "PT_OUT";
strcpy(value, GetTagPrefix(GetParentPicture(lpszPictureName), GetParentPictureWindow(lpszPictureName));

если тег структурный, то склеиваем с суффиксом
strcat(value, ".суффикс");

далее подставляем в строку для графика в нужно место
sprintf(ArchiveTagName, "Archive_Trend_RH\\%sDataForDCSPowerStation_RH_Tank1_Level_r", value);

это все добавляем в скрипт на кнопку вызова графика

[swaips-87]

iceman, Александр, не дает скомпилировать , выдает что не хватает ";" после скобки, я не могу вообще получить тегпрефикс
char *pictureName = "@SFP_trend.Pdl";
char *windowName = "WindowSensor";
char *windowTitle = "CaptionText";
char *objectName = "lblHeader1";
char *propertiesText = "Text";

char ArchiveTagName [100];
char value [100];

//Доп переменная
char MainName[MAX_PATH];

// Получение родительского изображения
char *lpszPicture = GetParentPicture(lpszPictureName);
char *titleContent = GetPropChar(lpszPicture,lpszObjectName,"comment");

//формируем путь
sprintf(MainName, "%s.%s:%s", lpszPicture, windowName, pictureName);


//Получаем заголовок окна изображения
//char *titleContent = GetPropChar(lpszPicture, windowName, windowTitle);
//Заголовок получаем из окна механизма для последующей склейки? Или заголовок определяется в переменной char *titleContent = "";?


// Устанавливаем текст для заголовка
//Зачем дополнительный заголовок в окне, если уже есть название окна с таким же текстом?И строку скрипта переносим вниз


//обращаемся к PW на родительском окне, а не на текущем - значит lpszPicture
SetPictureName(lpszPicture, windowName, pictureName);
SetPropChar (lpszPicture, windowName, windowTitle, titleContent);

SetVisible (lpszPicture, windowName, TRUE);

strcpy(value, GetTagPrefix(GetParentPicture(lpszPictureName), GetParentPictureWindow(lpszPictureName));
strcat(value, ".QVAL");

sprintf(ArchiveTagName, "Archive_Trend_RH\\%s", value);


// Устанавливаем текст для заголовка
SetPropChar(pictureName, objectName, propertiesText, windowTitle);
SetPropChar(pictureName,"Trend","TrendTagName",ArchiveTagName);
SetPropDouble(pictureName,"Trend","ValueAxisEndValue",100);
SetPropChar(pictureName,"Trend","TrendRename",value);

[swaips-87]

вот скрин

[swaips-87]

Александр, спасибо, все получилось, конструкцию немного поменял.

Код: Выделить всё

char *pictureName = "@SFP_trend.Pdl";
char *windowName = "WindowSensor";
char *windowTitle = "CaptionText";
char *objectName = "lblHeader1";
char *propertiesText = "Text";

char ArchiveTagName [100];
char value [100];

//Доп переменная
char MainName[MAX_PATH];

// Получение родительского изображения
char *lpszPicture = GetParentPicture(lpszPictureName);
char *titleContent = GetPropChar(lpszPicture,lpszObjectName,"comment");

//формируем путь
sprintf(MainName, "%s.%s:%s", lpszPicture, windowName, pictureName);


//обращаемся к PW на родительском окне, а не на текущем - значит lpszPicture
SetPictureName(lpszPicture, windowName, pictureName);
SetPropChar (lpszPicture, windowName, windowTitle, titleContent);

SetVisible (lpszPicture, windowName, TRUE);

strcpy(value, GetTagPrefix(lpszPicture, GetParentPictureWindow(lpszPictureName)));	
strcat(value, ".QVAL");

sprintf(ArchiveTagName, "Archive_Trend_RH\\%s", value);


// Устанавливаем текст для заголовка
SetPropChar(pictureName, objectName, propertiesText, windowTitle);
SetPropChar(pictureName,"Trend","TrendTagName",ArchiveTagName);
SetPropDouble(pictureName,"Trend","ValueAxisEndValue",100);
SetPropChar(pictureName,"Trend","TrendRename",value);