problema con el visual

[[Lepe]]

Siguiendo el estilo de Delphius:

Código Delphi [-]
Unit NombreUnidad;
 
type
  TMiclase = TClass;
    private
      Fa:integer;
      Fb:integer;
    public
    function Suma: integer;
    property A:integer read Fa write Fa;
    property B:integer read Fb write Fb;
  end;

En principio Fa y Fb no proporciona nada nuevo, pero bueno....

La funcion devolverá Fa+Fb que son las variables privadas.

Saludos