Mira este código si te sirve:
Código Delphi
[-]procedure TForm1.Insertar;
var
ValueChk: Array[Boolean] of ShortInt = (0, 1);
begin
with QueryPac do
begin
SQL.Add('INSERT INTO Pacientes(NOMBRE, CAMPO_BIT)');
SQL.Add('VALUES(' + QuotedStr(Edit3.Text)+ ', ' + IntToStr(ValueChk[CheckBox1.Checked]) + ')');
end;
end;
Los Campos Bit pueden tener 3 valores distintos:
0 = False, 1 = True, -1 = True
Un saludo.