Conteo

[eljuank]

Hola:
Necesito saber cómo hago para que dada vez que yo de clic en un botón me aparezca en un label el conteo de los clic, o sea:
un clic 1
dos clic 2
y así sucesivamente.

He intentado
declarar dos variables de tipo entero ej. "conteo" y "suma" luego digo
begin
suma:=0;
suma:= suma + 1;
conteo:= suma;
// aquí lo del label
end:
Pero eso no me resuelve el problema porque cada vez que se hace clic en el botón suma me toma valor cero y entonces el label siempre me da valor = 1 aunque haga clic 10 veces en el botón.
También he intentado un ciclo pero nada estaré haciendo algo mal.
salu2
eljuank

[yalmar]

Hola Juan,

Debe usar variables estaticas, esto en delphi es usando la palabra reservada const en vez de var. ejemplo:

Código: Seleccionar todo

procedure TForm1.Button1Click(Sender: TObject);
const cont:integer = 1;
begin
  label1.caption := IntToStr(cont);
  inc(cont);
end;   

Salu2.