Не работает Find в TStringList

← →
mmmaloy © (2003-11-16 18:52) [0]

Вобщем создаю
ListField:TStringList;

затем вношу значения
ListField.Text:=ListBox4.Items.Text;

затем хочу заменить некоторый текст
//замена названий полей на реальные ///Аритст -> ARTIST
if ListField.Find("Альбом", IndexFind) then
begin
ListField[IndexFind]:="ALBUM";
end;
if ListField.Find("Артист", IndexFind) then
begin
ListField[IndexFind]:="ARTIST";
end;
if ListField.Find("Название песни", IndexFind) then
begin
ListField[IndexFind]:="SONGNAME";
end;

но неизвестно почему результат нестабилен.
То находит и заменяет, то ненаходит.
С чем это связанно и как решить данную проблему?

← →
Narayan © (2003-11-16 19:02) [1]

Если мне память не изменяет, Find - только для сортированных стринглистов.
Пользуйся IndexOf !

Точно! Спасибо

Не работает Find в TStringList Найти похожие ветки