0

ftp サーバーにファイルをアップロードするプログラムを作成しましたが、インターネットにアクセスできないときはいつでもエラーが表示され、プログラムの実行が停止し、接続されていないことが示されます。インターネット。

プログラムの実行を停止しないように、showmessage ボックスにそのメッセージを表示するにはどうすればよいですか?

例えば:

If internetconnection then
begin

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

1 に答える 1

-2

このリンクからコードを試してください

ピン

また、ftp サーバーへのテスト接続を実装できる無料のInternet Component Suiteコンポーネントを使用することもできます。

編集:

作成者が IdFTP (Indy) コンポーネントを使用して ftp サーバーにファイルをアップロードしていることが判明したため、私の最初の回答は適切ではなかったので、勇気を出して、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;
于 2013-04-15T17:52:14.640 に答える