[jachguate]

Empezado por vic_ia

Hola...

esto haciendo algo mas o menos como lo que se comenta en este hilo, solo que tomando los valores contrarios respecto como comenta ...
¿en verdad puedo tomar como "general" estos valores (0=false, 1=true), repito yo los estoy tomando al contrario considerando que hay funciones que si todo va bien te regresan 0 y si hay un error te devuelven el numero del error?... de antemano gracias por sus comentarios...

saludos...

Esta "tradición" entiendo que viene del lenguaje C, donde 0=falso y 1 = verdadero.

En Delphi, la representación binaria del tipo booleano se corresponde de la misma manera, de tal cuenta que al usarla podrias aplicar directamente un molde booleano a los valores enteros:

Código Delphi [-]
Var
  BooleanoEntero : Integer;
  Booleano : Boolean;

Begin
  BooleanoEntero := 0;
  Booleano := Boolean(BoleanoEntero); // Toma falso:
  if not Booleano Then
    ShowMessage('Realmente tiene falso!');
  BooleanoEntero := 1;
  Booleano := Boolean(BooleanoEntero); // Toma verdadero:
  if Booleano Then
    ShowMessage('Ahora tiene verdadero!');
  // moldeado directo:

  if Boolean(MiTablaCampoBooleano.AsInteger) Then
    ShowMessage('En la base de datos tiene almacenado 1 = verdadero');
end;

Hasta luego.