inicializar una variable numerica

[Max_E.]

Hola a todos amigos de clubdelphi. (denuevo por aqui despues de tanto tiempo...)
tengo unos mensajes de error '' la variable i no es iniciada'' y no realiza los calculos deseados, el procedure es el siguiente

Código Delphi [-]
procedure contador
var: i;
begin
inc(i);
end;

necesito un codigo que solo inicie valor de i al hacer el primer llamado al procedure cotador y no que lo inicie cada ves que se llama a dicho procedure, algo como esto

Código Delphi [-]
procedure contador
var: i;
iniciador: i=0;
begin
inc(i);
end;

espero exista un codigo para este proposito o algo parecido, gracias de ante mano por su ayuda a todos.
Saludos desde Lima - Peru