Ver Mensaje Individual
  #5  
Antiguo 07-02-2019
Avatar de TOPX
TOPX TOPX is offline
Miembro
 
Registrado: may 2008
Ubicación: Bogotá
Posts: 527
Reputación: 16
TOPX Va camino a la fama
Cita:
Empezado por ramonigimenez Ver Mensaje
Hola,
desbajo de la seccion "implementation"
cree estas funciones
[sic]
Lo que creo que esta haciendo es crear el constructor y las funciones que defini antes.
A ese código no le veo problema, ¿es seguro que compila con el error que dice?

Pregunto, porque ensayé creando la unidad con su código y compila sin inconveniente, así:
Código Delphi [-]
unit untClasses;

interface

uses
  Classes, Graphics;

type
  TFuente = class(TObject)
    private
      fColorFondo: TColor;
      fFuente: TFont;
    public
      constructor Create;
      destructor Destroy; override;

      Procedure SaveToStream(const aDest: TStream);
      Procedure LoadFromStream(const aSource: TStream);
      procedure Assign(const aSource: TFuente);

      property Fuente: TFont read fFuente write fFuente;
      property ColorFondo: TColor read fColorFondo write fColorFondo;
  end;

implementation

{ TFuente }

procedure TFuente.Assign(const aSource: TFuente);
begin

end;

constructor TFuente.Create;
begin

end;

destructor TFuente.Destroy;
begin

  inherited;
end;

procedure TFuente.LoadFromStream(const aSource: TStream);
begin

end;

procedure TFuente.SaveToStream(const aDest: Tstream);
begin

end;

end.

Tip: Después de que escriba la declaración de un método, teniendo el cursor en esa línea puede oprimir Ctrl+Shift+C para que el IDE cree el cascarón de cada método en la sección implementation por Ud.
-
__________________
"constructive mind, destructive thoughts"
Responder Con Cita