[Code]
procedure InitializeWizard;
var
  ADOConnection: Variant;
begin
  ADOConnection := CreateOleObject('ADODB.Connection');
  Msgbox(ADOConnection.Version, mbInformation, MB_OK);
end;