{$include SHDocVw_defines.inc}
unit SHDocVwPreg;

interface

uses
  SHDocVw;

procedure Register;

implementation

uses  classes,LResources;


procedure Register;
begin
  RegisterComponents('ActiveX', [
                                  {$IFDEF TWebBrowser}              TWebBrowser             {$ENDIF}
                                  {$IFDEF TWebBrowser_V1}          ,TWebBrowser_V1          {$ENDIF}
                                  {$IFDEF TInternetExplorer}       ,TInternetExplorer       {$ENDIF}
                                  {$IFDEF TInternetExplorerMedium} ,TInternetExplorerMedium {$ENDIF}
                                  {$IFDEF TShellBrowserWindow}     ,TShellBrowserWindow     {$ENDIF}
			          {$IFDEF TShellWindows}           ,TShellWindows           {$ENDIF}
                                  {$IFDEF TShellUIHelper}          ,TShellUIHelper          {$ENDIF}
                                  {$IFDEF TShellNameSpace}         ,TShellNameSpace         {$ENDIF}
                                  {$IFDEF TCScriptErrorList}       ,TCScriptErrorList       {$ENDIF}                              
                                 ]);


end;

initialization

{$IFDEF TWebBrowser_V1}          

LazarusResources.Add('TWebBrowser_V1','BMP',[
#$42#$4D#248#0#0#0#0#0#0#0#120#0#0#0+
#40#0#0#0#16#0#0#0#16#0+
#0#0#1#0#4#0#0#0#0#0#0#0#0#0#18#11+
#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0+
#0#0#0#0#128#0#0#128#0#0#0#128#128#0#128#0+
#0#0#128#0#128#0#128#128#0#0#128#128#128#0#192#192+
#192#0#0#0#255#0#0#255#0#0#0#255#255#0#255#0+
#0#0#255#0#255#0#255#255#0#0#255#255#255#0#102#102+
#96#0#0#102#102#102#102#103#116#68#68#0#102#102#102#124+
#196#76#76#68#6#102#103#108#204#194#196#98#64#102#103#44+
#204#34#44#68#64#102#114#204#200#34#36#204#68#6#118#140+
#102#34#34#108#196#6#118#143#143#34#34#204#68#6#120#248+
#248#34#108#108#196#6#127#255#194#44#34#204#198#6#120#248+
#252#198#204#98#44#6#103#143#34#204#194#98#32#102#103#248+
#98#34#34#34#32#102#102#127#143#194#34#34#118#102#102#103+
#120#252#102#119#102#102#102#102#103#119#119#102#102#102#0#0
]);

{$ENDIF TWebBrowser_V1}

{$IFDEF TWebBrowser}              

LazarusResources.Add('TWebBrowser','BMP',[
#$42#$4D#248#0#0#0#0#0#0#0#120#0#0#0+
#40#0#0#0#16#0#0#0#16#0+
#0#0#1#0#4#0#0#0#0#0#0#0#0#0#18#11+
#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0+
#0#0#0#0#128#0#0#128#0#0#0#128#128#0#128#0+
#0#0#128#0#128#0#128#128#0#0#128#128#128#0#192#192+
#192#0#0#0#255#0#0#255#0#0#0#255#255#0#255#0+
#0#0#255#0#255#0#255#255#0#0#255#255#255#0#102#102+
#96#0#0#102#102#102#102#103#116#68#68#0#102#102#102#124+
#196#76#76#68#6#102#103#108#204#194#196#98#64#102#103#44+
#204#34#44#68#64#102#114#204#200#34#36#204#68#6#118#140+
#102#34#34#108#196#6#118#143#143#34#34#204#68#6#120#248+
#248#34#108#108#196#6#127#255#194#44#34#204#198#6#120#248+
#252#198#204#98#44#6#103#143#34#204#194#98#32#102#103#248+
#98#34#34#34#32#102#102#127#143#194#34#34#118#102#102#103+
#120#252#102#119#102#102#102#102#103#119#119#102#102#102#0#0
]);

{$ENDIF TWebBrowser}

end.