MYSQL и BOOLEAN

[dreyqq]

Есть у меня одна програмка, работает с базой данных Acсess. Дошёл до момента перевода этого софта на удалённую базу на сервере MySQL. Наткнулся на одну нерешимую для меня задачу, дабы софт полностью не переписывать, а именно на то, что в MySQL тип столбца почему-то становится tinyint(1) вместо boolean

Может кто знает решение как адаптировать BOOLEAN в программе и TINYINT(1) в базе, чтобы много кода не менять?
delphi xe5
adoconection
adotable

[^D^ima]

Цитата dreyqq @ 22.04.18, 17:55

TINYINT(1)

Я как понимаю это Int8 в delphi. целое 1 байтное.
типа того что-ли...

function BoolToInt8(b:boolean):int8;
begin
  if b then result:=1 else result:=0;
end;

т.е. все передачи базы обрабатывай через функцию

[dreyqq]

Решил проблему с помощью двух функций, и перехода в базе от BOOLEAN к INTEGER

function BtoI(b:boolean):integer;
begin
  if b=true then result:=1 else result:=0;
end;
 
function ItoB(i:integer):boolean;
begin
  if i=1 then result:=true else result:=false;
end;

В базе заменил на тип столбца INTEGER и в программе обработал всё через эти две функции