ListView y CheckedBoxes

[JXJ]

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

[FDB]

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..

Código Delphi [-]
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]

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]

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]

Un pequeño detalle: en el algoritmo de FDB sobrará una coma al final.

// Saludos

[JXJ]

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.