Error con property leendo un metodo

[ecfisa]

Hola Paulao.

En una propiedad, el método de lectura tiene que ser una funcion sin parámetros y el método de escritura un procedimiento con un sólo parámetro.

Por ejemplo:

Código Delphi [-]
...
type
 TMi_Clase = class(TObject)
  private
    FVersion: string;
    function GetVersion: string;
    procedure SetVersion(Ver: string);
  public
    property Version: string read FVersion write FVersion;
  end;
...
implementation
...
function TMi_Clase.GetVersion: string;
begin
  Result:= FVersion; // (o código para obtener la versión)
end;

procedure TMi_Clase.SetVersion(Ver: string);
begin
  FVersion:= Ver;
end;

Ejemplo de uso:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  MClase: TMi_Clase;
begin
  MClase:= TMi_Clase.Create;
  MClase.Version:= 'xx.xx.xx';
  if MClase.Version <> 'xx.xx.xx' then
    ShowMessage('¡ Imposible !')
  else
    ShowMessage('Todo Ok...');
end;

Edito: Aunque para ampliar el ejemplo utilizé una propiedad con lectura y escritura, es posible definirla de sólo lectura o sólo escritura. Y también podés prescindir de la variable privada.

Un saludo.