想請教各位大大, 如果要從client端傳送指令給Server端,做錄影和停止錄影的功能,我做出來,指令可傳到server端,他也回傳值他有執行錄影的功能,可是從client端按下去,只看server端螢幕,閃了一下,並沒有開始錄影,這是什麼原因,麻煩各位大大幫我解答一下 Server 端 //--------------------------------------------------------------------------- void __fastcall TForm1::IdTCPServer1Execute(TIdPeerThread *AThread) { AnsiString szCommand=AThread->Connection->ReadLn( EOL , 300 ,1000); if(szCommand=="StartRecord") { //ShowMessage("開始錄影"); Sleep((unsigned)1000); VideoGrabber1->StartAVICapture(); AThread->Connection->WriteLn("Start Record"); } else if(szCommand=="StopRecord") { //ShowMessage("停止錄影"); Sleep((unsigned)500); VideoGrabber1->StopAVICapture(); Sleep((unsigned)2000); AThread->Connection->WriteLn("Stop Record"); } } //Client 傳送指令給Server端開始錄影 //--------------------------------------------------------------------------- void __fastcall TForm1::Button8Click(TObject *Sender) { double TakeTime= double( Now()); if(IdTCPClient1->Connected()) { AnsiString ReceiveTEXT="收不到回饋信號"; try { IdTCPClient1->WriteLn("StartRecord"); ReceiveTEXT=IdTCPClient1->ReadLn( EOL , 300 ,1000); }catch(...){;} TakeTime= double( Now()) - TakeTime ; AnsiString strTime=FloatToStr(TakeTime*24*60*60*1000); if( strTime.Length() >= 6 ) strTime=strTime.SubString(1,5); StatusBar1->Panels->Items[0]->Text=strTime "ms"; Sleep((unsigned)1000); ShowMessage(ReceiveTEXT); } else ShowMessage("無法連線"); } //--------------------------------------------------------------------------- //Client 傳送指令給Server端停止錄影 void __fastcall TForm1::Button9Click(TObject *Sender) { double TakeTime= double( Now()); if(IdTCPClient1->Connected()) { AnsiString ReceiveTEXT="收不到回饋信號"; try { IdTCPClient1->WriteLn("StopRecord"); ReceiveTEXT=IdTCPClient1->ReadLn( EOL , 300 ,1000); }catch(...){;} TakeTime= double( Now()) - TakeTime ; AnsiString strTime=FloatToStr(TakeTime*24*60*60*1000); if( strTime.Length() >= 6 ) strTime=strTime.SubString(1,5); StatusBar1->Panels->Items[0]->Text=strTime "ms"; Sleep((unsigned)2000); ShowMessage(ReceiveTEXT); } else ShowMessage("無法連線"); }

提問者您好:


以上回應是否已得到滿意的答覆？


若已得到滿意的答覆，請在一週內結案，否則請在一週內回覆還有什麼未盡事宜，不然，
將由版主(尚無版主之區域將由副站長或站長)採自由心證,選擇較合適之解答予以結案處理，
被選上之答題者同樣會有加分獎勵，同時發問者將受到扣 1 分的處分。不便之處，請見諒。


有問有答有結案，才能有良性的互動，良好的討論環境需要大家共同維護，感謝您的配合。

------
我是機器人,我不接受簡訊.