Kenn mich mit Andorra zwar nicht aus, aber versuch mal folgendes:
Delphi-Quellcode:
procedure TZatacka.Idle (Sender:TObject; var Done:boolean);
begin
AdPerCounter.Calculate;
AdDraw.Window.Title := 'FPS:' + IntToStr(AdPerCounter.FPS);
Done := False; // <----------------------
end;