Проблема при подключении плагина.

[Noise]

NLObP, у меня тоже 176 версия, fastmm я в нете качал, но и то что ты выложил тоже пробовал (все равно такая же ошибка).
Возможно ли что подобное происходит из-за D2010?
Или из-за того что пх запущен на виртуальной машине?


ЗЫ попробовал скомпилить в D7 вот результат:

До конца перевести не смог, попробовал вернуть fastmm первым в блоке uses в итоге опять ругается на память,
но что еще более интересно пх теперь не вылетает, а в описании плагина пишет, что у меня старая версия пх xDDD


NLObP если не сложно скомпиль у себя какой нить плагин и выложи, мб у меня компилятся они как то не так?

Вот кстати скомпиленное мной... у тебя оно нормально будет работать?

[NLObP]

Сообщение от Noise

Вот кстати скомпиленное мной... у тебя оно нормально будет работать?

Пакетхак падает с ошибкой.

Попробуй мой.

[Noise]

Сообщение от supernewbie

там устарели плагины чтоли, пробуй как в этих сорцах

Скорее всего да... скомпили твои сорцы все норм встало, никаких ошибок. Спасибо!

NLObP, Твой работает, спасибо.


Сейчас вот сижу, из-за чего ошибки были пытаюсь понять...
В общем проблема была в процедуре OnPacket как только ее убираю ошибки пропадают.
Подскажите пожалуйста как она правильно должны выглядеть, что бы не было ошибок.

Вот нашел тут (ссылка)
Но при попытке заблокировать чат:

if not FromServer and (pck[1]=#$38) then pck := '';

Клиент подвисает, пх опять ругается...
Прочитав эту тему
Пробовал сделать так (изменив при этом var pck: string на var pck: TPacket) :

if not FromServer and (pck.pckId=$38) then pck.size := 0;

Все равно фигня...

Добавлено через 2 часа 29 минут
У меня мозг плавится... как прочесть значение чата?

if not FromServer and (pck[1]=#$38) then
text := ps.ReadSEx(pck,3)

Не прокатывает

[supernewbie]

Noise, если у тебя D >= 2010, то все string и char меня на ansitring и ansichar епт

Добавлено через 1 минуту
PS ошибка была из-за:
в посте ксора:
function SetStruct(const struct: TPluginStruct): Boolean; stdcall;
а надо:
function SetStruct(const struct: PPluginStruct): Boolean; stdcall;

Добавлено через 4 минуты
кстати он пакет не юзай, он глючит

юзай OnCallMethod, он е*нуться реализован конечно но вроде робит нормал

[Noise]

Сообщение от supernewbie

Noise, если у тебя D >= 2010, то все string и char меня на ansitring и ansichar епт

Добавлено через 1 минуту
PS ошибка была из-за:
в посте ксора:
function SetStruct(const struct: TPluginStruct): Boolean; stdcall;
а надо:
function SetStruct(const struct: PPluginStruct): Boolean; stdcall;

Добавлено через 4 минуты
кстати он пакет не юзай, он глючит

юзай OnCallMethod, он е*нуться реализован конечно но вроде робит нормал

Последнее компилил уже в D7.
Ну тогда щас полезу смотреть что там за OnCallMethod.

Добавлено через 16 минут
К великому сожалению, то что я хочу сделать можно сделать только через OnPacket;
Буду признателен если кто нить подскажет как все таки получить значение чата.

if not FromServer and (pck[1]=#$38) then
text := ps.ReadSEx(pck,3)

Вот так не работает