먼저 답변 감사합니다!!
대기 상태는 아닌 것 같습니다. ReadLn에 마지막에 5m/s로 줬기 때문에
실제로 타이머는 계속 돌긴 돌더라구요.. 하지만 장비로부터 반응이 ㅜ.ㅜ
기본 소켓에는 Receive함수가 있어서 그냥 됐었는데 이건.. 후..
관심 감사합니다^^
Nibble 님이 쓰신 글 :
: 34. if(!IdSocketClient->Connected())
: 35. return;
: 요 부분은 사족이신 것 같고...
:
: ReadLn 은 default로 개행 코드가 올때까지 대기 됩니다. LF 지요(Line Feed : 0x0A)
: CR+LF 조합 등으로 개행코드를 약속할 수도 있기도 하구요.
: 따라서 장치에서 개행코드를 날려주지 않으면, 영영 대기상태에 놓이게 됩니다.
: 확인해 보시지요..
:
: Kenzuro 님이 쓰신 글 :
: : 안녕하세요 Builder 초보 Kenzuro 입니다.
: :
: : 장비에서 값을 받아오는데.. 시간값을 명령어로 보내면 장비에서 데이터를 보내 주고 있습니다.
: :
: : 기본 소켓으로는 잘 되고 있었는데요. 그것을 인디로 바꾸 싶어서 공부를 하고 있습니다.
: :
: : 데이터는 D,M1,N001,40,30,40,0,N002.... 이런식으로 들어오는데 N060까지 들어옵니다.
: :
: : 채팅 데모 버전을 약간 수정해서 만들어봤는데요. 장비에 명령어를 보내도 감감 무소식입니다..
: :
: : 값을 받는 방법이 틀린건가요?? 도움 좀 주세요~
: :
: : 제가 만든 소스 첨부하겠습니다.
: :
: :
__fastcall TForm1::TForm1(TComponent* Owner)
: : : TForm(Owner)
: : {
: :
: : IdSocketClient->Host = "192.168.0.50";
: : IdSocketClient->Port = 5001;
: : IdSocketClient->Connect();
: : Sleep(1000);
: :
: : if(IdSocketClient->Connected() == true){
: : ReceiveMemo->Lines->Add("Socket Connect Success\n================================\n");
: : }else{
: : ReceiveMemo->Lines->Add("Socket Connect fail\n================================\n");
: : }
: : }
: : //---------------------------------------------------------------------------
: :
: : void __fastcall TForm1::SendMessageClick(TObject *Sender)
: : {
: : if(SendEdit->Text != ""){
: : IdSocketClient->WriteLn(SendEdit->Text);
: : Sleep(100);
: : ReceiveMemo->Lines->Add("Send : " + SendEdit->Text+ "\n================================\n");
: : SendEdit->Text = "";
: : }
: : }
: : //---------------------------------------------------------------------------
: : void __fastcall TForm1::ReceiveTimerTimer(TObject *Sender)
: : {
: : if(IdSocketClient->Connected()){
: : static int errorcnt = 0;
: : AnsiString Msg;
: :
: : if(!IdSocketClient->Connected())
: : return;
: :
: : try{
: : Msg = IdSocketClient->ReadLn("", 5);
: : //IdSocketClient->ReadBuffer(Msg, 1024)
: : }catch(...){
: : errorcnt++;
: : if(errorcnt > 4){
: : ReceiveTimer->Enabled = false;
: : ReceiveMemo->Lines->Add("IdSocketClient Error\n================================\n");
: : }
: : }
: :
: : if(Msg != ""){
: : ReceiveMemo->Lines->Add("Recv : " + Msg +"\n================================\n");
: : Msg = "";
: : }
: : }else{
: : ReceiveTimer->Enabled = false;
: : ReceiveMemo->Lines->Add("IdSocketClient DisConnect\n================================\n");
: : }
: : }