Cita:
Empezado por ramonigimenez
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
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.
-