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

Firemonkey IdIcmpClient1.Ping Test Error

2014.04.11 20:15

진이한이 조회 수:4690

안녕하세요.


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 17233
공지 유용한 관련 사이트 관리자2 2014.03.20 56113
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 99550
2959 [시작하는 사람들을 위한 델파이 프로그래밍] 모듈 23 - Exercise 4 [2] 관리자 2016.05.27 131
2958 QRChart 컴포넌트 문의 [1] 또보기 2017.02.07 131
2957 Class TLabelEffect not found [3] 훈기 2017.10.31 131
2956 RAD Studio 10.2 Starter 버전에서도 설치 횟수 제한이 있나요? [1] 얼짱나 2017.08.10 131
2955 [마이그레이션 세미나] 마이그레이션 대체 무엇인가 험프리 2018.03.16 131
2954 seattle FMX에서 GetJDisplayMetrics hsson 2018.03.28 131
2953 Assertion failure .. DBKIMPL.CPP at line 4017 bingry 2018.12.20 131
2952 안녕하세요~ 베를린Update2 버전 사용중인데 다중클라이언트가 동시에 조회하거나 자료수정할때 짧굵 2019.04.04 131
2951 IOS와 안드로이드에서 설치되어있는 폰트명 가져오는 방법 100jk 2019.04.25 131
2950 [세미나][DavidI] 이번 세미나에서 FireMonkey 새로운 기능에 대한 소개가 적어 아쉬웠습니다. 험프리 2015.10.21 131
2949 [시애틀 출시세미나] FireDAC으로 MongoDB 연결하는 내용을 안내해 주세요. Humphery 2015.09.11 132
2948 개발환경 지원 문의드립니다~~ [1] 지지배배 2016.10.17 132
2947 Java2OP 상쵸리 2017.01.11 132
2946 데이터스냅 미들웨에 메소드 호출문의 입니다 천년바우 2017.08.15 132
2945 [10.3.3 브리핑] RAD서버의 부하 분산 등은 어떻게 되나요? 험프리 2019.12.05 132
2944 Device Manager에서 Device 추가시.... [1] 황규섭 2016.01.18 132
2943 [마이그레이션] if char in CharSet then 구문에서 W1050 경고를 너무 많이 발생합니다. 험프리 2017.01.31 133
2942 [시작하는 사람들을 위한 델파이 프로그래밍] 모듈 12 - Exercise 4 [1] 관리자 2016.05.10 133
2941 [시작하는 사람들을 위한 델파이 프로그래밍] 모듈 13 - Exercise 7 [1] 관리자 2016.05.10 133
2940 [시작하는 사람들을 위한 델파이 프로그래밍] 모듈 14 - Exercise 2 관리자 2016.05.10 133
쓰기
태그