socket tcp
procedure idtcpsrvr1execute(athread: tidpeerthread);
procedure idtcpsrvr1connect(athread: tidpeerthread);
idtcpsrvr1: tidtcpserver;
idtcpclnt1: tidtcpclient;
client:
連線伺服器->傳送資料訊息
//連線伺服器
idtcpclnt1.host:='127.0.0.1';
idtcpclnt1.port:=168;
idtcpclnt1.connect();
showmessage('連線成功');
varsm:tstringstream;
msize:integer;
sm:=tstringstream.create(trim(edt1.text));
msize:=sm.size;
cxm1.lines.add('傳送時流大小為:'+inttostr(msize));
idtcpclnt1.writeinteger(msize); //傳送的位元組資料的大小
idtcpclnt1.writestream(sm);//傳送的資料流
sm.free;//釋放tstringstream物件
//server
開啟tcp 連線
idtcpsrvr1.defaultport:=168;
idtcpsrvr1.active:=true;
showmessage('程式啟動成功');
//提示有客戶端請求訊息過來
procedure tform1.idtcpsrvr1connect(athread: tidpeerthread);
begin
cxm1.lines.add('有使用者連線');
end;
//在 idtcpsrvr1execute時間裡面接受資料訊息
vars:string;
sm:tstringstream;
msize:integer;
sm:= tstringstream.create(''); //建立字串流物件
msize:=athread.connection.readinteger(); //讀取資料流的大小
cxm1.lines.add('接受的字串大小為:'+inttostr( msize)) ;
athread.connection.readstream(sm,msize); //讀取資料的內容
cxm1.lines.add(sm.datastring); //講資料新增到cxm1裡面
linux ftp伺服器和svn伺服器
問問題 使用vsftpd linux 架設的ftp伺服器,如何解決向其中拷貝多層資料夾的檔案時出現的550錯誤?然後寫部落格 只研究技術的就不要看了 因為要為我的本本重灌系統,並且要重新對整個硬碟進行分割槽,我開始往我的實驗室中的電腦上備份東西 因為我的實驗室的電腦上是linux系統,我於是選擇使用...
web伺服器和ftp伺服器
web伺服器又稱網路伺服器,http伺服器 伺服器的精髓就是你想在我這看到東西,裡面放一堆網頁,你向我傳送請求,我就找找找,把網頁給你。web伺服器使用的協議是http https 客戶機叫http客戶端 瀏覽器就叫http客戶端 8uftp就叫ftp客戶端 每天都獲取位址,電腦上有dhcp客戶端 ...
正向伺服器和反向伺服器gai nian
概念 反向 reverse proxy 方式是指以 伺服器來接受internet上的連線請求,然後將請求 給內部網路上的伺服器,並將從伺服器上得到的結果返回給internet上請求連線的客戶端,此時 伺服器對外就表現為乙個伺服器。概述 通常的 伺服器,只用於 內部網路對internet的連線請求,客...