he probado y no me funciona... es como si fuera un bucle comun y corriente, porque muestra a la label1 incrementandose muy rapidamente, pero no puedo destildar la casilla de verificacion, ni apretar el boton, ni nada...
les dejo el codigo con el que probé
Código Delphi
[-]procedure FRECUENCIA(numero:integer);
begin
form1.label1.caption:=inttostr(numero);
form1.Refresh;
end;
procedure TForm1.Button1Click(Sender: TObject);
label continuo;
var numero:integer;
begin
numero:=0;
continuo:
begin
numero:=numero+1;
FRECUENCIA(numero);
if checkbox1.checked then Goto continuo
end;
end;