anchor.diff:    {Connection protocol values}
     TProtocolType = (ptLocal,ptTcpIp,ptNetBeui);
     {Provider Info}
  -  TProviderInfo = (piUnknow, piInterbase, piFirebird);
  +  TProviderInfo = (piUnknown, piInterbase, piFirebird);
     {Server Info}
  -  TServerInfo = (siUnKnow, siSuperServer, siClassicServer);
  +  TServerInfo = (siUnKnown, siSuperServer, siClassicServer);
   
     {@abstract(encapsulates the properties and methods for connect to firebird database)}
     TFBLDatabase = class(TComponent)
  
positive.code:   bOk: boolean;
    Res: integer;
  begin
    Result := piUnknow;
    Res := GetDBInfoInt2(isc_info_db_provider, bOk);
    if bOk then
    begin
  
negative.code:   bOk: boolean;
    Res: integer;
  begin
    Result := siUnknown;
    Res := GetDBInfoInt2(isc_info_db_class, bOk);
    if bOk then
    begin
  