Форум: "Corba";
Текущий архив: 2007.02.18;
Скачать: [xml.tar.bz2];
ВнизКак передать картинку с клиента на сервер через DCOM Найти похожие ветки
← →
SupKlo (2005-10-19 11:47) [0]Как передать картинку с клиента на сервер через DCOM
← →
Dok_3D © (2005-10-19 15:26) [1]Ну, например, используя вариантный массив:
var P ,P1 : pointer
buff : OleVariant
fs:=TFileStream.Create("d:\setup.bmp", fmOpenRead);
GetMem(P,fs.size);
fs.ReadBuffer(P^,fs.size); - читаем из потока в P^
buff:=VarArrayCreate([0,fs.size],varByte);
P1:=VarArrayLock(buff);
move(P^,P1^,fs.size); - перемещаем из P^ в массив buff
VarArrayUnLock(buff);
FreeMem(P,fs.size);
fs.Free;
dcomConnection.AppServer.CoolMethod(buff);
← →
Набережных С. © (2005-10-19 17:51) [2]В дополнение к [1] - можно также использовать IPicture или IStream.
Страницы: 1 вся ветка
Форум: "Corba";
Текущий архив: 2007.02.18;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.043 c