seguimiento de una varialbe

[roman]

Ahora que entiendo que el visor artesanal en el que estamos trabajando es típico de lo que haría un programador en C en donde 0 es false y distinto de cero es true. Si queremos algo más de estilo Pascal podríamos usar:

// bZorrilla es una variable booleana

ShowMessage(Chr((Ord('T') - Ord('F'))*Integer(bZorrilla) + Ord('F')));

que nos mostraría 'F' si la variable es false y 'T' si es true. Obviamente podemos sustituir 'T' y 'F' por 'Y' y 'N' ('Yes' o 'No') o por 'S' y 'N' ('Sí' o 'No') según convenga a nuestros intereses.

De hecho podemos omitir totalmente el uso de funciones auxiliares como IntToStr, Chr u Ord y utulizar exclusivamente moldeo de tipos:

ShowMessage(Char((Integer('T') - Integer('F'))*Integer(bZorrilla) + Integer('F')));

// Saludos