[apicito]

He tenido que desinstalar el firebird, eliminar el directorio y volver a isntalarlo para que lo desbloquera. Es normal esto?.
Para ilustrar mejor el caso os pongo el código con el que bloqueo el registro. En toda la aplicación solo utilizo el bloqueo aquí.

  QueryResCon.Close;
  QueryResCon.SQL.Clear;
  if Res_Tipo='E' then
    QueryResCon.SQL.Add('select * from RESCON where RESCON_TIPO=1 for update with lock')
  else
    QueryResCon.SQL.Add('select * from RESCON where RESCON_TIPO=2 for update with lock');
  x:=1;
  while x < 10 do
    begin
      try
        QueryResCon.Open;
        x:=11
      except
        if x > 5 then
          begin
            Showmessage('Contador ocupado por otro usuario, intentalo de nuevo');
            Exit;
          end;
        x:=x+1;
      end;
    end;