convertir booleano a int o de int a booleano

[jacobobo]

Hola amigos del club, hize una migracion de paradox a mysql he estado cambiando el codigo adaptandolo a la nueva base de datos pero me he encontrado con un problema no se como resolverlo ya que un boton en su propiedad visible es booleano y estoy comparando un valor de una tabla en mysql que es del tipo tinyint (1) ya que en mysql he observado que no hay el tipo booleano por eso tuve que hacerlo asi. estoy utilizando los componentes zeos para conectar con mysql, el error que me manda es que son incompatibles los datos int y boleanos.


// m1 : es un boton
// datos.zcliente2activo.value : es una tabla con el campo activo es del tipo tinyint (1) ya que no existe el tipo booleano.

 
if (m1.visible) <> (datos.zcliente2Activo.value )  then     
  begin
           m1.visible := datos.zcliente2Activo.value ;     
           vp1.visible := datos.zcliente2Activo.value ;    
           bp1.Visible := datos.zcliente2Activo.value ;   
 
  end;

gracias.