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;
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.
Muchas gracias
