TCPClient zur Laufzeit erstellen / Konsolenapplikation

[Harry M.]

Ich möchte einen IdTCPClienten zur Laufzeit in einem Konsolenprogramm erstellen. Dazu habe ich bis jetzt folgenden Code:

Delphi-Quellcode:

uses
  IdIcmpClient;

function CheckPort(IP: String; PORT: Integer): boolean;
var
 TCPClient: TidIcmpClient;
begin
  RESULT := FALSE;
  TCPClient.Create(nil);
  TCPClient.Disconnect;
  TCPClient.Host := IP;
  TCPClient.Port := PORT;
  try
    TCPClient.Connect(-1);
    except; end;

  RESULT :=  TCPClient.Connected;
  TCPClient.Disconnect;
  TCPClient.Free;
end;

Jedoch sagt mit der Compilier das die Funktionen

Delphi-Quellcode:

...Connect;
...Disconnect;
...Connected;

undefinierte Bezeichner sind. Woran liegt das?

Wie dumm.... Fehler schon gefunden. Sorry!
Richtig ist es so:

Delphi-Quellcode:

uses
  IdTCPClient;

var
  TCPClient: TIdTCPClient;

[edit=Admin]Auf Wunsch des Autors einen Tippfehler korrigiert. Mfg, Daniel[/edit]