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)
-   -   Guardar Caption de varios DBCheckBox asignados a un solo campo (https://www.clubdelphi.com/foros/showthread.php?t=28931)

TrUnkS 06-01-2006 22:11:28

Guardar Caption de varios DBCheckBox asignados a un solo campo
 
:confused: Hola a todos los sabios. Quisiera preguntar algo con un ejemplo, por favor si alguien puede ser tan amable de ayudar.

Tendo un formulario con un GroupBox y en su Caption le puse SEXO. Dentro del GroupBox tengo 2 DBCheckBox y en sus Caption le puse Masculino y Femenino respectivamente. Quisiera saber como lo hago para guardar el Caption seleccionado en el campo SEXO de la tabla Paradox. Es decir, Si picho en Masculino que se guarde el valor Masculino en el campo, mientras que el otro quede en blanco sin ckequear. No quiero asignarle un campo a cada DBCheckBox, solo quiero un campo que se llame SEXO y ahi guarde el Caption seleccionado, no quiero 2 campos llamados MASCULINO con valor Si y Femenino con valor NO pues para ahorrar campos. Agradecido de antemano gracias.

PD: La idea es que en un reporte me aparezca SEXO=MASCULINO y que NO aparezca MASCULINO=Si, FEMENINO=No, eso ya lo se hacer

marcoszorrilla 06-01-2006 22:54:35

Tienes que utilizar un QrExpression, aquí te pongo un ejemplo con una mínima adaptación lo tendrás funcionando.
Código Delphi [-]
iF(Table1.RECARGO = True,'Tiene Recargo',' No tiene recargo')

Esto va dentro del QrExpression.


Un Saludo.

Héctor Randolph 06-01-2006 23:24:42

Creo que te conviene más utilizar un DBRadioGroup en lugar de GroupBox. Tienes dos propiedades importantes, Items que son los elementos que deseas que aparezcan y Values son los valores que se guardan en el campo cuando seleccionas ese elemento.

Un ejemplo:

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);

begin
  with DBRadioGroup1 do
  begin
    Items.Add('Yes');
    Items.Add('No');
    Items.Add('Maybe');
    Values.Add('Y');
    Values.Add('N');
    Values.Add('M');
  end;
end;


En este caso se muestra (Yes/No/ Maybe) y se guarda (Y/N/M) respectivamente.

En tu caso tienes dos items
  • Masculino
  • Femenino

Creo que no será necesario especificar los valores porque coinciden con los items.


Saludos.

TrUnkS 07-01-2006 00:33:14

GENIAL. Funciona de las dos formas. Se los agradezco enormemente muchas gracias:) . Además para muchos valores a almacenar es mejor modificar la propiedad columns para definir el numero de columnas, asi no se ocupa tanto espacio hacia abajo. Gracias


La franja horaria es GMT +2. Ahora son las 01:24:46.

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