Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   un campo, valor complementario en dos columnas (https://www.clubdelphi.com/foros/showthread.php?t=36226)

jonmendi 05-10-2006 10:29:43

un campo, valor complementario en dos columnas
 
Hola,
el título de la cuestión es tan peliagudo como la cuenstión en si misma.

Tengo un campo char que solo tiene dos posibles valores (no puedo usar un boolean porque la tabla no la he definido yo), Comprar(C) y Vender(V).
Quiero representar en pantalla mediante un dbgrid esta (y otra) información. Pretendo que en una columna del dbgrid aparezca Comprar y si es true o false y otra columna con Vender y si es false o true. La cuestión es que solo tengo un campo y con él quiero sacar dos columnas con valores inversos (si Comprar es true, Vender será False y a la inversa).

No sé como decirle a una columna que presente (solo presentar) el "inverso" al valor del campo.

Espero haberme explicado con meridiana claridad.

Muchas gracias a todos.
Jon

Uso delphi3, paradox

Nelet 05-10-2006 18:08:34

http://www.clubdelphi.com/foros/showthread.php?t=35541

Mira este hilo

Paoti 05-10-2006 19:30:30

puedes usar un campo calculado, cerado en delphi.

click botn derecho sobre tu tquery o TTable, opcion fields editor. en la venta que aparece, click boton derecho add all fields.

despues, alades otro campo, click boton derecho opcion "add Field"


aparece un editor de campos, introduces un campo que se llame EsVender, y le dices que es Calculated e, tipo de campo


haces lo mismo con otro campo llamado "EsComprar"


los campos pueden ser de tipo string.



ahora el siguiente paso, es prograar en el evento "OnCalcFields" del objeto Tquery o Table. mas o menos lo siguiente.


Código Delphi [-]
begin
// si es verdadero tu campo
if TTablaCamposDeTuTablaVender.asboolean tehn
begin
TTablaEsComprar.asString := 'Falso';
TTablaEsVender.asString := 'Verdadero';
end
else
begin
TTablaEsComprar.asString := 'Verdadero';
TTablaEsVender.asString := 'falso';
end;
end;


Espero te haya dado una idea, y en Delphi 3 puedas hacer campos calculados que lo desconozco.


busca en el historico, por "campos calculados" ha de haber más ayuda.



Saludos del Paoti

jonmendi 09-10-2006 09:11:30

gracias a ambos! me pongo ahora mismo con los campos calculados.

Un saludo,
Jon


La franja horaria es GMT +2. Ahora son las 07:12:52.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi