Как разделить строку TStringlist без цикла?

@1208 · Регистрация: 04.12.2015

Author24 — интернет-сервис помощи студентам

Допустим имеется строка: "Hello world!" в TStringList ,как присвоить другой TStringlist "Hello" без цикла ?

@qwertehok · 26.10.2016, 11:22

задать разделитель как пробел
тогда в Name будет одна часть, а в Values вторая

@Nanotentacle · 26.10.2016, 11:23

Delphi

1	StringList2.Strings.Add(copy(StringList1.Strings[0],1,5));

Та ситуация, когда каков вопрос - таков ответ. У вас ни критериев разделения строки, ни какого-либо собственного кода.

@1208 · 26.10.2016, 13:09 **[ТС]**

я хочу добавлять строку до пробела.Например если s1=здравствуй мир то s2=здравствуй
и как сделать если я хочу что бы s2=мир ?

@qwertehok · 26.10.2016, 13:12

тебе 2 варианта написали, что еще надо?

@1208 · 26.10.2016, 18:40 **[ТС]**

Сделал как вы сказали выдает ошибку перед add что ожидалось [.
Код

Delphi

procedure TForm1.Button1Click(Sender: TObject);
 
begin
 
StringList1:=TStringlist.Create;
StringList2:=TStringlist.Create;
StringList1[0]:='Hello World';
StringList2.Strings.Add(copy(StringList1.Strings[0],1,5));
 
ListBox2.items:=stringList2;
end;
 
end.

@northener · 26.10.2016, 19:32

Delphi

1	StringList2.Add(copy(StringList1.Strings[0],1,5));

@qwertehok · 26.10.2016, 19:42

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

Сделал как вы сказали выдает ошибку

копирование без понимая - ума не добавляет

Delphi

var
sl:tstringlist;
begin
  sl:=TStringList.Create;
  sl.DelimitedText:='Hello world';
  sl.Delimiter := ' ';
  showmessage(sl[0]+#13#10+sl[1]);
 
  sl.Free;
end;

@Пытливый · 26.10.2016, 23:38

Все делается несколько проще через свойство DelimitedText

@northener · 27.10.2016, 00:59

Не по теме:

Пытливый, так уж 4 часа назад дали код с DelimitedText

@Пытливый · 27.10.2016, 02:54

А я даже не вчитывался в последний ответ

@1208 2 / 2 / 0 Регистрация: 04.12.2015 Сообщений: 257
		1
	Как разделить строку TStringlist без цикла? 26.10.2016, 11:20. Показов 2329. Ответов 10 Метки нет (Все метки) Допустим имеется строка: "Hello world!" в TStringList ,как присвоить другой TStringlist "Hello" без цикла ? 0

@qwertehok 5395 / 4323 / 1060 Регистрация: 29.08.2013 Сообщений: 27,135 Записей в блоге: 3
	26.10.2016, 11:22	2
	задать разделитель как пробел тогда в Name будет одна часть, а в Values вторая 0

@1208 2 / 2 / 0 Регистрация: 04.12.2015 Сообщений: 257
	26.10.2016, 13:09 [ТС]	4
	я хочу добавлять строку до пробела.Например если s1=здравствуй мир то s2=здравствуй и как сделать если я хочу что бы s2=мир ? 0

@qwertehok 5395 / 4323 / 1060 Регистрация: 29.08.2013 Сообщений: 27,135 Записей в блоге: 3
	26.10.2016, 13:12	5
	тебе 2 варианта написали, что еще надо? 0

@Пытливый 3587 / 2196 / 693 Регистрация: 29.05.2013 Сообщений: 9,381
	26.10.2016, 23:38	9
	Все делается несколько проще через свойство DelimitedText 0

@northener
	27.10.2016, 00:59 #10
	Не по теме: Пытливый, так уж 4 часа назад дали код с DelimitedText 0

@Пытливый 3587 / 2196 / 693 Регистрация: 29.05.2013 Сообщений: 9,381
	27.10.2016, 02:54	11
	А я даже не вчитывался в последний ответ 0