insertar datos de varios checkbox

[krewer]

Hola amigos, tengo una gran duda, estoy haciendo un programa el cual contiene varios checkbox y quisiera insertar en la tabla solo los valores que estan checked.

se que se puede hacer asi

if checkbox1.checked then
begin
.......
end;

Pero la cosa es que son bastantes checkbox y el usuario puede marcar mas de una.

[marcoszorrilla]

Mira este hilo (http://clubdelphi.com/foros/showthread.php?t=78370), quizás sea lo que estás buscando.

Un Saludo.

[Caro]

Mira este hilo (http://www.clubdelphi.com/foros/search.php?searchid=2627070), quizás sea lo que estás buscando.


Hola Marcos :), revisa el hilo.

Pero la cosa es que son bastantes checkbox y el usuario puede marcar mas de una.

Hola krewer, puedes recorrer los componentes que tienes en tu formulario y preguntar si es checkbox:


for i:=0 to ComponentCount-1 do
begin
if Components[i] is TCheckBox then
if TCheckBox(Components[i]).Checked then
Showmessage(TCheckBox(Components[i]).Caption);
end;


o mejor podrías utilizar un CheckListBox y así solo recorres sus items:


for i:= 0 to CheckListBox1.Items.Count-1 do
if CheckListBox1.Checked[i] then
Showmessage(CheckListBox1.Items[i]);


Saluditos

[roman]

Quizá Marcos se refiere a este hilo (http://clubdelphi.com/foros/showthread.php?t=78370).

// Saludos

[ecfisa]

Hola.

El enlace de Marcos hacía referencia al resultado de una búsqueda donde figuraba, entre otros, el hilo que menciona Roman.
Hoy de mañana funcionaba, pero no sé por que ahora no... :confused:

Saludos :)

[roman]

Bueno, no sé con exactitud cómo funciona esto, pero me parece que el vBulletin guarda una especie de caché de las búsquedas para evitar hacer consultas excesivas a la base. Pero tal caché tiene un tiempo limitado de vida y por ello se "descomponen" los enlaces.

// Saludos

[marcoszorrilla]

Gracias por la anotación acabo de pegar de nuevo el enlace, que es el que cita Román. Como bien dice Ecfisa el enlace funcionaba correctamente, de hecho siempre hago una prueba con los enlaces que pongo para ver que funcionan correctamente.

Un Saludo.