Delphi用Webservice傳輸二進位制物件

2022-03-28 12:06:07 字數 975 閱讀 6841

以前感興趣做的小程式,當時就想用來傳,李維的書上也有提及的,有兩種方法,一種是把二進位制物件轉成base64碼,返回字串,應該是最簡單的方法,另外一種就是返回二進位制陣列tbytedynarray

伺服器:

function

tfilesoap.getpic(out size:integer):

tbytedynarray;

varbuf:tmemorystream;

begin

tryif not

fileexists('c:\1.bmp') then

raise exception.create('file not

found.');

buf:=tmemorystream.create;

buf.loadfromfile('c:\1.bmp');

size:=buf.size;

setlength(result,size);

move(buf.memory^,result[0],size);

finally

buf.free;

end;

end;

客戶端procedure tform1.button1click(sender:

tobject);

varsize:integer;

buf:tmemorystream;

ary:tbytedynarray;

begin

buf:=tmemorystream.create;

tryary:=getifilesoap.getpic(size);

buf.setsize(size);

move(ary[0],buf.memory^,size);

image1.picture.bitmap.loadfromstream(buf);

finally

buf.free;

end;

end;

Jquery ajax呼叫webservice總結

原文 jquery ajax呼叫webservice總結 jquery ajax呼叫webservice c 要注意的幾個事項 1 web.config裡需要配置2個地方 在之間加入 2.正確地編寫webserivce的 uservalidate 的摘要說明 webservice namespace...

Jquery ajax呼叫webservice總結

jquery ajax呼叫webservice c 要注意的幾個事項 1 web.config裡需要配置2個地方 在之間加入 2.正確地編寫webserivce的 1 2 uservalidate 的摘要說明 3 4 webservice namespace 5 webservicebinding ...

Jquery ajax呼叫webservice總結

jquery ajax呼叫webservice c 要注意的幾個事項 1 web.config裡需要配置2個地方 在之間加入 2.正確地編寫webserivce的 uservalidate 的摘要說明 webservice namespace webservicebinding conformsto...