Ver Mensaje Individual
  #4  
Antiguo 24-02-2005
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Reputación: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Es cierto, lo que te puse no es necesario. El problema exacto no lo sé pero sí sé dónde se origina. Estás usando un constructor para la componente que rompe el polimorfismo. No sé si tienes alguna razón específica para ello pero el IDE de Delphi se basa en ello para poder construir las componentes durante el diseño. Si haces un debug de tu componente te darás cuenta que de hecho tu constructor nunca es llamado pues al omitir el override, el IDE simplemente llama al constructor de TComponent. Al no ser llamado, tampoco se construye FIpServers.

Para corregir esto cambia la declaración del constructor por:


Código Delphi [-]
constructor Create(AOwner: TComponent); override;

y la implementación por

Código Delphi [-]
inherited Create(AOwner);
FIpServers:=TStringList.Create;

// Saludos
Responder Con Cita