anchor.diff:      if ODBCLibraryHandle = nilhandle then
         begin
         RefCount := 0;
  -      Raise EInOutError.Create('Can not load ODBC client. Is it installed? ('+odbclib+')');
  +
  +      error:= GetLoadErrorStr;
  +      Raise EInOutError.Create('Can not load ODBC client. Is it installed? ('+odbclib+': '+error+')');
         end;
   
   {$ifdef fpc}
  
positive.code: 
  var RefCount : integer;
  
  Procedure InitialiseODBC(OverrideName : string ='');
  
  var libname : string;
  
  begin
    inc(RefCount);
  
negative.code: {$IFDEF DYNLOADINGODBC}
  Procedure InitialiseODBC(OverrideName : string ='');
  Procedure ReleaseODBC;
  function isODBCLoaded : boolean;
  
  var ODBCLibraryHandle : TLibHandle;
  {$ENDIF}
  