Необходимо распарсить строку

[celovec]

  try
    stringBuff.CustomSort(CompareWithValues);
    for i := 1 to 10 do
    stringBuff[i-1] // необходимо распарсить эту переменную.
  finally
    stringBuff.Free;
  end;

stringBuff[i-1] Такого содержимого: Андрей=33

Тоесть необходимо Андрей загнать в 1 переменную а 33 в другую. Разделитель =

Помогите пожалуйста это реализовать на примере.

[zotox]

delphi с собою нету, осмелюсь предположить что так:

for i := 1 to 10 do
begin
 names[i] = copy(stringBuff[i-1], 0, pos('=', stringBuff[i-1]) - 1);
 ages[i] = copy(stringBuff[i-1], pos('=', stringBuff[i-1]) + 1, length(stringBuff[i-1]) - pos('=', stringBuff[i-1]));
end;

names, ages: массивы. Ключевые функции для парсинга: copy, pos.

[JoLan]

А может лучше будет извратиться: записать все данные в файл и открыть его как ini?

[celovec]

Сообщение от zotox

delphi с собою нету, осмелюсь предположить что так:

for i := 1 to 10 do
begin
 names[i] = copy(stringBuff[i-1], 0, pos('=', stringBuff[i-1]) - 1);
 ages[i] = copy(stringBuff[i-1], pos('=', stringBuff[i-1]) + 1, length(stringBuff[i-1]) - pos('=', stringBuff[i-1]));
end;

names, ages: массивы. Ключевые функции для парсинга: copy, pos.

    names[i] := copy(stringBuff[i-1], 0, pos('=', stringBuff[i-1]) - 1);

ошибка:
[Error] Unit1.pas(468): Incompatible types: 'Char' and 'String'



JoLan, у меня так и есть. Но эти данные необходимо сортировать. Я об этом писал здесь: http://programmersforum.ru/showthread.php?t=142998

[zotox]

celovec, какой тип имеет stringBuff ?

[celovec]

stringBuff: TStringList;

[zotox]

Тогда это будет выглядеть примерно так:

for i := 1 to 10 do
begin
 names[i] = copy(stringBuff.Strings[i-1], 0, pos('=', stringBuff.Strings[i-1]) - 1);
 ages[i] = copy(stringBuff.Strings[i-1], pos('=', stringBuff.Strings[i-1]) + 1, length(stringBuff.Strings[i-1]) - pos('=', stringBuff.Strings[i-1]));
end;

Будет пропарсено с первой строки/столбца stringBuff до десятой.

[celovec]

Снова ошибка:
Incompatible types: 'Char' and 'Strings'

[Пепел Феникса]

а у вас какого типа names и ages?
видимо массив Char, а надо то массив строк

[celovec]

var 
names,ages: Strings;