Ich bin immer noch dabei zu versuchen, den AniIndicator zum laufen zu bringen, da ich für meine Live-Ticker-App einfach ein Objekt brauche, an dem ich zeigen kann, dass gerade aktualisiert wird.
Zumindest funktioniert der
NetworkIndicator auf der iOS-Eigenen Statusbar. Das Teil setzt ich vor dem Thread-Beginn auf
True und im
OnTerminate auf
False.
Delphi-Quellcode:
procedure TXMLReader.SetNetworkProgress(Value: boolean);
begin
{$IFDEF IOS}
TUIApplication.Wrap(TUIApplication.OCClass.sharedApplication).setNetworkActivityIndicatorVisible(Value);
{$ENDIF}
end;
Wenn ich jetzt einfach noch unter die Zeile den AniIndicator auf
Value setze, dann geschieht das Übliche, aber mit
beiden Indikatoren. Beide hören einfach nicht mehr auf zu drehen, bis irgendeine Display-Eingabe erfolgt. Es reicht aus, einfach mit dem Finger nach unten zu wischen, wobei ich auf diese Geste im Programm überhaupt icht reagiere.
Delphi-Quellcode:
procedure TXMLReader.SetNetworkProgress(Value: boolean);
begin
{$IFDEF IOS}
TUIApplication.Wrap(TUIApplication.OCClass.sharedApplication).setNetworkActivityIndicatorVisible(Value);
{$ENDIF}
AniIndicator1.Enabled:= Value;
end;
Was zur Hölle kann man dagegen unternehmen?