델파이의 인터넷 연결 확인

Question

어떻게 FTP 서버에 파일을 업로드하는 프로그램을 만들었는지, 인터넷에 접속할 필요가 없을 때마다 프로그램 실행을 멈추게하는 오류가 나타납니다. 나는 인터넷에 연결되어 있지 않다고 말한다.

프로그램 실행을 중지하지 않도록 프로그램을 showmessage 상자에 표시하려면 어떻게합니까?

이

If internetconnection then 
begin 

end else showmessage ('You are not connected to the internet') 

Answer 1

이 링크 또한

Ping

당신에 대한 테스트 연결을 구현할 수 있습니다 무료 Internet Component Suite 구성 요소를 사용하려고 할 수 있습니다에서 코드를 시도하십시오 : 예를 들어

귀하의 FTP 서버.

편집 :

이 저자가 FTP 서버에 업로드 파일을 IdFTP (인디) 구성 요소를 사용하여 내 첫 번째 대답은 내가 올바른 코드를 생각하는 내가 작성하는 용기가 필요합니다 좋지 않은 것을 알 수 있었다 때문에 ftp 서버에 연결을 확인하기위한 :

with IdFTP1 do begin 
    Host := ..; 
    Port := ..; 
    Username := ..; 
    Password := ..; 
    if Connected then Disconnect; 
    try 
    Connect; 
    ShowMessage('FTP IS Connected') 
    except 
    ShowMessage('FTP IS NOT Connected'); 
    end; 
end;