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

Firemonkey IdIcmpClient1.Ping Test Error

2014.04.11 20:15

진이한이 조회 수:4699

안녕하세요.


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 19384
공지 유용한 관련 사이트 관리자2 2014.03.20 58278
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 101799
2959 컴파일에러 [1] 한시민 2019.12.04 141
2958 DataSnap Server에 메모리 릭이 발생합니다. 델사냥 2015.12.23 141
2957 Contact-picker를 안드로이드에서 적용하는 방법에 대한 문의 [1] 김상기 2015.08.01 141
2956 델파이 XE8에서 사용할수 잇는 이미지 컴포넌트를 구입하고 싶습니다 헨씀히포 2020.10.21 141
2955 [시작하는 사람들을 위한 델파이 프로그래밍] 모듈 12 - Exercise 9 [1] 관리자 2016.05.10 142
2954 refind 명령으로 컴포넌트, 속성이 아닌 값(value)도 수정 가능한가요? [1] file roki81 2017.12.20 142
2953 Rio 에서 PAServer 연결이 안됩니다. sihwan 2018.12.11 142
2952 TMemo 및 다른 컴포넌트의 STyle지정 100jk 2019.01.23 142
2951 [10.2 도쿄 출시세미나] ClassGroup은 10.2부터 추가된 건가요? 그리고, 멀티플랫폼 개발에서 unit작성할때마다 필수로 추가해야 하나요? 험프리 2017.04.06 142
2950 델파이 XE8 업데이트1은 삭제 후 재설치해야 하는데, 도움되는 내용이 있나요?(설치, 재설치) Humphery 2015.07.28 142
2949 TMaskEdit 윈도우8에서 수정이 안되는데요... 비내림 2015.12.21 142
2948 [세미나][DavidI] 이번 세미나에서 FireMonkey 새로운 기능에 대한 소개가 적어 아쉬웠습니다. 험프리 2015.10.21 142
2947 XE8에서 지원하는 구문 강조 기능이 XE7에서 사용 가능한가요? [2] roki81 2017.02.20 142
2946 [시작하는 사람들을 위한 델파이 프로그래밍] 모듈 22 - Exercise 1 [2] 관리자 2016.05.27 143
2945 [시작하는 사람들을 위한 델파이 프로그래밍] 모듈 23 - Exercise 4 [2] 관리자 2016.05.27 143
2944 [시작하는 사람들을 위한 델파이 프로그래밍] 모듈 24 - Exercise 2 [2] 관리자 2016.05.27 143
2943 QRChart 컴포넌트 문의 [1] 또보기 2017.02.07 143
2942 Class TLabelEffect not found [3] 훈기 2017.10.31 143
2941 Raize component 전수정 2018.08.14 143
2940 안녕하세요~ 베를린Update2 버전 사용중인데 다중클라이언트가 동시에 조회하거나 자료수정할때 짧굵 2019.04.04 143
쓰기
태그