Показать сообщение отдельно
Старый 29.11.2011, 00:53   #9
Пользователь
 
Регистрация: 04.11.2009
Сообщений: 44
Сказал Спасибо: 57
Имеет 3 спасибок в 2 сообщенях
vahes пока неопределено
По умолчанию

напишу сюда, чтобы не разводить флуд.
Столкнулся с проблемой считывания с памяти данных типа WideString;
процедура вызывается при приходе пакета UserInfo (UserInfo:d(X)d(Y)d(Z)d(Heading)d(ObjectID)s(Name) ...) где PPck указательна пакет без ID
Delphi Код:
Procedure OnUserInfo(PPck: pointer); begin UserInfo.X:=PDword(Dword(PPck))^; UserInfo.Y:=PDword(Dword(PPck)+4)^; UserInfo.Z:=PDword(Dword(PPck)+8)^; UserInfo.ObjectID:=PDword(Dword(PPck)+16)^; UserInfo.Name{<-тип WideString}:=PWideString(Dword(PPck)+20)^; //здесь ошибка Out Of Memory ...
Подозреваю надо как-то выделять память под это дело, или неправильно читаю. Подскажите плз
vahes вне форума   Ответить с цитированием