hi,請問各位前輩,我的delphi client程式在關閉時會送出兩個text: a name跟x name a的功能是負責告知好友上站或下站,x的功能是改資料庫裡的數據,把使用者的數據初始化,由於兩個都有使用到query存取資料庫,因此會花上一點時間處理,問題來了,同時關閉兩個client會造成access violation,請問有什麼方法可以避免嗎?我有使用了sleep不過成效不太好:p

妳好！ 請問妳的client關閉時，有先把client的active關閉嗎？ 如：ClientSocket1->Active = false; 還是都沒做socket關閉的事情，就把socket關閉了！ 是否可以把整個程式架構詳細的說明呢？如：有client端、server端，這兩端各自在做什麼…等等！讓其它有經驗的前輩幫妳！

hi cashyy 前輩: 我的那兩個指令是放在form1(main form)的onclosequery event 裡,的確沒有作closesocket的動作,謝謝你的提點,我會試試看的

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean); begin ClientSocket1.Socket.SendText('A' na); sleep(1); clientsocket1.socket.sendtext('X' na); if watch_shop_id <> '' then begin sleep(1); clientsocket1.socket.sendtext('J' watch_shop_id); end; clientsocket1.active := false; end; 以上是我form close的時候會作的動作(socket1.active是剛加的),sleep的原因是因為送太快似乎會造成server端把兩個指令合在一起