Ver Mensaje Individual
  #1  
Antiguo 05-03-2009
newgeek newgeek is offline
Miembro
 
Registrado: jun 2007
Posts: 16
Reputación: 0
newgeek Va por buen camino
Question Problema al crear un IdTelnet

Que tal!! tengo un pequeño problema al intentar crear un IdTelnet en una aplicacion de consola, ahi les va el codigo...

Código Delphi [-]
procedure reboot;
var telnet:TIdTelnet;
begin
  telnet:=TIdTelnet.Create(nil);
  with telnet do
  begin
    Host:='192.168.0.1';
    Port:=23;
    Connect;
    if connected then
    begin
      telnet.OnDataAvailable(sender:TObject); // Aqui es donde me da un error
      WriteLn('admin');
      WriteLn('12345678');
      WriteLn('system');
      WriteLn('reboot');
      close;
    end;
  end;
end;
Responder Con Cita