Crear, modificar, borrar usuarios y asignar privilegios en Firebird

[Casimiro Notevi]

Gracias por el aporte


Una puntualización:

El .Clear no hace falta porque al asignar la sentencia con .Text estás 'limpiando' lo que hubiese escrito antes.
Lo que sí estaría bien es cerrar antes de asignar una nueva sentencia y ejecutarla, por lo que yo lo dejaría así:

Código Delphi [-]
fconectar.zquery1.SQL.Close;     // fconectar.zquery1.SQL.Clear;
fconectar.ZQuery1.SQL.Text:='GRANT SELECT ON productos TO '+nombre.Text;
fconectar.zquery1.ExecSQL;

[anubis]

Muchas gracias casimiro por los aportes, voy a ir modificando esos detalles.

En verdad gracias.