Действие 1062
Добавлено: 16:54, 28.07.2013
Помогите с получением данных от программы по ID 1062
пытаюсь получит вот так
но приходят пустые данные
пытаюсь получит вот так
Код: Выделить всё
function GetID(xData:WideString ; uLogin:WideString) : WideString;
var
x,y,z,iReadOffset, iSize:Integer;
Buf: AnsiString;
bInBuffer : PAnsiChar;
begin
iReadOffset:=0;
iSize := CommFortGetData(dwPluginID, 1062, nil, 0, PAnsiChar(xData), Length(xData));
SetLength(Buf, iSize);
CommFortGetData(dwPluginID, 1062, PAnsiChar(Buf), Length(Buf), PAnsiChar(xData), Length(xData));
Result:=fReadText(PAnsiChar(Buf), iReadOffset);
end;