PDA

Ver la Versión Completa : ListView y CheckedBoxes


JXJ
06-05-2005, 23:35:29
Otra pregunta con respecto a TListView

Tengo la opcion de Checkboxes a true.
por ello necesito de saber que items han sido checados
o marcados y los que esten marcados, pase su valor. ??;S
a un Tedit.

por ejemplo. tengo
un item con su subtiem.
------------------------------------------
|Cuenta de Correo | Descripcion |
-------------------------------------------
||*| Cuenta@hotmail.com | Amigo |
||*| Otra@hotmail.com | Trabajo |
|| | Una@hotmail.com | para el espam |
|| | ss@hotmail.com | amiga |
-------------------------------------------

y entonces al hacer click en el boton. | aceptar.|
Las cuentas de correo de los items checkados o marcados
pasen a un TEdit. más un separador la coma ( , ).

--------------------------------------
|Cuenta@hotmail.com,Otra@hotmail.com |
--------------------------------------

Hasta ahora no logro hacer funcionar mi idea, solo obtengo errores de acceso
memoria.

Gracias.- por la atencion.n :D

FDB
07-05-2005, 00:37:28
Buenas!..

Te comento.. a grandes rasgos el codigo que aqui te pongo hace lo que tu quieres, supongo que abrá formas mas "profesionales" o como quieran llamarlo de hacerlo pero vamos, en un principio mejor que lo que por ahora tienes.. supongo que es..


var
i : integer;
begin
for i :=0 to listview1.Items.Count-1 do
if listview1.Items[i].Selected then
edit1.text := edit1.text+listview1.Items[i].Caption+',';
end;


eso en un boton.

Saludos! espero que te sirva para guiarte...

FDB
07-05-2005, 00:40:30
ups se me olvidaba... ahí uso la propiedad selected, mientras que si quieres hacerlo trabajando con los checks debes usar la checked.. aunque supongo que lo sabrás...

pero por si acaso

venga Saludos! nuevamente

JXJ
07-05-2005, 01:35:39
En pocas lineas te agradesco .. la orientación

funciono muy bien.

ya estaba harto desesperado que no lograra hacer
funcionar dicha idea.

Gracias de nuevo. :)

roman
07-05-2005, 02:16:14
Un pequeño detalle: en el algoritmo de FDB sobrará una coma al final.

// Saludos

JXJ
07-05-2005, 04:50:29
Asi es Roman yo especifique la coma al incio de la cuenta de correo. pero tambien si la pongo al final. me resulta enviar el correo. solo que no tenga, ,, doble coma. pues se me hehca a perder el exchange DNS lookup o algo asi. .

Todavai no logro como hacer para revisar el contenido del Edit. y si existen dobles triples o 4 comas, juntas ,,,,, eliminarlas y colocar solo una coma.