var
    SQLSession   : TPvSqlSession;
    btrQuery      : TPvQuery;
..............
begin
  SQLSession :=  TPvSqlSession.Create(Self);
  SQLSession.ServerName := 'Имя сервера';
  SQLSession.SessionName:='имя сессии (любая строка)';
  SQLSession.active := True;
  SQLSession.OpenDatabase('имя базы');
  btrQuery := TPvQuery.Create(PvSqlSession);
  btrQuery.SessionName := 'имя сессии (SQLSession.SessionName)';
  btrQuery.DatabaseName :='имя базы';
  btrQuery.SQL.Clear;
  s := 'SELECT * From "Table1"';
   btrQuery.SQL.Add(s);
   btrQuery.Open;
..........
end;