[ChinYan]

procedure Waiting(Sender: TObject; var Done: Boolean);
procedure TForm1.Waiting(Sender: TObject; Done: Boolean);

Видите разницу (TForm1 не в счет)?

А вообще, OnIdle может и не сработать, для фоновой работы лучше подойдут потоки