Ver Mensaje Individual
  #4  
Antiguo 06-12-2005
Avatar de DarkByte
DarkByte DarkByte is offline
Miembro
 
Registrado: sep 2003
Ubicación: Desconocido
Posts: 1.322
Reputación: 22
DarkByte Va por buen camino
Pues... error

Código:
[Error] scEscipion.pas(74): Published field 'AlRecibir' not a class nor interface type
Código Delphi [-]
type
  // *** Clase para pasar el evento
  TEventoRecibir = procedure (ASender :TObject; var ACadena :string);
type
  // *** Clase TEscipion
  TEscipion = Class(TObject)
  (...)
     // *** Eventos
    FAlRecibir : TEventoRecibir;
    procedure PasarRecibido(var Cadena :string);

  private
  (...)
    procedure Recibir;

  public
  (...)
   
  published
    AlRecibir :TEventoRecibir
      read FAlRecibir; //¡Ojo! Aquí recibo el error
      write FAlRecibir;
end;
__________________
:)
Responder Con Cita