Abortar un proceso

[TONIAM]

Hola foro, tengo una ventana modal, la cual cuando se crea en el evento del formulario FormActivate empieza un proceso de lectura de un fichero realizando varias cosas, a la ventana le puesto un boton de cancel, pero por mucho que le pulso no hace nada hasta que acaba el proceso, hay o conoceis alguna manera de cuando pulse el boton de cancelar, finalize el proceso aunque no haya terminado y cierre la ventana.

Muchas gracias y un saludo a todos

[[Lepe]]

Si la lectura es un bucle, puedes poner una bandera (variable booleana) para cancelar la carga, dentro del bucle debes poner un Application.ProcessMessages.

En caso de que la carga se realice mediante un XX.LoadFromFile ... poco podrás hacer (de momento no se me ocurre nada).

Cuanta más información aportes, mejor.

Saludos

[TONIAM]

Gracias por tu aportacion, te especifico un poco mas, es como tu dices es un bucle while de lectura de un fichero y mi intencion es desde un boton del dialog poder cancelar el bucle y cerrar la ventana, puedes especificarme un poco mas como puedo poner lo de la bandera que me dices y lo de la Application.ProcessMessages. Gracias por tu respuesta, otra cosa que no te comentado el formulario ya tiene un boton de cancelar, pero aunque lo aprete no hace nada, ni siquiera deja apretarlo hasta que acabe el proceso.

Gracias

[roman]

Suponiendo que tu bucle es algo como

Código Delphi [-]
while condiciones do
begin
  operaciones;
end;

lo que propone Lepe es que lo modifiques así:

Código Delphi [-]
Cancelado := false;

while condiciones and not Cancelado do
begin
  Application.ProcessMessages;

  operaciones;
end;

Application.ProcessMessages permite que tu formulario procese los mensajes en cada vuelta del ciclo, de manera que puedas orpimir el botón de Cancelar. En el evento OnClick de ese botón pondrías:

Código Delphi [-]
Cancelado := true;

// Saludos

[[seoane]]

Aquí deje un ejemplo de como hacer algo similar pero usando threads.

http://www.clubdelphi.com/foros/show...67&postcount=7

[TONIAM]

Gracias a todos, he solucionado el problema de la manera que me comento roman y Lepe lo unico que he detectado que no se muestra como se apreta el boton, pulsas y al cabo de unos segundos se cierra, pero no vez el efecto de pulsar el boton y tampoco es automatico, no se si me explico.

Nuevamente gracias a todos