bucle infinito

[Khronos]

Lo mejor seria utilizar un timer con el intervalo a 1, tendrias un evento ke se lanzara cada milisegundo.
Podrias usar otra cosa pero nadie en su sano juicio la usaria ya que se emplea en programacion virica y tiende a dejar colgado el programa o el sistema .
Hablo de GoTo. Solo la nombro.


procedure TForm1.FormActivate(Sender: TObject);
label continuo;
begin
continuo:
FRECUENCIA(edit1.text);
Goto continuo;
end;



Espero haberte ayudado.

Salu2