Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > Так разбить строку

Автор: apostolnikolai 27.4.2009, 22:55

Есть строка типа ТЕКСТ ( разделитель #*# ) ТЕКСТ ( разделитель #*# ) и т.д.

Как получить все строки по отдельности

Автор: Rodman 27.4.2009, 23:07

Код


var st:TStringList;
begin
  st:=TStringList.Create;
   try
      st.text:='ТЕКСТ ( разделитель #*# ) ТЕКСТ ( разделитель #*# )';
      st.text:=StringReplace(s.text, '( разделитель #*# )', sLineBreak, []);
      showmessage(st.text);
   finally
      st.free;
   end;
end;

Автор: apostolnikolai 27.4.2009, 23:15

я наверно не так задал вопрос СОРИ или не понял ответ !

Мне нужно получить значения каждой части этой строки в своей переменной :  ТЕКСТ ( разделитель #*# ) ТЕКСТ ( разделитель #*# )
Тоисть test1 := первый кусок до разделителя
            test2 := второй кусок после разделителя

            test(N) := эный кусок строки
           и так до энного количества кусков !

Автор: Palladin 27.4.2009, 23:20

Ты не понял ответ. Родман все верно написал, твои строки будут в st[1]...st[n];

Добавлено через 51 секунду
Только не забудь обратить внимание, что после слова finally st привратится в "пустышку"

Автор: apostolnikolai 27.4.2009, 23:35

Спасибо