VCL-Styles bei Delphi 10.4

[Daniel]

Ja, in der Sache ist das richtig - und es wäre schön gewesen, wenn Du das mit etwas mehr Gelassenheit hättest schreiben können.

[TiGü]

Zitat von Daniel:

Ja, in der Sache ist das richtig - und es wäre schön gewesen, wenn Du das mit etwas mehr Gelassenheit hättest schreiben können.

Es ist zu warm!

Ich versuche mich zu bessern!

[michiww]

Hallo Ralf,

ich habe das gleiche Problem wie Du, mein Programm lief und läuft noch unter 10.3.x einwandfrei.
Seit 10.4 (auch mit Patch 3) bringt es bevor OnShow aufgerufen wird eine Exception,
aber nur wenn ich als Style einen anderen als "Windows" auswähle.

Falls ich mit den Windows Style starte (was ja geht) und dann während das Programm läuft den Style wechsle geht alles,
außer wenn ich dann ein neues Fenster (Form) aufrufe dann kommt ebenfalls eine Exception.

D.h. die Exceptions kommen "nur" wenn ich einen anderen Style außer Windows vor dem Aufruf eines Fensters habe.
Aber ich möchte nicht erst das Fenster im Windows Style anzeigen und dann wechseln müssen, das schaut nicht gut aus,
außerdem ging es mit 10.3.x auch. Also definitiv ein Bug.
Hast Du schon was neues herausgefunden?

LG Michi

[Uwe Raabe]

Wir warten immer noch auf das Testprojekt...

[michiww]

Hallo Uwe,
danke für die Rückmeldung, aber das ist leider grad nicht so einfach,
ich hab schon ein Testprojekt für 10.4 gebaut, das funktioniert.
Mein Programm wo es nicht geht hat ein paar tausend Zeilen und ich hab noch keine Ahnung warum hier eine Exception kommt.
Wie gesagt bei 10.3 kommt keine und wenn ich als Style Windows nehme läuft es wie bisher.
Die Exception hab ich versucht zu debuggen aber sie tritt zwischen OnCreate (läuft durch) und OnShow auf,
d.h. kurz bevor das MainForm aufgebaut wird.

Wenn ich die Reihenfolge in der dproj Datei wie folgt ändere startet das Programm ohne Fehler,
aber sobald ich dann ein anderes neues Fenster öffne (z.B. mit ZweitesForm.Show) kommt wieder die Exception

Hier mit Exception
TStyleManager.TrySetStyle('Emerald Light Slate');
Application.Title := 'Testproject';
Application.CreateForm(TMainForm, MainForm);

Hier keine beim Start
Application.Title := 'Testproject';
Application.CreateForm(TMainForm, MainForm);
TStyleManager.TrySetStyle('Emerald Light Slate');


Danke für jede Idee und Hilfe
LG Michi

[himitsu]

und jetzt noch ein Stacktrace, wo genau es im TForm.Create knallt

[Reinhold]

Hallo an Alle.

Dieses Problem hatte Ich auch schon, da dachte ich auch erst an einen Fehler von Delphi.
Aller Dings war es nicht so, sondern ich hatte einfach vergessen Delphi 10.4 bekannt zugeben,
das ich den Style aus 10.3 verwenden möchte. Also rein in die Projektoptionen den Style dem Project
bekannt geben, neu compilieren und fertig.
Warum ist das so, wenn Delphi nichts von diesen Style weis, kann es den Style nicht in die Resourcen laden.
Somit kracht es beim Start des Programmes, da Delphi den Style aus der Resource laden will.

gruß Reinhold

[dummzeuch]

Zitat von michiww:

ich hab schon ein Testprojekt für 10.4 gebaut, das funktioniert.
Mein Programm wo es nicht geht hat ein paar tausend Zeilen und ich hab noch keine Ahnung warum hier eine Exception kommt.

üblicherweise kommt man bei sowas weiter, in dem man das Programm abspeckt. Erstmal großzügig alles rauswerfen, was in OnShow sowieso nicht benötigt wird. Schauen, ob der Fehler weg ist und dann weiter machen. Dabei nicht vergessen, auch Units rauszuwerfen.

Ich gehe davon aus, Du hast ein SCM, so dass dies gefahrlos möglich ist. Ein Backup der Original-Sourcen vorher kann natürlich trotzdem nicht schaden.

[michiww]

Hallo Reinhard,

das ist leider nicht das Problem, ich habe alle Styles entfernt und nochmal neu alle hinzu, aber egal mit welchen Style kommt eine Exception, nur mit dem Windows Style nicht.