zyklisch auf Form.Canvas zeichnen in iOS

[Hofix2004]

Wenn ich ein Label auf das Formular setze und folgendes mache, dann klappt das Zeichnen auch

procedure TCanvasTestForm.Timer1Timer(Sender: TObject);
begin
Label1.Text := inttostr(x);
end;