Dúvida com o método write do Property

Pessoal é o seguinte:

Tenho uma variável e uma procedure:
Private
rNum : Real;
Procedure SetNumero;

Tenho uma property:
Published
Property Numero : Real Read rNum Write SetNumero;

Quando compilo da o seguinte erro:
Incompatible Types (tipos incompatives) na linha da property em cima do SetNumero.

Por favor alguém me ajude....