Страница 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
ой, точно