Inhabilitar botones según el estatus en una tabla de la base de datos!!!

[rotsen26]

Empezado por Caral

Hola
No se si entiendo bien, pero si es solo cambiar la condicion del primer boton, tal vez usando un else sea suficiente:

Código Delphi [-]
if qry_edo_habestatus.value='DES' then
    begin
      BTN1.Enabled:=true;
      BTN2.Enabled:=false;
      BTN3.Enabled:=false;
      BTN4.Enabled:=false;
      BTN5.Enabled:=false;
      BTN6.Enabled:=false;
    end
else
    begin
      BTN1.Enabled:=false;
      BTN2.Enabled:=true;
      BTN3.Enabled:=true;
      BTN4.Enabled:=true;
      BTN5.Enabled:=true;
      BTN6.Enabled:=true;
   end;

Saludos

La verdad así lo tengo pero me marca un error...
http://www.clubdelphi.com/foros/atta...1&d=1363223728