|
|
|
|
Устанавливает указанное строковое свойство объекта JS+, приведенное из типа WCHAR*/wchar_t* (для приложений С++) или pWideChar (для приложений Delphi).
Синтаксис
| int __stdcall JSP_objSetWCStr(
| | hObj, | | prp_cName, | | prp_Value
| | );
|
| Параметры
|
| Параметр
| Тип
| Описание
|
| hObj
| size_t
| объект JS+, имеющий свойство типа String
|
| prp_cName
| char*
| имя свойства типа String объекта hObj
|
| prp_Value
| WCHAR*
| устанавливаемое значение свойства prp_cName
|
|
Возвращаемое значение
JSP_OK (0) в случае успеха либо JSP_ERROR (-1) в противном случае.
------------------------
Приложение C++ Builder
------------------------
JSP_Start("TRIAL","");
JSP_RegAppFun("void","App_tstObjWCStr","size_t&,char*");
JSP_RET_void App_tstObjWCStr(size_t& hObj,char* prp_cName)
{
WCHAR str_val[255];
JSP_objGetWCStr(hObj,prp_cName,str_val);
JSP_objSetWCStr(hObj,prp_cName,_wcsrev(str_val));
}
------------------------
Скрипт JS+
------------------------
var tst_obj={
strValue: "A123я"
};
var val_str=tst_obj.strValue;
App_tstObjWCStr(tst_obj,"strValue");
alert(
val_str+"\n-\n"+
tst_obj.strValue
);
------------------------
Вывод скрипта JS+
------------------------
A123я
-
я321A
------------------------
Приложение Delphi
------------------------
uses
AnsiStrings// ReverseString()
JSP_Start('TRIAL','User=Delphi');
JSP_RegAppFun('','App_tstObjWCStr','size_t&,char*');
procedure App_tstObjWCStr(var hObj:Pointer;prp_cName:pAnsiChar) stdcall;
var
str_val:array [0..100] of WideChar;
begin
JSP_objGetWCStr(hObj,prp_cName,@str_val);
JSP_objSetWCStr(hObj,prp_cName,
pWideChar(ReverseString(str_val)));
end;
exports App_tstObjWCStr;
------------------------
Скрипт JS+
------------------------
var tst_obj={
strValue: "A123я"
};
var val_str=tst_obj.strValue;
App_tstObjWCStr(tst_obj,"strValue");
alert(
val_str+"\n-\n"+
tst_obj.strValue
);
------------------------
Вывод скрипта JS+
------------------------
A123я
-
я321A
Совместимость
C++ Builder/Delphi/Visual C++
|
| JS+ | Руководство пользователя
|
|
|
| |
|
|
