Ver Mensaje Individual
  #7  
Antiguo 23-11-2011
Avatar de FairyLady
FairyLady FairyLady is offline
Registrado
NULL
 
Registrado: nov 2011
Ubicación: Argentina
Posts: 6
Reputación: 0
FairyLady Va por buen camino
No. Ningun mensaje de error. Solo que no me deja acceder a los atributos de la vble. Ahi va el codigo

Código Delphi [-]
Type 

Tpaquete = class(TObject)
 Basico: real;
 Function SetTarifa():real;virtual;
 Function CalculaTarifa():real;virtual;Abstract;
end;

TPaqTerr = class(TPaquete)
 TarifaT: real;
 public
  Function Settarifa (): real; override;
 function Calculatarifa (): real; override;
 //constructor Create (eTarifa:Real); overload;
 end;

TPaqAereo = class (Tpaquete)
 TarifaA:real;
 function Settarifa(): real;override;
 function Calculatarifa():real;override;
End;

TpaqMaritimo =class (Tpaquete)
 TarifaM:real;
 function Settarifa():real;Override;
 function Calculatarifa():real;override;
End;

Esas son las declaraciones de clases y tipos. ( El constructor esta comentado ya que no estaba muy segura de como usarlo ni si era necesario).
Código Delphi [-]
Procedure TForm1.BtCalculaClick(Sender: TObject);
Var
Terrenal:Tobject;
begin

Terrenal:= Tpaqterr.create ();

Terrenal.   // aca es principalmente el problema, No accede a ningun atributo de la clase TPAQTERR. -(Tipo paquete terrestre)
Muchas gracias
Responder Con Cita