JAVA delphi socket ͨÐÅ
Ö÷ÒªÊÇÖÐÎÄÔõô´¦Àí
delphi×ö·þÎñ¶Ë£¬¾ßÌåµÄ½âÎö´úÂëΪ£º
Delphi(Pascal) code:
var buf ±£´æµÄÊǽÓÊÕµ½µÄbyteÊý¾Ý
function DecodeUTF8(var buf:array of Byte;StartPosition,Len:Integer):string;
var
i:Integer;
m:String;
begin
m:='';
FOR i:=0 TO len-1 DO
m:=m+chr(buf[i+StartPosition+1]);
Result:=UTF8Decode(m);
end;
function Utf8Decode(const S: UTF8String): WideString;
var
L: Integer;
Temp: WideString;
begin
Result := '';
if S = '' then Exit;
SetLength(Temp, Length(S));
L := Utf8ToUnicode(PWideChar(Temp), Length(Temp)+1, PChar(S), Length(S));
if L > 0 then
SetLength(Temp, L-1)
else
Temp := '';
Result := Temp;
end;
JAVA×ö¿Í»§¶ËÔõô·¢¹ýÈ¥²ÅÄÜÈÃËü½âÎö³öÕý³£µÄÖÐÎÄÄØ
Socket socket = new Socket(server, port);
String message = "ÖÐÎÄ";
//Ôõô·¢ËÍ
ÄDZßÊÇUTF8£¬ÎÒÃÇÒ²UTF8ß¡£¡£¡£
ÉÏÃæ¾ÍÊÇËûÃǽÓÊÕºó´¦ÀíµÄÔ´ÂëÁË£¬JAVA¿Í»§¶ËÓ¦¸ÃÔõô·¢
Êǰ¡Êǰ¡£¬¶¼ÓÃutf-8¾ÍÐÐÁË¡£
·þÎñÆ÷ÊÇÒѾ¶¨ºÃµÄ£¬²»ÄܸÄ
¾ÍÊǿͻ§¶ËÔõô·¢
¼ÇµÃjavaĬÈϽ«ÖÐÎı£´æ³Éutf-8¡£Äã¿ÉÒÔÖ±½Ó·¢Õâ¸ö×Ö·û´®µÄ£¬²»ÐÐÔÙתÂë¡£
ÊÔÁË£¬¶¼Ã»µÃ
delphi×Ô´øµÄUTF-8ת»»µÄ·½·¨ÊDz»ÊDz»Ö§³ÖJAVAµÄ°¡£¬Ôõôת¶¼²»³É¹¦
ÎÞÂÛÓÃʲôÓïÑÔ£¬Äã´ÓÍøÂçÖд«µÝµÄ¶¼ÊǶþ½øÖÆÊý¾Ý¡£Óë¾ßÌåµÄÓïÑÔûÓйØÏµ¡£
ÄãµÃµ½µÄÊý¾ÝʱÂÒÂëô£¿
Ïà¹ØÎÊ´ð£º
ÎÒÏëÓÃJavaдһ¸ö³ÌÐò£¬¾ÍÊÇÎÒÏëÔÚÔËÐдúÂëºó£¬ÔÚÖ¸¶¨µÄʱ¼ä´ò¿ªÄ³³ÌÐò£¬ÀýÈçÎÒÔËÐдúÂëºó£¬½²ÔÚ12£º00´ò¿ª"D:\Program Files\Tencent\QQ2009\Bin\QQ.exe"Õâ¸ö³ÌÐò£¬Çó¸ßÈËÖ¸µã¡£»¹ÓпÉÄܵϰÔÚÖ¸¶¨µÄʱ¼ä ......
Ò»¸öJSPÒ³Ãæ½ÓÊÕÆäËûÒ³ÃæÌá½»¹ýÀ´µÄFORM±íµ¥£¬µ«ÊÇÒªÇóÖ»½ÓÊÕµ±Ç°Õ¾µã¼°Æä×ÓÕ¾µãÌá½»¹ýÀ´µÄFORM±íµ¥£¬ÆäËûÕ¾µãÌá½»¹ýÀ´µÄ±íµ¥²»½ÓÊÕ£¬Õâ¸öÔõôÉèÖã¿
ÓùýÂËÆ÷
filter
½«µ±Ç°Õ¾µã¼°Æä×ÓÕ¾µã·ÅÒ»¸öĿ¼
È» ......
±¾ÈËÕýÔÚÓÃJava×öÒ»¸öC/S¼Ü¹¹µÄÏîÄ¿£¬
¿ÉÊÇÓÉÓÚÏîÄ¿±È½Ï´ó£¬Ç°ÆÚ¶Ô¼Ü¹¹µÄÉè¼ÆÓÈÆäÖØÒª£¬ÒòΪºóÆÚ¿ÉÄÜËæÊ±»á¼Ó¸ö¹¦ÄÜ»òÕßÈ¥µôijЩ¹¦ÄÜ¡£
ËùÒÔÌØµØÑ°ÇóÈçºÎÉè¼ÆC/SµÄ¼Ü¹¹Ê¹³ÌÐò¸ü¼ÓÃæÏò¶ÔÏó¸ü¼ÓÒ×ÓÚά ......
¸÷·´óÏÀ¸ø¸ö˼·£¬²»ÊÇÔÚÏßµÄÄÇÖÖ£¬¾ÍÊÇÒ»¸ö×öÆÕͨµÄÓ¦ÓóÌÐò¡£
´Ê¿âÔõôÉú³ÉÄØ£¿
²»»á¡£
ÒýÓÃ
´Ê¿âÔõôÉú³ÉÄØ£¿
ÕÒ±¾×Öµä
ÒýÓÃ
´Ê¿âÔõôÉú³ÉÄØ£¿
Êý¾Ý¿â ºÇºÇ
ÓÃmap ¼üÖµ¶ÔÓ¦
Èç¹ûÓÃÊý¾Ý¿ ......