Ver Mensaje Individual
  #2  
Antiguo 12-09-2010
Paulao Paulao is offline
Miembro
 
Registrado: sep 2003
Ubicación: Rua D 31 Casa 1 - Inhoaíba - Rio de Janeiro - RJ - Brasil
Posts: 637
Reputación: 21
Paulao Va por buen camino
Perdone a todos, pues el error es mio. Hizo asi y se resolvio.
Código Delphi [-]
var
 arq_conexao: TiniFile;
 path,arquivo: String;
begin
  path := ExtractFilePath(Application.ExeName);
  arquivo := path + ExtractFileName('Conexao.ini');
  arq_conexao := TIniFile.Create(arquivo);

  sckconn.Port       := arq_conexao.ReadInteger('socket','port',0);
  sckconn.Host       := arq_conexao.ReadString('socket','host','');

  sckconn.Connected  := True;
end;
Responder Con Cita