[jhonny]

Siguiendo la manera en como lo estás haciendo y si usas una de las últimas versiones de Delphi, intenta:

Código Delphi [-]
   __DM.consulta1.close;
     _DM.consulta1.SQL.Text:='INSERT INTO USUARIOS(nombre_usuario,estado_usuario) values ('+QuotedStr(edit1.text)+','+QuotedStr(CheckBox1.Checked.ToString)+')';
     _DM.consulta1.ExecSQL;
     _DM.tusuarios.Refresh;

Si no:

Código Delphi [-]
  _DM.consulta1.close;
     _DM.consulta1.SQL.Text:='INSERT INTO USUARIOS(nombre_usuario,estado_usuario) values ('+QuotedStr(edit1.text)+','+QuotedStr(BoolToStr(CheckBox1.Checked))+')';
     _DM.consulta1.ExecSQL;
     _DM.tusuarios.Refresh;