ayuda con variables estáticas !!!!!!

[david_uh]

estoy intentando crear una variable estatica en un procedimiento para que cuando salga y vuelva a entrasr al procedimiento la variable conserve su valor pero me manda error el compilador. Estoy usando este codigo:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
const r: Integer=10;
begin
   ShowMessage(IntToStr(r));
   inc(r);
end;

deseo que entre llamada y llamada a button1click la variable r conserve su valor, esto lo he hecho antes revise un proyecto anterior y esta igual pero no manda errores al compilar sin embar ahora si me manda no entiendo que anda mal.