Fehlerhafte Darstellung von TMenuItem Seperator in 10.3

[CodeX]

Ich habe die Ursache jetzt selbst analysiert (10.2 mit 10.3 verglichen) und gefixt. Falls es Deine (@Uwe Raabe) Änderungen sind, kannst Du den Fix gerne übernehmen. Ansonsten hilft das vielleicht noch anderen, die darauf stoßen. Ansonsten wird man künftig eben alle neuen Delphi-Anwendungen unter Windows 7 sehr leicht an den Menüs erkennen.

Vcl.Menus.pas

Der eigentliche Fehler liegt hier, weil eine Positionskorrektur fälschlicherweise auch für Separators durchgeführt wird:

Delphi-Quellcode:

1444:
// if LCheckRect.Bottom > ARect.Bottom then
if (LCheckRect.Bottom > ARect.Bottom) and (Caption <> cLineCaption) then

Unabhängig von der senkrechten Linie, die dadurch kaputt geht (was man unter Win10 aber nicht mitbekommt), verschiebt ich die waagerechte Linie nach links. Dem wurde dann in Zeile 1635 wohl versucht gegenzusteuern. Warum man bei einem Separator aber Abmessungen von Checkboxen oder Images berücksichtigen sollte statt den Fehler bei vorangehenden Änderungen zu suchen, erschließt sich mir nicht. Ich habe den Teil daher durch die vorherige 10.2er Version ersetzt:

Delphi-Quellcode:

1635:
//      LDetails := LStyle.GetElementDetails(tmPopupCheckNormal);
//      LStyle.GetElementSize(ACanvas.Handle, LDetails, esActual, LSize, LPPI);
//      if Assigned(ImageList) and (ImageList.Width > LSize.cx) then
//        LSize.cx := ImageList.Width;
//      if LStyle.GetElementMargins(ACanvas.Handle, LDetails, emContent, LCheckMargins, LPPI) then
//        Dec(LSize.cx, LCheckMargins.cxLeftWidth);
//      if not RightToLeft then
//        Inc(ARect.Left, LSize.cx)
//      else
//        Dec(ARect.Right, LSize.cx);
      if not RightToLeft then
        ARect.Left := LGutterRect.Right + 1
      else
        ARect.Right := LGutterRect.Left - 1;

Damit ist das Problem behoben.

[Uwe Raabe]

Zitat von CodeX:

Damit ist das Problem behoben.

Gilt das auch für High-DPI Anwendungen unter einem aktuellen Win10 oder nur für Windows 7.

[Uwe Raabe]

Zitat von CodeX:

Ich sag's mal so: Ich spiele auch kein Lotto, obwohl ich weiß, dass ich dann definitiv nichts gewinnen kann.

Ich pflanze aber auch einen Baum, obwohl ich weiß, dass ich vielleicht selbst niemals ernten oder in seinem Schatten sitzen kann.

[Bernhard Geyer]

In den letzten 360 Tagen gab es 2000 Ticktes im Emba-Jira geschlossen.
Hier zu sagen das nix gemacht wird ist schon sehr gewagt
Verglichen mit den Jahren zur qc-Zeit wird m.E. sehr viel mehr Fehler auch zeitnah behoben.
Die Qualität der letzten Delphi-Versionen ist gegenüber früher (D6 bis vor 3 Jahren und bis vor 6 Monaten XE6) ist (jedenfalls für mich) viel besser geworden.

[CodeX]

Zitat von Uwe Raabe:

Zitat von CodeX:

Damit ist das Problem behoben.

Gilt das auch für High-DPI Anwendungen unter einem aktuellen Win10 oder nur für Windows 7.

Ich habe es aktuell mit Win7 sowie Win10 mit 150% getestet. Bevor ich meine Software später dann veröffentliche, wird das zusätzlich noch in mehreren VMs mit unterschiedlichen Betriebssystem-Konstellationen getestet werden.

Die Lösung ist übrigens auch ohne groß zu testen logisch: Die X-Position für den Separator ist ja schon vorher korrekt. Wenn man sie nicht anfasst, stimmt alles. Mit Zeile 1444 wird diese dann "fehlkorrigiert" und in Zeile 1635 wird dann wieder recht umständlich versucht, die korrekte X-Position zu berechnen, die dann aber nur noch für die waagerechte aber nicht senkrechte Linie Relevanz hat.

Zitat von Uwe Raabe:

Zitat von CodeX:

Ich sag's mal so: Ich spiele auch kein Lotto, obwohl ich weiß, dass ich dann definitiv nichts gewinnen kann.

Ich pflanze aber auch einen Baum, obwohl ich weiß, dass ich vielleicht selbst niemals ernten oder in seinem Schatten sitzen kann.

Nur, dass Du im QP keinen Baum pflanzt, sondern einen Brief an die Regierung schreibst, weil Du gerne einen Baum an Deiner Straße hättest (um in Allegorien zu bleiben.). Kann man machen...

Zitat von Bernhard Geyer:

In den letzten 360 Tagen gab es 2000 Ticktes im Emba-Jira geschlossen.
Hier zu sagen das nix gemacht wird ist schon sehr gewagt

Na, dann filter aber bitte nochmal neu. Bei den meisten davon war die "Lösung": Duplicate, Won't Fix, Cannot Reproduce, Works As Expected
Von dem verbliebenen Rest ist nur ein Bruchteil davon für die Entwicklung von Windows-Anwendungen relevant. Und davon wiederum sind die meisten erst in 10.2 dazugekommen, also Bugs an Stellen, die vorher funktioniert haben.

Neue Features werden bewusst mit Fehlern veröffentlicht, um sie später dann fixen zu können: Erklärt mir doch mal bitte einer, warum die groß angekündigten und von vielen heiß erwarteten Inline-Variablen als Quelltext-Fehler markiert werden? Das kann man nicht übersehen haben. Wie kann man sowas überhaupt veröffentlichen?
Oder um das vorherige Beispiel nochmals aufzugreifen: Warum wird ein offensichtlicher und nerviger IDE-Bug, bei dem man bestimmte Komponenten nicht gleichzeitig auswählen kann, auch nach einem Jahr nicht behoben?

[Pfaffe]

Im Strafrecht nennt man das "Vorsatz", mindestens aber "Absicht".

[TurboMagic]

Zitat von CodeX:

https://quality.embarcadero.com/browse/RSP-19984
Man kann ja mal was kaputt machen, aber dann würde ich doch erwarten, dass man solche Bugs ab Kenntnisnahme sofort fixt!?

Tja und da kommt der springende Punkt: wenn du deinen TMainMenu Bug nicht in QP einträgst wird er evtl. nie zur Kenntnis genommen, weil er evtl. immer übersehen wird.

Und zu dem Report oben: ja das nervt, bich auch selber schon reingelaufen, bin mir aber recht sicher, dass die das in näherer Zukunft fixen,
ganz einfach schon weil die das auch selber beim Arbeiten nerven wird