ListView y CheckedBoxes

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