Comparar dos String

[tonyskl]

Buenas egostar,

Gracias por tu respuesta.

Creo que la solución que das no me vale para mi caso particular.

Digamos que tengo exactamente lo mismo que tu, ¿ok? es decir una lista ordenada, y por otro lado tengo un string (que no quiero meter en esa lista) y quiero saber alfabeticamente en que posición iria...

¿Como lo podría hacer? ¿Lo puedo saber de una forma directa? ¿Tengo que hacerme una función y mirar caracter por caracter?

Gracias!

[[egostar]]

Empezado por tonyskl

Buenas egostar,

Gracias por tu respuesta.

Creo que la solución que das no me vale para mi caso particular.

Digamos que tengo exactamente lo mismo que tu, ¿ok? es decir una lista ordenada, y por otro lado tengo un string (que no quiero meter en esa lista) y quiero saber alfabeticamente en que posición iria...

¿Como lo podría hacer? ¿Lo puedo saber de una forma directa? ¿Tengo que hacerme una función y mirar caracter por caracter?

Gracias!

A que te refieres con la posición en la que iria.....

Será que quieres hacer esto???

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  Lista : TStringList;
  Cadena: String;
begin
  Cadena := 'ABF';
  Lista := TStringList.Create;
  Lista.Add('ABG');
  Lista.Add('ABH');
  Lista.Add('ABE.P');
  Lista.Add('ABJ');
  Lista.Add(Cadena);
  Lista.Sorted := True; //Esto ordena la lista en forma ascendente.
  ShowMessage('La cadena : '+Cadena+' es la # '+inttostr(Lista.IndexOf(Cadena)+1)+
              ' de '+inttostr(Lista.Count)+' items!');
  Lista.Free;
end;

Salud OS