[Investment]

Tambien puede ser un problema de mayusculas y minusculas... o de espacios. Puedes asegurla con lo siguiente:

  If Trim(Uppercase(resultado))='ADMINISTRADOR' then
    gbadmin.Visible:=true
  else
    gbadmin.Visible:=false;
  end;