Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   [FMX] Wie crSQLWait los werden? (https://www.delphipraxis.net/199985-%5Bfmx%5D-wie-crsqlwait-los-werden.html)

Medium 7. Mär 2019 16:09

[FMX] Wie crSQLWait los werden?
 
Tach zammen!

In meinem Programm werden in ein paar Threads Dinge aus einer Datenbank gelesen (MariaDB via MyDAC). (Auch ein paar wenige Dinge im Hauptthread.) Leider schaltet dies in schneller Abfolge immer wieder meinen Mauscursor zu crSQLWait und zurück, sodass dieser mächtig am flackern ist. Für VCL habe ich die "Lösung" gesehen, dass man
Delphi-Quellcode:
Screen.Cursors[crSQLWait] := crDefault;
machen kann um das global abzuschalten. In FMX aber habe ich kein vergleichbares Konstrukt gefunden - nur die cr*-Konstanten in System.UITypes, welche auch noch untypisiert sind, also auch nicht mit "böser Option" überscheibbar.

System.UITypes ins eigene Quellverzeichnis kopieren und anpassen bringt auch nichts, weil Delphi dann meckert, dass andere Units mit einer anderen Version davon compiliert wurden. Da das eine doch recht grundlegende Unit ist, habe ich den Ansatz nicht weiter verfolgt, da ich vermutlich auf diesem Wege letztlich eine Kopie von ganz FMX bräuchte...

Kann man das irgendwie anders noch erreichen? So wie es jetzt ist, bekommen meine Kunden ja nen epileptischen Anfall wenn sie 8h am Tag mit Flackercursor arbeiten sollen.

Edit: Version ist 10.2.3 Tokyo

Der schöne Günther 7. Mär 2019 16:29

AW: [FMX] Wie crSQLWait los werden?
 
Ich kenne jetzt nur FireDAC und nicht MyDAC, aber da kann man die ganze Cursor-Geschichte einstellen, egal ob VCL, FMX oder Konsole/Keine Oberfläche.

Das macht ja keinen Sinn die Wirkung zu bekämpfen wenn man stattdessen auch an die Ursache gehen könnte...

Medium 7. Mär 2019 16:38

AW: [FMX] Wie crSQLWait los werden?
 
Das hatte ich auch neidvoll gesehen. Leider aber dann vergebens nach einem Weg dies bei DevArt zu machen gesucht :?

hoika 7. Mär 2019 17:09

AW: [FMX] Wie crSQLWait los werden?
 
Hallo,
ist das hier MyDAC?
https://forums.devart.com/viewtopic.php?t=1752

Und falls der Original-Link mal verloren geht:

You need write at any place in your project DBAccess.ChangeCursor := False; to disable SQL hourglass cursor

Medium 7. Mär 2019 17:22

AW: [FMX] Wie crSQLWait los werden?
 
Jaaaaa!!! Du bist mein persönlicher Held der Woche! Danke! :kiss:

Da haben meine Google-Wortwahl-Fähigkeiten versagt. Dieser Thread kam mir nicht unter komischerweise. Funktioniert 1a!

hoika 8. Mär 2019 06:23

AW: [FMX] Wie crSQLWait los werden?
 
Hallo,
tja Google ist Dein bester Freund, wenn man weiß, wonach man suchen muss. ;)


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:03 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz