안녕하세요.
소켓으로 통신을 하고 있는데
약 2주 정도 마다 에러 발생으로 프로그램이 죽어 버리네요.......
if (rgRobot.ItemIndex = 1) then //연결이 되어 있으면
begin
Try
RobotSocket.Socket.SendText(CommandString);
WM_Display('INDEX -> ROBOT : ' + CommandString);
except
WM_Display('INDEX -> ROBOT : Send Fail (예외 에러) : ' + CommandString);
end;
end
else WM_Display('INDEX -> ROBOT : Send Fail (DisConnected) : ' + CommandString);
이런 식으로 해 놨는데
로그를 보면 Send Fail (예외 에러) 에 걸리네요.
즉, except 로 들어왔다는 것인데.....
혹시 확인해 볼만한 사항이 있는지 문의 드립니다.
except
on E : Exception do
begin
WM_Display('INDEX -> ROBOT : Send Fail (예외 에러) : ' + CommandString);
WM_Display(E.Message);
end;
end;
그럼..즐거운 프로그래밍 하세요..