Código Delphi [-]QueryPac.SQL.Add('Insert into pacientes(nombre,campo_bit) values(' +chr(39)+edit3.Text+chr(39)+',' +BoolToStr(false)+')');
QueryPac.SQL.Add('Insert into pacientes(nombre,campo_bit) values(' +chr(39)+edit3.Text+chr(39)+',' +BoolToStr(false)+')');