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

Firemonkey IdIcmpClient1.Ping Test Error

2014.04.11 20:15

진이한이 조회 수:4721

안녕하세요.


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 20072
공지 유용한 관련 사이트 관리자2 2014.03.20 58976
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 102602
519 델파이 2009버전 형상관리 [1] 저팔계 2014.10.22 1526
518 TCameraComponent 의 버그? [1] file habarena 2014.10.14 2238
517 개발자님 바코드 관련 스캔 문의 [1] 초보델파이 2014.10.18 2271
516 [XE5] XE5에선 GCM 사용이 불가능한가요? [1] 와니 2014.10.17 1356
515 ● [XE6] 푸시알림시 진동or소리로 알리는 방법 가을이다 2014.10.17 1826
514 Fast Report에서 control 'Chart' has no parent 에서 발생 file 리노 2014.10.16 1287
» IdIcmpClient1.Ping Test Error [3] 진이한이 2014.04.11 4721
512 [XE6] 안드로이드 에디트클릭시, 무조건 [붙여넣기] 나오는현상 가을이다 2014.10.11 1578
511 vcl_premium_styles_pack_for_rad_studio_delphi_amp_c_builder_xe7 Install 방법 문의 [3] 윤군 2014.10.10 1188
510 indy 10.6 질문 입니다. [1] 도사 2014.10.09 1594
509 Delphi XE7 kbmmemtable (CodeGear Edition) 설치 오류 [1] 도사 2014.10.06 2150
508 windows 2012 에서 웹서비스 클라이언트 코드 동작 불가 [1] bums0203 2014.10.08 1635
507 삼성 캘럭시 탭 10.1용 앱으로 만드러면 [1] superman 2014.10.04 13366
506 Android 에서 미디어(동영상) 플레이하는 방법 (XE5) - 추가 질문 superman 2014.10.07 2336
505 학생입니다! 스마트폰 키보드관련 질문입니다! 윤우민 2014.10.06 1760
504 [XE6] 세로고정모드로 적용하려면 어떻게 하나요? [9] file 가을이다 2014.10.02 2223
503 socket error #13 Access denied 대처방법 [2] superman 2014.09.29 2221
502 StringGrid 폰트가 Brush Color 에 가려져 있네요. 폰트가 보여져야 되는데요 [2] file 어려워 2014.09.29 2491
501 delphi xe7 에서 Winsoft사 콤포넌트 등록 방법 문의 [1] 아기사랑 2014.09.26 1568
500 안드로이드 스트링드리드를 엑셀파일로 저장? [1] memc 2014.09.28 2272