TaskDialogIndirect in einer 64bit Anwendung

[himitsu]

Delphi-Quellcode:

begin
  CheckCommonControl(  // oder    IF not InitCommonControl(...) THEN Error...
             ICC_LISTVIEW_CLASSES   or
             ICC_TREEVIEW_CLASSES   or
             ICC_BAR_CLASSES        or
             ICC_TAB_CLASSES        or
             ICC_UPDOWN_CLASS       or
             ICC_PROGRESS_CLASS     or
             ICC_HOTKEY_CLASS       or
             ICC_ANIMATE_CLASS      or
             //ICC_WIN95_CLASSES      or
             ICC_DATE_CLASSES       or
             ICC_USEREX_CLASSES     or
             ICC_COOL_CLASSES       or
             ICC_INTERNET_CLASSES   or
             ICC_PAGESCROLLER_CLASS or
             ICC_NATIVEFNTCTL_CLASS or
             ICC_STANDARD_CLASSES   or
             ICC_LINK_CLASS
             );  // wobei natürlich nur die wirklich benötigten Klassen initialisiert werden wüssten

  tdiMessageDialog('Anwendungsname',
                   'Nachricht',
                   'Nachrichtentext',
                   '<a href="http://www.delphipraxis.net">Delphi-PRAXiS</a>',
                   '',
                   TD_ERROR_ICON,
                   nil,
                   TDCBF_OK_BUTTON,
                   '',
                   ID_OK,
                   TDF_EXPANDED_BY_DEFAULT,
                   0); //Handle
end.

so?

Es sei denn die VCL Läd/Initialisiert noch was Anderes, daß du ohne VCL ebenfalls noch machen musst. (hab da aber, an den wichtigsten Stellen, nichts gesehn)