Ver Mensaje Individual
  #3  
Antiguo 01-03-2005
Avatar de salvica
salvica salvica is offline
Miembro
 
Registrado: mar 2004
Ubicación: Albacete (España) ... En un lugar de la Mancha ...
Posts: 304
Reputación: 21
salvica Va por buen camino
Ante todo gracias por responder.

Perdona pero se me fué el "dedo" al la hora de escribir la preguna

Cita:
MySql me dá la propiedad "AsBoolean" cuando efectúo un "FieldByName" pero no sé como crear la tabla para que admita campos lógicos

debería haber puesto
La Query de Zeos para MySql me dá la propiedad "AsBoolean" cuando efectúo un "FieldByName" pero no sé como crear la tabla para que admita campos lógicos
Por tu respuesta deduzco que debo seguir con las funciones
Código Delphi [-]
  function  tyniIntToBoolean( expresion:integer ):boolean
  begin
    Result := (expresion=1);
  end;
  
  function  booleanToTyniInt( expresion:boolean ):string;
  begin
    if expresion
       then Result := '1'
       else Result := '0';
  end;
y luego en el Form:
Código Delphi [-]
    with Query do begin
       SQL.Add( 'UPDATE la_tabla' );
       SQL.Add( '   SET respuesta = ' + booleanToTyniInt( xRespuesta ) );
       SQL.Add( ' WHERE clave = "' + strCLAVE + '" ) ' );
    end;
Responder Con Cita