Falsche Darstellung einer ListView im PageControl

[Mike_on_Tour]

Hallo zusammen,

Im anhängenden Beispielprogramm geht es um einen bisher nicht erklärbaren Effekt bei der Anzeige von TListView-Komponenten innerhalb von verschiedenen TabSheets einer PageControl.

Als Entwicklungssystem werden Delphi XE2 und/oder Delphi 10.2 eingesetzt. Als Betriebssystem wird Windows7-Pro64 mit einer Standard-Bildschirmauflösung (1680 x 1050) und kleiner Textdarstellung (100 Prozent) verwendet.

Je nach Bildschirmauflösung und Textdarstellung werden ListView-Komponenten nicht korrekt dargestellt. Es wird keine Skalierung "angewendet" und die Anzeige erfolgt mit den Vorgabewerten aus der IDE. Dazu folgende Testläufe:

1. Testlauf (Standard-Einstellung)
Die Konstante BSCALED (Form2, Zeile 83) wird auf "FALSE" gesetzt.
Die Konstante BPAGED (Form2, Zeile 84) wird auf "FALSE" gesetzt.
Die Auswahl eines TabSheets auf dem 'PageControl1' in der Form2 hat keine Bedeutung.
Das Programm wird gestartet.
Beide ListView-Anzeigen werden korrekt dargestellt.
Alles OK.

2. Testlauf (Simulation einer Skalierung, Textdarstellung 125 Prozent)
Die Konstante BSCALED (Form2, Zeile 83) wird auf "TRUE" gesetzt.
Die Konstante BPAGED (Form2, Zeile 84) wird auf "FALSE" gesetzt.
In der IDE wird in 'Form2' auf dem 'PageControl1' der 'TabSheet1' ausgewählt.
Die ListView-Anzeige auf dem 'TabSheet1' wird korrekt dargestellt.
Die ListView-Anzeige auf dem 'TabSheet2' wird nicht korrekt dargestellt.

3. Testlauf (Simulation einer Skalierung, Textdarstellung 125 Prozent)
Die Konstante BSCALED (Form2, Zeile 83) wird auf "TRUE" gesetzt.
Die Konstante BPAGED (Form2, Zeile 84) wird auf "FALSE" gesetzt.
In der IDE wird in 'Form2' auf dem 'PageControl1' der 'TabSheet2' ausgewählt.
Die ListView-Anzeige auf dem 'TabSheet1' wird nicht korrekt dargestellt.
Die ListView-Anzeige auf dem 'TabSheet2' wird korrekt dargestellt.

4. Testlauf (Simulation einer Skalierung, Textdarstellung 125 Prozent)
Die Konstante BSCALED (Form2, Zeile 83) wird auf "TRUE" gesetzt.
Die Konstante BPAGED (Form2, Zeile 84) wird auf "TRUE" gesetzt.
In der IDE wird in 'Form2' auf dem 'PageControl1' der 'TabSheet1' ausgewählt.
Die ListView-Anzeige auf dem 'TabSheet1' wird korrekt dargestellt.
Die ListView-Anzeige auf dem 'TabSheet2' wird korrekt dargestellt.

5. Testlauf (Simulation einer Skalierung, Textdarstellung 125 Prozent)
Die Konstante BSCALED (Form2, Zeile 83) wird auf "TRUE" gesetzt.
Die Konstante BPAGED (Form2, Zeile 84) wird auf "TRUE" gesetzt.
In der IDE wird in 'Form2' auf dem 'PageControl1' der 'TabSheet2' ausgewählt.
Die ListView-Anzeige auf dem 'TabSheet1' wird nicht korrekt dargestellt.
Die ListView-Anzeige auf dem 'TabSheet2' wird korrekt dargestellt.

Wie ist das Verhalten der ListView's zu erklären und wo liegt der Fehler ?

Mit besten Grüßen
Mike

[WiPhi]

Hallo Mike,

ich habe mir dein kleines Testprogramm im Delphi 10.2 (Starter und Pro) angesehn. Den Effekt konnte ich reproduzieren, also vermute ich das es sich hierbei um ein VCL Skalierungsproblem seitens Delphi handelt.

Vielleicht wäre das einen Eintrag im QC wert?

Viele Grüße.

[Papaschlumpf73]

Hast du das schon probiert?

http://www.delphipraxis.net/189426-d...ontrol+scaleby

[haentschman]

Hallöle...
Zu erst einmal, das Projekt im Anhang schaut jetzt auch mit 125 so aus wie du es willst.
Schau dir im Projekt meine Änderungen an. (Properties der Controls). Warum die Listviev nicht den Font übernimmt kann ich nicht sagen.

[meine Meinung]
Das ScaleBy funktioniert nicht wirklich. Ich würde Windows das Skalieren überlassen. Dafür mußt aber alle Controls "anheften".
[/meine Meinung]

Ein paar Tipps:
1. Ancors, Margins und Align sind dein Freund. Erst Recht wenn du auf mobilen Platformen arbeitest oder willst.
2. Versuche die Anzahl der verschieden Controls zu minimieren. Die Eigenschaften des ValueListEditors lassen sich auch mit Sicherheit auch in einer Listview darstellen. Der Vorteil die Optik paßt. Wie du sehen kannst ist der ValueListEditor in 125 unterschiedlich zur Listview hoch. Auch die Header passen optisch nicht. Wenn man auch solche Kleinigkeiten achtet, stört dich es irgendwann oder du hast viel Arbeit mit der Anpassung.
3. Die Controls auf Panels plazieren. Erleichtert die Positionierung. (pnl1 = Hilfspanel)
4. Bezeichnung der Controls. Unterstriche sind nicht mehr "erlaubt" Wenn möglich Denglisch vermeiden.

