socket問題,請各位幫忙,謝謝! delphi / windows sdk/api
我的服務端程式如下:
procedure tfileserverthread.clientexecute;
var
data: array[0..1023] of char;
rectext: string;
socketstream: twinsocketstream;
begin
while not terminated and clientsocket.connected do
begin
try
socketstream := twinsocketstream.create(clientsocket, 30000);
if socketstream.waitfordata(60000) then
begin
try
fillchar(data, sizeof(data), 0);
if socketstream.read(data, sizeof(data)) = 0 then
begin
clientsocket.sendtext('timeout on server'+#13#10);
sleep(1);
clientsocket.close;
terminate;
end;
rectext := data;
if length(rectext) > 2 then
delete(rectext, pos(#13#10, rectext), 2); // delete #13#10
if clientsocket.connected then
begin
clientsocket.sendtext(rectext);
sendmessage(form1.listbox1.handle, lb_addstring, 0, integer(pchar(rectext)));
postmessage(form1.handle, cm_inccount, 0, 0);
end;
finally
socketstream.free;
end;
end;
except
//handleexception;
//showmessage('error!!!!!!!!');
clientsocket.close;
terminate;
end;
end;
end;
但是當程式執行的時候,會在if socketstream.read(data, sizeof(data)) = 0 then這一句報錯:指定的網路名不再可用。我看過原來的帖子說:把
except
//handleexception;
//showmessage('error!!!!!!!!');
clientsocket.close;
terminate;
end
這一段程式中的handleexception去掉,我現在已經把它去掉了,但是還是在
if socketstream.read(data, sizeof(data)) = 0這一句報同樣的錯誤,是在不知道怎麼回事了,請各位大俠幫忙,謝謝!!!
單步跟蹤看看吧,可能在執行中把clientsocket關閉了,那麼socketstream建立不成功。
先除錯通server,然後執行他,在來除錯client。
藍芽問題。請真正的c 高手幫忙?謝謝
net高手求救啊?最近開發乙個藍芽的專案。但是遇到了問題一直都無法解決。希望csdn中的 高手盡快幫忙解決啊?我在網上找了好多的資料和demo,資料上都是說呼叫系統的api就可以了。但是我執行的時候總是說提示 btdrt.dll,ws2.dll 無法載入等錯誤資訊。我用的系統是xp的。在2003上面...
實在找不出原因在哪了,請各位大俠幫忙瞧瞧
請各位大俠有空幫小弟看看問題到底是出在 故障有兩個,第乙個是下面那個被呼叫的函式在return了以後還要在從setparentnode familystr,entity.parentcategoryid.value 處按順序往下執行一次 雖然並沒有影響返回的結果 第二個是上面的主函式當中在retur...
請幫忙解決乙個提取漢字拼音的演算法,謝謝了
幫忙寫個演算法,或提供個思路!怎樣獲得一串漢字的所有可能的拼音?比如 禪的處世智慧型,其中 禪 的 是多音字,禪 兩個音 chan shan 的 兩個音 de di 那麼這句話的所有可能拼音組合有四種情況 chan de chu shi zhi hui chan di chu shi zhi hui...