metodo de ordenacion

[bothy]

gracias colega un poco dificil para mi que son principiante todabia pero si logro entenderle . .
buscaba algo mas facil asi como el metodo de la burbuja ...

[BrunoBsso]

Empezado por bothy

gracias colega un poco dificil para mi que son principiante todabia pero si logro entenderle . .
buscaba algo mas facil asi como el metodo de la burbuja ...

No te hice el Bubble Sort porque para una lista con cientos de miles de números tardaría mucho y come muchos recursos (es recursivo).
Tampoco hice lo que explicó Neftali porque no quise confundirte con los TStringList que son otro tipo de datos, como los TStrings, pero mejores (opinión mía).
El método que te expliqué se llama de intercambio y es el más simple.
Además, Neftali, no entiendo por que esto:

Código Delphi [-]
for i := 0 to (TS.Count - 1) do begin
  j := StrToInt(TS[i]);
  ListBox1.Items.Add(IntToStr(j));
end;

Primero, no sabía que se podía ubicar un string en una lista así (TS[i]), pensé que se podía solamente con TS.Strings[i].
Segundo, para que almacenar ese string en un integer, para después copiarlo como string de nuevo. Es un paso en vano.
¿No sería mejor ListBox1.Items.Add(TS.Strings[i])?
Saludos!!

[bothy]

Se me hace mas entendible el metodo de intercambio de BrunoBsso
ya que el otro se me iso muy complicado.. ya que soy novato en delphi pero si les entiendo a alos metodos que pusieron gracias amigos..

[Neftali [Germán.Estévez]]

Empezado por bothy

Se me hace mas entendible el metodo de intercambio de BrunoBsso ya que el otro se me iso muy complicado.. ya que soy novato en delphi pero si les entiendo a alos metodos que pusieron gracias amigos..

Intenta comprederlos los dos y utiliza el que tú creas conveniente.
Mejor 2 que 1 ¿no?

Si tienes algunas duda pregunta sin problemas.

Empezado por BrunoBsso

Primero, no sabía que se podía ubicar un string en una lista así (TS[i])

En este caso puedes usar el que prefieras, son equivalentes.

Empezado por BrunoBsso

Segundo, para que almacenar ese string en un integer, para después copiarlo como string de nuevo. Es un paso en vano.
¿No sería mejor ListBox1.Items.Add(TS.Strings[i])?

Cierto, era por una cuestión de claridad y que le fuera más sencillo de entender.

Como bien dices esto:

Código Delphi [-]
    for i := 0 to (TS.Count - 1) do begin
      j := StrToInt(TS[i]);
      ListBox1.Items.Add(IntToStr(j));
    end;

es equivalente a esto:

Código Delphi [-]
    for i := 0 to (TS.Count - 1) do begin
      ListBox1.Items.Add(TS.Strings[i]);
    end;

Aunque en realidad lo más simple y lo que yo hubiera hecho, hubiera sido esto (sin usar for):

Código Delphi [-]
  ListBox1.Items.AddStrings(TS);

Pero me pareció más simple. Tal vez al final lié la cosa...

[BrunoBsso]

Mirá vos, después de tanto manejar TStringList me vengo a enterar recién que se pueden ubicar con T[i].
Siempre se aprende algo nuevo, ¿no?
Mucho mejor, más rápido que escribir T.Strings[i]
Saludos y gracias por el tip!!!!

[[Delphius]]

Empezado por BrunoBsso

No te hice el Bubble Sort porque para una lista con cientos de miles de números tardaría mucho y come muchos recursos (es recursivo).

Sólo una corrección si me lo permites,
BubbleSort no es recursivo, es iterativo. Es uno de los algoritmos más estable y se basa en el método por intercambio.

El que es recursivo, e intuyo que es al que te refieres, es QuikSort (uno de los inestables), el cual si bien tiene la ventaja de tener una complejidad computacional menor (en términos promedios, en el peor caso iguala al Burbuja y otros) que el Burbuja tiene la contra de requerir más uso de memoria (aunque hay que reconocer que no es además muy exagerada... del orden O(log n)) y su método es de partición.

Saludos,

[BrunoBsso]

Tenés razón, me los confundí entre los 2.
Hace tanto que no uso ninguno que ya ni me acuerdo como se llaman jajaja.
Gracias por la corrección!