Привет всем!
Есть такой ASP скрипт:
dim myVar
dim filler
myVar = Request.BinaryRead(Request.TotalBytes)
Set filler = Server.CreateObject('ComDBFiller')
filler.FillDBFromBuf myVar, Request.TotalBytes
класс ComDBFiller — мой COM-класс, написанный на Delphi
метод ComDBFiller.FillDBFromBuf определен так:
procedure FillDBFromBuf(var Buffer: OleVariant; Count: Integer); safecall;
Вопрос по реализации метода FillDBFromBuf:
КАК запихнуть данные из Buffer в TMemoryStream???
Варианты:
Stream.Write(Buffer, Count); // не работает - запихиваются совсем другие данные
Большая просьба помочь, кто знает.