VCL Styles zeichnen teilweise unsauber

[BigAl]

Hallo zusammen,

ich habe einer meiner Applikationen ein dunkles VCL-Style verpasst. Das funktioniert soweit auch alles. Leider werden die Ecken von Panels teilweise unsauber gezeichnet und es gibt unsaubere Kanten.

Hier mal ein Beispiel was ich meine:

2020-12-05 11_56_59-Window.png
(der weiße Punkt in der Mitte ist das Problem)

Schalte ich meine Applikation in Vollbild ist alles gut. Das mache ich momentan so:

Delphi-Quellcode:

    BorderStyle := bsNone;

    // full-screen only possible if form is maximized
    if WindowState = wsMaximized then
    begin
      // detect the current monitor
      Monitor := Screen.MonitorFromWindow(Self.Handle);
      BoundsRect := Monitor.BoundsRect;
    end;

Wenn ich wieder zurück auf die normale Ansicht schalte bleibt auch alles gut. Die weißen Punkte sind verschwunden.

Nun zu meiner Frage: Gibt es eine Möglichkeit das VCL-Style initial "richtig" zu zeichnen. Ist schlecht zu erklären und eine Dokumentation zu VCL-Styles ist praktisch nicht vorhanden (oder ich habe sie noch nicht gefunden). Viele Themen werden bei Emba gar nicht beschrieben oder mit dem altbekannten Satz "...verfügen derzeit über keine Informationen..." oder so ähnlich Kommentiert...

Bin für jeden Tip, Hinweis, Idee etc. dankbar. Die App macht einfach einen unsauberen Eindruck wenn da nach dem Start überall solche Artefakte erscheinen.

Alex

[himitsu]

Von Styles und auch dem Selbstmalen im FMX war ich bisher immer nur enttäuscht. (überall unsaubere Probleme)

Klar, maximieren und zurück ist blöd, wenn der Nutzer das dann kurz sehen muß,
aber versuchmal vor dem Anzeigen (Show bzw. Vibisle=True) die Form zu Zeichnen.
-> vielleicht Self.PaintTo(EinBitmap.Canvas) im OnCreate


PS: Self.Monitor = Screen.MonitorFromWindow(Self.Handle)

[venice2]

Nur Interesse halber nachgefragt
warum self.* ist man eigentlich nicht schon der Eigentümer über "Monitor" wenn man es innerhalb der Classe TForm aufruft?

[himitsu]

Vielleicht als "Dokumentation", damit man sieht, dass keine globale Variable Monitor gemeint ist?
Oder sicherheitshalber, falls mal jemand auf die saudumme Idee kommen würde und ein WITH drumrum baut.
Aber ja, es geht auch ohne.

PS: TMonitor in System.pas und anderes TMonitor in Vcl.Forms.pas
System.TMonitor ... man sollte nicht jeden Scheiß bei C# abgucken und ohne Nachzudenken ins Delphi einbauen.

[venice2]

Zitat von himitsu:

Vielleicht als "Dokumentation", damit man sieht, dass keine globale Variable Monitor gemeint ist?
Oder sicherheitshalber, falls mal jemand auf die saudumme Idee kommen würde und ein WITH drumrum baut.
Aber ja, es geht auch ohne.

PS: TMonitor in System.pas und anderes TMonitor in Vcl.Forms.pas
System.TMonitor ... man sollte nicht jeden Scheiß bei C# abgucken und ohne Nachzudenken ins Delphi einbauen.

Versteh weil sonst unter Umständen die falsche Funktion aufgerufen wird.

[BigAl]

Hi,

danke für die Antworten / Infos. Das mit PaintTo bringt nicht wirklich was. Irgendwie habe ich das Gefühl, es hat mit den Berechnungen der Koordinaten zu tun (Round...). Manche Panels ins korrekt, manche werden an den Rändern nicht sauber gezeichnet...

Werde mal weiter versuchen. Wenn ich was habe poste ich es. Evtl. interessiert es ja jemand .

Ach ja, soviel weiß ich schon: Wenn ich das Hauptfenster ohne Rahmen start (BorderStyle := bsNone), dann ist alles ok...

Alex