Conteo

Foro sobre popular lenguaje de Borland y el lenguaje pascal.

Moderador: yalmar

    

Conteo

Notapor eljuank » Jue May 24, 2007 8:22 am

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
eljuank
Novato
Novato
 
Mensajes: 4
Registrado: Vie May 18, 2007 10:11 pm
Ubicación: Cuba

Re: Conteo

Notapor yalmar » Jue May 24, 2007 1:04 pm

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.
Avatar de Usuario
yalmar
Programador Experimentado
Programador Experimentado
 
Mensajes: 264
Registrado: Mié Jun 09, 2004 4:14 pm
Ubicación: Brasil


    

Volver a Pascal

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados

cron