Ver Mensaje Individual
  #1  
Antiguo 09-09-2007
fafastrungen fafastrungen is offline
Registrado
 
Registrado: may 2006
Posts: 8
Reputación: 0
fafastrungen Va por buen camino
No puede heredar un tipo

Hola, he declarado en una unidad la siguiente sintaxis:

Código Delphi [-]
unit General;
interface
uses IdComponent; // INDY 10
type TIdStatus = IdComponent.TIdStatus; // Viene de la unidad IdComponent de INDY 10
 
type TGeneral = Class(TObject)
...

La unidad IdComponent es una unidad de Indy 10 y dentro de esta unidad esta declarada la enumeracion TIDStatus:

Código Delphi [-]
TIdStatus = (
  hsResolving,
  hsConnecting,
  hsConnected,
  hsDisconnecting,
  hsDisconnected,
  hsStatusText,
  ftpTransfer,
  ftpReady,
  ftpAborted
);

Hasta acá todo bien, despues dentro del formulario principal creo una instancia de la clase TGeneral, defino una variable de tipo TIdStatus y al crear el form quiero asignarle el valor hsDisconnected a esta variable, acá es donde está el problema, me dá un error E2003 diciendo que hsDisconnected es un identificador sin declarar.
En realidad es cierto, ya que hsDisconnected no está definido ni en la unidad del form ni en la unidad General, pero he definido un tipo TIDStatus el cual desciende de IdComponent.TidStatus, por lo que los valors de TIdStatus deberian ser accesibles desde el form.
Obviamente desde la unidad General puedo acceder a los valores del enumerador TIdStatus, pero no mas allá de la unidad General.

Alguna idea ?
Responder Con Cita