[ecfisa]

Hola.

Empezado por Juampi

Hola ecfisa.

El primero me dio error, este era el código:
...
Y me daba el error: Error: Identifier not found "ApplicationEventsIdle"

Ese error indica que te faltó declarar el procedimiento como método del form:

Código Delphi [-]
...
type
  TForm1 = class(TForm)
  ...
  private
    { private declarations }
     procedure ApplicationEventsIdle(Sender: TObject; var Done: Boolean);  // <-
  public
    { public declarations }
  end;

Saludos