在RmDataSkin.pas单元中有如下procedure:
procedure TmodSkin.SkinMenu(valForm: TCustomForm);
begin
{$IFDEF VclSkin}
if valForm <> nil then
FSkin.UpdateMenu(valForm);
{$ENDIF}
end;
将 FSkin.UpdateMenu(valForm);改成 FSkin.UpdateMenu(TForm(valForm));即可编译通过。