Компиляция прошла, но дело было не в TForm1, как вы упоминали, а в отсутствии ключевого слова var перед вторым параметром:
Код:
procedure TForm1.Waiting(Sender: TObject; var Done: Boolean);
begin
StatusBar1.SimplePanel := True;
StatusBar1.SimpleText := 'OK! Let"s get going';
Done := True;
end;
