Como Interromper um execu��o

Question

Por favor gostaria de saber se tem como interromper uma opera��o em execu��o vou citar um exemplo em um formulario que criei tem umbot�o Ok no evento Onclick tem uma rotina que faz um lup de um DataSe...

Beppe · Answer

Coloque uma vari�vel Termina: Boolean no private do form.

No bot�o de cancelar:

Termina := True;

No loop:

Termina := False;
...
while not Termina and not DataSet1.EOF do
begin
  ...
  Application.ProcessMessages;
end;

F�rum Como Interromper um execu��o #195145