Login-Delphi

[[enecumene]]

Hola de nuevo, continuando con el mismo hilo, quisiera saber como defino los privilegios de los usuarios? ejemplo:

la tabla de usuario contiene esos campos tipo "Yes/No" que son los botones y menus a restringir el acceso:

backup
findped
findtra
instra
insped
settings
reports
findsupli
inssupli
stats

con el mismo codigo del login como defino los accesos por ejemplo:
si se loguea pedro y el tiene estos privilegios:

backup->No
findped->Yes
findtra->Yes
instra->Yes
insped->Yes
settings->No
reports->Yes
findsupli->Yes
inssupli->Yes
stats->No

al momento de pedro loguearse los menus y botones correspondientes se pongan false o true dependiendo del Yes o No.

quise hacerlo asi pero no me funciona:

Código Delphi [-]
var
BackUp: string;
Begin
BackUp:=ADLoginbackup.Dataset.DatasetField.Value;
if BackUp = 'No' then
Begin
incio.BackUpdatos1.Enabled:=False;
end
else
Begin
incio.BackUpdatos1.Enabled:=True;
end;
end;