Delphi-Quellcode:

Label_Telefon.Caption := '12345';
// besser...
lblPhone.Caption := '12345';

[Mike_on_Tour]

Hallo zusammen,

vielen Dank erst mal für die Antworten. Ich war zwischenzeitlich erst mal mit anderen wichtigen Aufgaben "unterwegs" und habe das Thema verdrängt.
Aus meiner Sicht ist mein "Testlauf Nr. 4" aktuell die beste Lösung als "Workaround".

@ WiPhi

Zitat:

ich habe mir dein kleines Testprogramm im Delphi 10.2 (Starter und Pro) angesehn. Den Effekt konnte ich reproduzieren, also vermute ich das es sich hierbei um ein VCL Skalierungsproblem seitens Delphi handelt.
Vielleicht wäre das einen Eintrag im QC wert?

Danke für Deine Antwort. Ich dachte schon, ich kann nicht programmieren.
Ich bin mir nicht ganz sicher, aber bei meiner Suche nach einer Lösung hatte ich im QC schon etwas ähnliches gefunden. "Inchmurrin" und ich gehen im QC noch mal auf die Suche.

@Papaschlumpf73

Zitat:

Hast du das schon probiert?
Delphi Berlin 10.1 ScaleBy TPageControl
http://www.delphipraxis.net/189426-d...ontrol+scaleby

Danke für den Hinweis. Nach einer längeren Suche hatte ich das auch noch gefunden.
Im Ernstfall müsste ich aber mehrere Programmier-Arbeitsplätze "manipulieren". Das gefällt mir nicht wirklich.

@haentschman
Vielen Dank für die Unterstützung. Ich hatte keine Lust, das komplette Projekt hier zur diskutieren. Ich habe also nur ein Beispiel-Programm "geliefert", um das Problem etwas besser darzustellen.

Zitat:

Das ScaleBy funktioniert nicht wirklich. Ich würde Windows das Skalieren überlassen.

Mit der "ScaleBy"-Funktion wollte ich nur eine Änderung der Bildschirm-Auflösung "simulieren". Im "echten" Leben darf das selbstverständlich Windows machen.

Ich liebe Tipps, aber ...
1.
Es wird definitiv keine Anwendung für mobile Plattformen geben. Alle Positionen werden generell von oben links nach unten rechts definiert.
2.
Die Verwendung eines ValueListEditors und einer Listview (im echten Programm) wird schon seine Gründe haben. Eine Diskussion darüber ist also nicht notwendig.
3.
Die Verwendung eines zusätzlichen Panels ist auch nichts anderes als ein "Workaround". Den gleichen Effekt erreiche ich mit einem absichtlichen Tabsheet-Wechsel im "FormActivate" oder "FormShow" (siehe Testlauf 4).
4.1
Warum sind Unterstriche nicht mehr erlaubt ?
4.2
Seit wann sind Unterstriche nicht mehr erlaubt ?
4.3
Wo steht das, dass Unterstriche nicht mehr erlaubt sind ? (Fakten Fakten Fakten)
4.4
Warum akzeptiert Delphi dann noch Unterstriche, wenn es nicht mehr erlaubt ist ?
4.5
Warum soll ich englische Bezeichnungen bei einer rein deutschen Softwareentwicklung vorziehen ?
Wo steht das ?
Seit wann gilt das ?
5.
Ich habe bewusst nur ein Beispiel-Programm zur Darstellung des Problems bereit gestellt. Dabei sind ein paar Bezeichner von Variablen einfach nur kopiert worden. Da jetzt gleich mit einer großen "Belehrung" zu antworten, war nicht wirklich hilfreich.

Zwei von drei Lesern haben das auch als Beispiel-Programm so erkannt.

Danke noch mal für alle Antworten.
slàinte mhath

Mike

[Glados]

Zitat:

Warum sind Unterstriche nicht mehr erlaubt ?

Ich glaube er wollte damit nur sagen:
"Wenn du nicht der einzige bist der an dem Quellcode arbeitet, halte einen Gewissen Standard XYZ ein, damit jeder sofort weiß was Sache ist wenn jemand deinen Code sieht".

Wenn du aber der einzige an dem Projekt bist und den Code auch nicht veröffentlichen möchtest, dann schreibe Code so, wie du es am besten findest.

[Mike_on_Tour]

Hallo Glados,

Danke für die Info.
Prinzipiell kann ich "haentschman" schon verstehen. Aber bei einem Beispiel-Programm sind diese Hinweise nicht wirklich notwendig. Und manche verstehen unter "Standard" das, was vor 20 Jahren vielleicht mal aktuell war. Mein Stil entspricht sicher nicht mehr dem Standard aus alter Zeit, dafür habe ich zu viel Erfahrung sammeln müssen und können. Vielleicht sollten manche auch mal mit der Zeit gehen und sich nicht nur ans Lehrbuch klammern.

Viele Grüße,
Mike