InitCommonControlsEx ohne VCL/Forms

[uligerhardt]

Ich möchte gerne InitCommonControlsEx aufrufen, ohne Forms oder Controls zu usen. Wenn ich es so

Delphi-Quellcode:

program CommCtrlTest;

uses
  CommCtrl,
  SysUtils;

var
  icc: TInitCommonControlsEx = (
    dwSize: sizeof(TInitCommonControlsEx);
    dwICC: ICC_BAR_CLASSES;
    );
begin
  Win32Check(InitCommonControlsEx(icc));
end.

probiere, bekomme ich

Zitat:

Zitat von Benachrichtigung über Debugger-Exception

Systemfehler. Code: 126.
Das angegebene Modul wurde nicht gefunden

. Sobald ich Forms oder Controls zur uses-Klausel hinzufüge, klappt es. Ich vermute, irgendein Aufruf in einem initialization-Abschnitt regelt das - ich finde nur nicht heraus, welcher. Kann mir da jemand helfen?

Edit: Wenn man InitCommonControls vor InitCommonControlsEx aufruft, klappt's. Ich werd jetzt grad aus der MSDN-Doku nicht schlau, ob das so sein soll oder nicht.