TLabel.AutoSize und High DPI

[Alucard]

Ich bin es mal wieder mit einem High DPI-Problem... Dieses Mal betrifft es das AutoSize von TLabel.

Ausgangsszenario:

• gegeben sei eine Tabellen-artige Struktur, die zur Laufzeit zeilenweise erzeugt wird
• jede Zeile besteht aus einem TPanel, auf dem mehrere TLabels liegen
• den Labels wird Text zugewiesen
• abschließend werden die Labels links- oder rechtsbündig ausgerichtet, wobei TLabel.Width die wesentliche Eigenschaft ist

Code:

procedure TFormBib.AddTrackGridEntry;
const TrackGridEntry : integer = 22;
var i : byte;
begin
//Trackgrid verlängern
SetLength(TrackGrid, Length(TrackGrid) + 1);

With TrackGrid[High(TrackGrid)] do
     begin
     Track   := TPanel.Create(Self);
     Nummer := TLabel.Create(Self);
     {...}

     Track.Parent   := ScrollBoxPlayTracks;
     Nummer.Parent := Track;
     {...}
     end;

With TrackGrid[High(TrackGrid)].Track do
     begin
     ParentBackground := false;

     BevelOuter := bvNone;
     BevelInner := bvNone;

     Top     := TrackGridEntry * High(TrackGrid);
     Height := TrackGridEntry;

     If High(TrackGrid) mod 2 <> 0
        then Color := clGray
        else Color := clMedGray;
     end;

With TrackGrid[High(TrackGrid)] do
     For i := 0 to Track.ControlCount - 1 do
         If Track.Controls[i] is TLabel
            then With (Track.Controls[i] as TLabel) do
                       begin
                       Top := 2;
                       Font.Color := clBlack;
                          
                       Transparent := false;   //nur für den Test
                       Color        := clTeal; //nur für den Test
                       end;
end;

Ich nutze das Programm entweder auf einem Monitor mit 200%-Skalierung oder auf einem Monitor ohne Skalierung, daher ist "Projekt -> Optionen -> Manifest -> DPI-Unterstützung" auf "GDI-Skalierung" gesetzt (Ist das sinnvoll?!). Leider wird das gewünschte Ergebnis (siehe Anhang "gut") nur auf dem Monitor ohne Skalierung erreicht, auf dem skalierten Monitor sind die Labels manchmal zu klein, manchmal zu groß, manchmal auch passend - was final natürlich die Ausrichtung verhagelt (siehe Anhang "schlecht"). Alternativ kann ich die DPI-Unterstützung auch auf "Keine" setzen, dann passen die Labels auch auf dem skalierten Monitor - allerdings sieht dann das ganze Programm wie verpixelte Moppelkotze aus :-/

Irgendwelche Ideen, warum AutoSize sich hier so erratisch verhält?

P.S.: Vermutlich fehlt zu einer geistreichen Beantwortung hier mal wieder wichtiger Input... Ich weiß nur nicht, wo ich da anfangen soll, einfach nachfragen bitte