Здравствуйте, <Аноним>, Вы писали:
А>Здравствуйте, Shtirliz, Вы писали:
А>>>А>>>DynArrayFromVariant(Pointer(BufArray), Buffer, TypeInfo(TBArray));
А>>>
А>>>происходит AV.
S>>Попробуй не приводить к поинтеру BufArray...
S>>Или так не работает?
А>Да, так не работает
А>Ошибка компилятора насчет несоответствия типов
Покопай в сторону TVarData. Там есть и массивы....
Stream.Clear;
Stream.SetSize(Count);
CopyMemory(Stream.memory,TVarData(Buffer).VArray.Data,Count);
Может так поможет....

... << RSDN@Home 1.1.2 stable >> ...<<Win32NT 5.0.2195.0 >>