Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   ListView y CheckedBoxes (https://www.clubdelphi.com/foros/showthread.php?t=21120)

JXJ 06-05-2005 23:35:29

ListView y CheckedBoxes
 
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..

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

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


La franja horaria es GMT +2. Ahora son las 03:21:37.

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