자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 
  • 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)

Firemonkey IdIcmpClient1.Ping Test Error

2014.04.11 20:15

진이한이 조회 수:4676

안녕하세요.


Delphi XE5에서  Ping Test하면 "Socket Error #10013 Access Denied "가 발생 하는데

같은 PC에서 Delphi7로 테스트하면 error가 없습니다.


테스트 소스는 아래와  같습니다.


검토 부탁드립니다.





================ Delphi XE5 - TEST 내용   -- Socket Error #10013 Access Denied  ======================

procedure TForm1.Button3Click(Sender: TObject);
var
   ABuffer : string;
begin
    IdIcmpClient1.ReceiveTimeout := 1000;

    ABuffer := '192.168.3.76' + stringofchar(' ', 256);
    IdIcmpClient1.Host := '192.168.3.76';
    IdIcmpClient1.Ping(ABuffer);
    //IdIcmpClient1.Ping();

    Sleep(2000);
    if IdIcmpClient1.ReplyStatus.ReplyStatusType = rsEcho then
      ShowMessage('True')
    else
      ShowMessage('False');

end;


================ Delphi7 - TEST 내용--- Error없음  ======================


procedure TForm1.Button1Click(Sender: TObject);
begin
    IdIcmpClient1.ReceiveTimeout := 1000;
    IdIcmpClient1.Host := '192.168.3.76';
    IdIcmpClient1.Ping;
    Sleep(500);
    if IdIcmpClient1.ReplyStatus.ReplyStatusType = rsEcho then
      ShowMessage('True')
    else
      ShowMessage('False');

end;

이 게시물을
목록
목록
번호 제목 글쓴이 날짜 조회 수
공지 [프로그래밍 강의] 2021.6~2021.12 관리자 2015.01.22 15766
공지 유용한 관련 사이트 관리자2 2014.03.20 54580
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 97985
134 개발자님 바코드 관련 스캔 문의 [1] 초보델파이 2014.10.18 2248
133 ● [XE6] 푸시알림시 진동or소리로 알리는 방법 가을이다 2014.10.17 1793
» IdIcmpClient1.Ping Test Error [3] 진이한이 2014.04.11 4676
131 [XE6] 안드로이드 에디트클릭시, 무조건 [붙여넣기] 나오는현상 가을이다 2014.10.11 1557
130 삼성 캘럭시 탭 10.1용 앱으로 만드러면 [1] superman 2014.10.04 13342
129 Android 에서 미디어(동영상) 플레이하는 방법 (XE5) - 추가 질문 superman 2014.10.07 2313
128 학생입니다! 스마트폰 키보드관련 질문입니다! 윤우민 2014.10.06 1740
127 [XE6] 세로고정모드로 적용하려면 어떻게 하나요? [9] file 가을이다 2014.10.02 2176
126 socket error #13 Access denied 대처방법 [2] superman 2014.09.29 2136
125 StringGrid 폰트가 Brush Color 에 가려져 있네요. 폰트가 보여져야 되는데요 [2] file 어려워 2014.09.29 2460
124 안드로이드 스트링드리드를 엑셀파일로 저장? [1] memc 2014.09.28 2237
123 [xe7] baas관련 컴파일시 에러가납니다.. [10] 윤우민 2014.09.09 2463
122 파이어몽키 모바일어플리케이션에서 가상키보드에 의한 화면가림현상 해결좀 [2] 농가사랑 2014.08.29 2964
121 [XE6] VCL 리스트뷰 사용법 [1] 가을이다 2014.08.29 3563
120 [이름 충돌로 인한 배포 문제 해결] Unable to create process: Unable to install [경로] .apk Failure [INSTALL_PARSE_FAILED_INCONSISTENT_CERTIFICAT... 관리자 2014.08.29 2375
119 [XE6] Baas 컴포넌트로 인해 앱기본용량이 40메가가 되는 현상 [2] 가을이다 2014.08.23 1657
118 [XE6] kinvey Push 전송시, 특정 메세지 추가하기 [2] 가을이다 2014.08.28 2503
117 [XE6] kinvey 에서 Active user란? [1] 가을이다 2014.08.27 2420
116 [XE6] Kinvey로 다중사용자에게 Push 보내기.. [3] 가을이다 2014.08.27 1616
115 안드로이드 태블릿PC를 인식하지 못합니다.. [3] heiman 2014.08.22 6742
쓰기
태그