Convertir de ListBox a distintas cadenas de texto

[dec]

Hola,

Puedes acceder a los "Items" de un "ListBox" mediante la propiedad del mismo nombre:

Código Delphi [-]
var
  s: string;
begin
  
  s := ListBox1.Items[0];

end;

En este caso la variable "s" contendrá el texto del primer elemento de la lista.

[*Caro*]

Hola, solo necesitas acceder a la posición que necesitas en su propiedad Items, un ejemplo para ver el item seleccionado.

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
showmessage(ComboBox1.Items[ComboBox1.ItemIndex]);
end;

Saluditos

[j_flores3000]

Empezado por Caro

Hola, solo necesitas acceder a la posición que necesitas en su propiedad Items, un ejemplo para ver el item seleccionado.

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
showmessage(ComboBox1.Items[ComboBox1.ItemIndex]);
end;

Saluditos

Lo que quiero hacer es acceder automaticamente no uno por uno porque la cantidad de los items no es fija

[*Caro*]

Empezado por j_flores3000

Lo que quiero hacer es acceder automaticamente no uno por uno porque la cantidad de los items no es fija

Hola de nuevo, puedes acceder a todos los items recorriendo, ejemplo:

Código Delphi [-]
var
 cadena : String;
begin
 for Ind:=0 to ComboBox1.Items.Count-1 do
  begin
   cadena := ComboBox1.Items[Ind];
   showmessage(cadena); 
  end;

Saluditos

[dec]

Hola,

Puedes valerte de otras propiedades de "Items" para recorrer los existentes:

Código Delphi [-]
var
  s: string;
  i, len: integer;

begin

  len := ListBox1.Items.Count - 1;

  for i := 0 to len do
  begin

    s := s + ' - ' + ListBox1.Items[i];

  end;

  // Muestra los elementos separados por guiones

  ShowMessage(s);

end;

[j_flores3000]

Empezado por dec

Hola,

Puedes valerte de otras propiedades de "Items" para recorrer los existentes:

Código Delphi [-]
var
  s: string;
  i, len: integer;

begin

  len := ListBox1.Items.Count - 1;

  for i := 0 to len do
  begin

    s := s + ' - ' + ListBox1.Items[i];

  end;

  // Muestra los elementos separados por guiones

  ShowMessage(s);

end;

Sin ser molesto lo que hacen ahi es agregar todos los items a 1 sola cadena de texto yo necesito que se haga cada palabra (o item) en una variable distinta

[*Caro*]

Empezado por j_flores3000

Sin ser molesto lo que hacen ahi es agregar todos los items a 1 sola cadena de texto yo necesito que se haga cada palabra (o item) en una variable distinta

No entiendo porque lo quieres poner en diferentes variables, si puedes trabajar con la lista de items directamente.

En diferentes variables:

Código Delphi [-]
var
 cadena : String;
 var1, var2, var3, var4, var5....... : String;
begin
 for Ind:=0 to ComboBox1.Items.Count-1 do
  begin
    cadena := ComboBox1.Items[Ind];
    Case Ind Of
     0 : var1 := cadena;
     1 : var2 := cadena;
     2 : var3 := cadena;
     3 : var4 := cadena;
     4 : var5 := cadena;
     ..................... 
    end; 
  end;

Saluditos

[ContraVeneno]

¿y para que los quieres en una variable? digo, ya los tienes en el combo... para que repetir el valor en otra variable... además, los ejemplos que amablemente Caro y Dec te han mostrado, son suficientes como para que TU deduzcas como realizar lo que quieres... no es buena idea esperar a que aquí hagan tu tarea.

[dec]

Hola,

Hum... pero es que no vamos a hacerte todo el trabajo, ¿o sí? Je je je. Lo que quiero decir es que en el código que tanto Caro como yo hemos mostrado, puede verse cómo asignar un elemento de una lista a una variable de tipo "string". ¿Que quieres usar más variables de tipo string y asignar un elemento de la lista a cada una? Bueno. ¿Quién te lo impide? Otra cosa es que claro, no sabes los elementos que va a tener la lista... luego no puedes declarar variables "s1, s2, s3" y así. Vale.

Pues entonces se me ocurre que puedes usar un "Array de cadenas", y añadir cada elemento de la lista en un elemento del "Array", pero, aquí ya se me viene a la cabeza que no sé muy bien qué quieres hacer, porque, ¿para qué añadir los elementos de la lista en un "Array", si ya están en la lista, que nos ofrece una propiedad como "Items", que, es como si fuera un "Array"? Así que no se me ocurre qué más decirte y lo lamento.

[[egostar]]

Empezado por j_flores3000

Sin ser molesto lo que hacen ahi es agregar todos los items a 1 sola cadena de texto yo necesito que se haga cada palabra (o item) en una variable distinta

No se pero creo que para eso se tendrían que crear frames en tiempo de ejecución, porque hasta donde se (aunque alguien podria decirme lo contrario) no se pueden crear variables en tiempo de ejecución.

Salud OS

[*Caro*]

Empezado por dec

Pues entonces se me ocurre que puedes usar un "Array de cadenas", y añadir cada elemento de la lista en un elemento del "Array", pero, aquí ya se me viene a la cabeza que no sé muy bien qué quieres hacer, porque, ¿para qué añadir los elementos de la lista en un "Array", si ya están en la lista, que nos ofrece una propiedad como "Items", que, es como si fuera un "Array"? Así que no se me ocurre qué más decirte y lo lamento.

Eso mismo digo yo, sería mejor trabajar con la lista de items directamente.

Empezado por egostar

No se pero creo que para eso se tendrían que crear frames en tiempo de ejecución, porque hasta donde se (aunque alguien podria decirme lo contrario) no se pueden crear variables en tiempo de ejecución.

Frames , no sería mucha cosa para volver a guardar los items. Que yo sepa no se pueden crear variables en ejecución, pero podría tenerlas definidas todas las que piense que va utilizar y asignar con un case como lo hice arriba, pero insisto sería mejor que trabajara con los items directamente y así no se complica la vida.

Saluditos