Действие 1062

Здесь обсуждаются технические аспекты создания дополнений.
DJ Wind
Сообщения: 33
Зарегистрирован: 17:42, 17.11.2010
Откуда: Забайкалье
Контактная информация:

Действие 1062

Сообщение DJ Wind » 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;

но приходят пустые данные
Наш адрес чата spbchat.tk (Забайкалье)

Maxim Mirgorodsky
Администратор
Сообщения: 6730
Зарегистрирован: 09:56, 27.06.2005
Благодарил (а): 1 раз

Re: Действие 1062

Сообщение Maxim Mirgorodsky » 13:24, 29.07.2013

xData:WideString

Входящий блок данных, как и исходящий - должен быть того же формата, т.е. обычная последовательность данных, размер в байтах. А у Вас WideString.

Ответить