Set Transaction isolation level serializable

Prezados amigos delphianos
Boa Noite Tenho um sistema e utilizo um banco de dados em sql server  e tento executar a intrução através de uma clase desenvolvida por mim sendo que não estou conseguindo alcançar o objetivo. o que acontece, Criei uma query em tempo de execução; FQry:Tquery; Procedure x(Tabela:string);   FQry := Tquery.create(nil);
  if fqry.active then
    fqry.close;
  fqry.sql.clear;
  fqry.sql.add = 'BEGIN TRANSACTION %S'+
                       #10'TRANSACTION ISOLATION LEVEL SERIALIZABLE'+
                       #10'SELECT *  FROM %S';
  fqry.execsql;
O que acontece a instrução executa, no exemplo deveria bloquear passo no momento de chamar o procedimento no meu coringa a TB_PRODUTOS. Então neste exato momento a tabela de produtos não poderia mais aceitar posts e nem apply. e ela esta aceitando.
Alguém sabe me informar como eu faço para solucionar este problema? Desde Já Agradeço Um ótimo dia
att : Leonardo Coelho Borges