Страница 1 из 1
список открытых каналов
Добавлено: 19:44, 14.10.2011
Cilvay
Код: Выделить всё
iSize := CommFortGetData(dwPluginID, 15, nil, 0, nil, 0); //получаем объем буфера
SetLength(aData, iSize);
CommFortGetData(dwPluginID, 15, PAnsiChar(aData), iSize, nil, 0);//заполняем буфер
iReadOffset := 0;
g := fReadinteger(PAnsiChar(aData), iReadOffset);
//act:=false;
for c := 0 to g-1 do begin
kan := fReadText(PAnsiChar(aData), iReadOffset);
ShowMessage(kan);
end;
В итоге видно все кроме канала main. Вместо него пустота приходит. В чем косяк?
Re: список открытых каналов
Добавлено: 22:53, 14.10.2011
SV
Cilvay писал(а):Код: Выделить всё
iSize := CommFortGetData(dwPluginID, 15, nil, 0, nil, 0); //получаем объем буфера
SetLength(aData, iSize);
CommFortGetData(dwPluginID, 15, PAnsiChar(aData), iSize, nil, 0);//заполняем буфер
iReadOffset := 0;
g := fReadinteger(PAnsiChar(aData), iReadOffset);
//act:=false;
for c := 0 to g-1 do begin
kan := fReadText(PAnsiChar(aData), iReadOffset);
ShowMessage(kan);
end;
В итоге видно все кроме канала main. Вместо него пустота приходит. В чем косяк?
На сколько помню в документации написано что в первое значение приходит канала события,будет пустое, затем уже другие каналы.
Re: список открытых каналов
Добавлено: 09:05, 17.10.2011
Maxim Mirgorodsky
Cilvay писал(а):Код: Выделить всё
iSize := CommFortGetData(dwPluginID, 15, nil, 0, nil, 0); //получаем объем буфера
SetLength(aData, iSize);
CommFortGetData(dwPluginID, 15, PAnsiChar(aData), iSize, nil, 0);//заполняем буфер
iReadOffset := 0;
g := fReadinteger(PAnsiChar(aData), iReadOffset);
//act:=false;
for c := 0 to g-1 do begin
kan := fReadText(PAnsiChar(aData), iReadOffset);
ShowMessage(kan);
end;
В итоге видно все кроме канала main. Вместо него пустота приходит. В чем косяк?
Блок данных (входящий): число(количество) + (текст(название канала) + текст(тема канала))*количество
Вы игнорируете тему.
Re: список открытых каналов
Добавлено: 20:07, 11.11.2011
Cilvay
ой, точно