Para referenciar una propiedad de una clase dentro del mismo ámbito de la clase, es simplemente con el nombre de la propiedad/metodo, o bien usando el operador explicito Self.
Por ejemplo:
[code]
procedure TMiClase.UnMetodo;
begin
propiedad1:=0;
propiedad2:=0;
end;
[code]
o bien
[code]
procedure TMiClase.UnMetodo;
begin
Self.propiedad1:=0;
Self.propiedad2:=0;
end;
[code]
|