Разделить

← →
LORDIK (2003-10-23 15:40) [0]

Вопрос такой.
Есть стринг например : "слово1, слово2, слово3"
Как разделить этот текс на 3 части. Тоесть:
стринг1 = слово1
стринг2 = слово2
стринг3 = слово3

← →
Skier (2003-10-23 15:42) [1]

TStringList.CommaText := Есть стринг например;

← →
han-bratan (2003-10-23 15:44) [2]

надо формировать строку вида слово1|слово2|слово3
(вместо "|" можно использовать другой символ). А потом уже по этим симпволам и разбивать. Кстати в качестве разделителя можно использовать и целую последовательность символов

← →
LORDIK (2003-10-23 16:18) [3]

А потом уже по этим симпволам и разбивать

Как раззбивать?

← →
ZEE (2003-10-23 16:34) [4]

pos(), copy(), delete() + F1
или
NthWord() + F1

← →
NickBat (2003-10-23 16:40) [5]

А зачем сразу компоненты? Тут можно с помощью ZEE © (23.10.03 16:34) [4] в 10 строк кода вложиться.

← →
LORDIK (2003-10-23 19:22) [6]

han-bratan

Можно конкретный пример??

← →
@Ujin (2003-10-23 19:28) [7]

var
SL: TStringList;

SL := TStringList.Create;
SL.DelimiterText := ",";
SL.DelimitedText := "один, два, три";
...
SL[0] - будет равно "одни".

← →
@Ujin (2003-10-23 19:28) [8]

var
SL: TStringList;

SL := TStringList.Create;
SL.DelimiterText := ",";
SL.DelimitedText := "один, два, три";
...
SL[0] - будет равно "одни".

Разделить Найти похожие ветки