Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   sobre listbox y acceso a un item en particular (https://www.clubdelphi.com/foros/showthread.php?t=28168)

federiconqn21 12-12-2005 13:36:53

sobre listbox y acceso a un item en particular
 
hola,quisiera que alguien me pudiera explicar como accedo a un item de un listbox,utilizo la propiedad "items.valuefromindex[]",pero me devuelve el valor de esa posicion truncado,es decir,le falta el primer caracter.que solucion me pueden dar?
muchas gracias.....

dec 12-12-2005 14:06:04

Hola,

Vamos a recorrer todos los "items" de un "TListBox" para que te hagas una idea:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  i: integer;
begin
  for i := 0 to ListBox1.Count-1 do
    ShowMessage(ListBox1.Items[i]);
end;

federiconqn21 12-12-2005 15:46:00

Listbox
 
hola,
gracias amigo,muy util tu ayuda,quisiera preguntarte lo ultimo por hoy:
estoy trabajando con 2 listbox en paralelo,es decir,el i-esimo elemento de la lista 1 se corresponde con el iesimo elemento de la lista 2,
como hago para que al seleccionar el i-esimo elemento de una de las dos listas,tambien se seleccione el correspondiente de la otra?

dec 12-12-2005 16:01:33

Hola,

A ver si el "ejemplo" número 9 de este sitio Web puede ayudarte. ;)

federiconqn21 12-12-2005 16:50:15

sobre listbox
 
muy util el ejemplo que me enviaste,quisiera saber(con esto si termino por hoy)
lo siguiente:
cuando selecciono un elemento de un listbox,como manipulo su valor,es decir,si quisiera insertar ese valor en un tedit.text,o si quisiera operar con el en la forma que sea,cual es el indice del valor seleccionado? listbox.items[?].gracias una vez mas

Héctor Randolph 12-12-2005 17:20:42

La propiedad ItemIndex es la que te indica el elemento seleccionado, si no hay un elemento seleccionado toma el valor de -1.

Te pongo un ejemplo:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  if (ListBox1.ItemIndex<>-1) then
      ShowMessage(ListBox1.Items[ListBox1.ItemIndex]);
end;

saludos

trygvekor 29-11-2006 02:58:26

Hola, yo tengo el mismo problema del primer caracter, se pierde cuando lo quiero pasar desde un richedit a cualquier otro componente; y si o si necesito usar un trichedit (eso creo yo, corrijanme si no es asi) porque lo cargo con los contenidos del portapapeles cuando pego.

yo utilizo:

edit1.text:= richedit1.lines.valuefromindex[0];

y el edit me copia el contenido de toda la primer linea del richedit, menos el primer caracter, el cual se pierde.

Tambien intente agregarle un caracter o un espacio (' ') al principio de cada linea del richedit, y lo que hace es reemplazarlo por un '='.

Por ejemplo, originalmente la linea es asi:
Prueba de copia

y despues que le agrego un espacio a la linea (lo hago pot codigo) me queda asi:

=rueba de copia.

Muchisimas gracias...

trygvekor 29-11-2006 03:50:33

solucion
 
ya encontre la solucion, y la dejo posteada por si a alguien le pasa lo mismo.

en lugar de hacer richedit1.lines.valuefromindex[i] hago richedit1.strings[i].

la solucion estaba enfrente de mis ojos y no la veia...:D

Ricomarz 01-03-2007 03:04:16

Problema Con ListBox
 
Tengo un ListBox con esta informacion por ejemplo:

matricula digito folio importe estatus
304358 456 254 14258.00 0

Obtengo la linea y la separo en pedazos, lo que quiero es que cuando seleccione esa linea (row) del ListBox cambiar el estatus a 1, no se como hacerle he tratado pero no he podido ...

Espero puedan ayudarme ..

Saludos ......
Ricomarz.

joHn je@N 01-03-2007 10:22:49

Veamos
 
Segun lo que lei..creo que esto necesitas:
Código Delphi [-]
procedure TForm1.ListBox1Click(Sender: TObject);
var c : String;
begin
   c := ListBox1.Items.Strings[ListBox1.ItemIndex];
   c [Length (c)] := '1';
   ListBox1.Items.Strings[ListBox1.ItemIndex] := c;
end;

Espero te sirva.
SALUDOS


La franja horaria es GMT +2. Ahora son las 14:09:14.

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