hi,
I had the same problems with an application using XPMan komponent
and a
dll. After some hours of investigation I found that the problem
is in
unit Themes.pas (..Delphi7\Source\
Vcl)- in the procedure
TThemeServices.UnloadThemeData.
I closed all the code in this procedure in brackets, compiled and with
the new Themes.dcu I replaced the old one in ..Delphi7\Lib
procedure TThemeServices.UnloadThemeData;
var
Entry: TThemedElement;
begin
{for Entry := Low(TThemeData) to High(TThemeData) do
if FThemeData[Entry] <> 0 then
begin
CloseThemeData(FThemeData[Entry]);
FThemeData[Entry] := 0;
end;}
end;
Now everyhing works well - no errors.
Gustav