Comparar dos String

[[egostar]]

Hola tonyskl

Creo que es un problema de concepto, esto no tiene que ver con una comparación literal de las cadenas, mas bien tiene que ver con la manera como los ordenas dentro de una lista, puedes hacer esto, a ver que te parece

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  Lista : TStringList;
begin
  Lista := TStringList.Create;
  Lista.Add('ABZ');
  Lista.Add('ABG');
  Lista.Add('ABH');
  Lista.Add('ABE.P');
  Lista.Add('ABJ');
  Lista.Sorted := True; //Esto ordena la lista en forma ascendente.
  ListBox1.Items.AddStrings(Lista);
  Lista.Free;
  ShowMessage(ListBox1.Items.Strings[ListBox1.Items.Count-1]);
end;

Salud OS