TStylemanager + Memory Leak

[TigerLilly]

Ich aktiviere einen Style:

Code:

  sFileName := ParamStr(0);
  sFileName := TPath.ChangeExtension(sFileName, 'style');
  if TFile.Exists(sFilename) then
    TStyleManager.SetStyleFromFile(sFileName);

Beim Programmende wird mir ein memoryleak angezeigt. Wie kann ich den StyleManager wieder abräumen?

Danke für jeden Tipp.

[Rollo62]

Probier mal

TStyleManager.SetStyle(nil);

[TigerLilly]

Auf die Idee wär ich nicht gekommen. Das probier ich mal.

[TigerLilly]

Update: Hilft nix. Trotzdem MemoryLeaks.

[Daniel]

Was leakt denn genau? Wenn es exakt eine Instanz vom TStyleManager und dessen internen Strukturen ist, dann ist das ein sog. "expected leak".
Wenn es nur der StyleManager ist, dann ist er (a) eh nur einmal im Speicher und wird (b) am Ende so oder so abgeräumt.

[TigerLilly]

Code:

---------------------------
Unexpected Memory Leak
---------------------------
An unexpected memory leak has occurred. The unexpected small block leaks are:



1 - 12 bytes: TWinAcceleratorKeyRegistry.TAcceleratorKeyReceivers x 1

53 - 60 bytes: TObjectDictionary<System.Char,System.Generics.Collections.TList<FMX.AcceleratorKey.IAcceleratorKeyReceiver>> x 1, Unknown x 1


---------------------------
OK   
---------------------------

Naja, expected oder nicht - ob klein oder groß - wenn ich´s vermeiden kann, hätt ich gern kein Leak.

[TigerLilly]

Ach ja - das ist nicht bei allen Styles so. Das sind ältere aus Delphi-Vorversionen. Kann es sein, dass man die nicht verwenden sollte?

[Rollo62]

Es gibt die PremiumStyles, habe aber nicht nachgeschaut ob es da Updates gibt.
Ich glaube die sind für alle 10.3.x gleich geblieben.

[TigerLilly]

Ich hab die jetzt 1:1 verwendet, was ich nicht versucht habe, ist den Style im Designer zu laden + neu zu speichern.