Страница 1 из 1

Действие 1040

Добавлено: 12:21, 14.01.2012
leonbratsk
Выложите пример с этим действием(1040 - наложение ограничения).

aDataToSend := fTextToAnsiString('Bot')+ //ник бота
fIntegerToAnsiString(6)+ //тип ограничения
fTextToAnsiString(uSenderLogin)+ //ник кого ограничиваем
fIntegerToAnsiString(3)+ // вид ограничения
fIntegerToAnsiString(1)+ // время
fTextToAnsiString('Причина')+ // причина ограничения
fIntegerToAnsiString(0); //анонимность
CommFortProcess(dwPluginID, 1040, PAnsiChar(aDataToSend), Length(aDataToSend));

В данном случае не банит. Порывшись по форуму нашел подобную тему, с такой же проблемой. И её решение. Но так как на дельфи перешел недавно, не могу понять полного её решения.
Как было сказана вся проблема с временем, и использоваться должна в double. При записи в aDataToSend значение в виде double выдавало ошибку.

Re: Действие 1040

Добавлено: 12:41, 14.01.2012
dv
[Coобщение удaленo]

Re: Действие 1040

Добавлено: 14:27, 14.01.2012
leonbratsk
dv писал(а):fIntegerToAnsiString(1)+ // время

fDoubleToAnsiString(d)+
Попробовал. Ошибок не выскакивает, но не банит. Проверил права, проверил событие на которое оно записано. Не хочет.

Re: Действие 1040

Добавлено: 14:43, 14.01.2012
KGB
Не указан канал ограничения.

Re: Действие 1040

Добавлено: 14:55, 14.01.2012
leonbratsk
KGB писал(а):Не указан канал ограничения.
Ограничение идет по серверу. Попробовал с каналом не помогает.
Канал ограничения игнорируется в случае если тип ограничения соответствует значению 0, 1 или 5. Текст с нулевой длиной соответствует всем общим каналам.

Re: Действие 1040

Добавлено: 11:06, 15.01.2012
CrazyVirus

Код: Выделить всё

aDataToSend := fTextToAnsiString('Bot')+ //ник бота
 fIntegerToAnsiString(6)+ //тип ограничения
 fTextToAnsiString(uSenderLogin)+ //ник кого ограничиваем
 fIntegerToAnsiString(3)+ // вид ограничения
 fTextToAnsiString(uChannel)+ // канал
 fDoubleToAnsiString(1)+ // время
 fTextToAnsiString('Причина')+ // причина ограничения
 fIntegerToAnsiString(0); //анонимность
Не? :)
3 - это запретить публикацию в канале, а не доступ к серверу.

Re: Действие 1040

Добавлено: 12:12, 15.01.2012
leonbratsk
CrazyVirus писал(а):

Код: Выделить всё

aDataToSend := fTextToAnsiString('Bot')+ //ник бота
 fIntegerToAnsiString(6)+ //тип ограничения
 fTextToAnsiString(uSenderLogin)+ //ник кого ограничиваем
 fIntegerToAnsiString(3)+ // вид ограничения
 fTextToAnsiString(uChannel)+ // канал
 fDoubleToAnsiString(1)+ // время
 fTextToAnsiString('Причина')+ // причина ограничения
 fIntegerToAnsiString(0); //анонимность
Не? :)
3 - это запретить публикацию в канале, а не доступ к серверу.
Все помогло :) Вот только не пишется в каналах, что забанило человека, но у самого человека в событиях написано. Как можно исправить это?

Re: Действие 1040

Добавлено: 18:30, 15.01.2012
CrazyVirus
leonbratsk писал(а):Все помогло :) Вот только не пишется в каналах, что забанило человека, но у самого человека в событиях написано. Как можно исправить это?
Ограничения доступа к серверу отображаются во всех каналах, а ограничения на канал, только в самом канале. Это никак не изменить.

Re: Действие 1040

Добавлено: 09:42, 16.01.2012
leonbratsk
CrazyVirus писал(а):
leonbratsk писал(а):Все помогло :) Вот только не пишется в каналах, что забанило человека, но у самого человека в событиях написано. Как можно исправить это?
Ограничения доступа к серверу отображаются во всех каналах, а ограничения на канал, только в самом канале. Это никак не изменить.
Бан срабатывает при изменении состояния.
В канале писал(а):Добро пожаловать!
[14:40:34] XXX: переключился в состояние "не беспокоить"
В событиях писал(а):[16.01.2012 14:39:28] Связь с сервером 192.168.1.2 установлена
Версия серверной части - 5.30
[16.01.2012 14:40:34] На Вас наложено ограничение, запрещающее доступ к серверу. До истечения срока ограничения осталось 5 минут. Причина ограничения: "Причина".

Re: Действие 1040

Добавлено: 12:51, 28.01.2012
leonbratsk
Возникла еще одна проблема.
Изменение состояния пользователя
ID: 1077
Блок данных: пользователь() + текст(новое состояние)
При таком событии приходит имя пользователя и почему то его ип адрес.. а не нужное состояние

Re: Действие 1040

Добавлено: 13:38, 28.01.2012
KGB
leonbratsk писал(а):Возникла еще одна проблема.
Изменение состояния пользователя
ID: 1077
Блок данных: пользователь() + текст(новое состояние)
При таком событии приходит имя пользователя и почему то его ип адрес.. а не нужное состояние
Приходит имя+ip+иконка+состояние, т.к. пользователь = имя+ip+иконка.

Re: Действие 1040

Добавлено: 13:49, 28.01.2012
leonbratsk
KGB писал(а):
leonbratsk писал(а):Возникла еще одна проблема.
Изменение состояния пользователя
ID: 1077
Блок данных: пользователь() + текст(новое состояние)
При таком событии приходит имя пользователя и почему то его ип адрес.. а не нужное состояние
Приходит имя+ip+иконка+состояние, т.к. пользователь = имя+ip+иконка.
Спасибо. До этого пробовал прием 3 данных от события, 3-их данных не было вообще. По этому решил задать вопрос на форуме.

Может вы еще знаете решения с событием 1040? Не пишется, что забанило человека на сервер, но бан происходит.

Re: Действие 1040

Добавлено: 14:57, 28.01.2012
KGB
Может вы еще знаете решения с событием 1040? Не пишется, что забанило человека на сервер, но бан происходит.
CrazyVirus писал(а):Ограничения доступа к серверу отображаются во всех каналах, а ограничения на канал, только в самом канале. Это никак не изменить.
Добавить в принципе нечего, разве что баны на приватную переписку в каналах не отображаются.

Re: Действие 1040

Добавлено: 21:18, 25.02.2012
leonbratsk
Проблема решилась. Перешел на последнюю версию коммфорта и на 2009 дельфи.
Тему можно закрыть.