Aero Glass Effekt für Delphi-Forms

[DGL-luke]

MÖP!

Im OnCreatze wirds nicht funktionieren, viele Kompoennten sind da noch nicht erstellt (ich sage viele, weil ein paar DInge bei einigen zwischendurch doch klappen).

Das macht man so:

1. private-feld "Init: Boolean" in die Formdeklaration

2. Init := true ins Oncreate

3. Ins OnShow:

Delphi-Quellcode:

if Init then
  begin
    Init := false;

    ......
    .......
    ...
  end;