как разбить строку по запятым?

← →
cvg © (2004-04-09 09:12) [0]

subj -- подскажите новичку!!! А то текстовый файл можно эффектно считать через

list := tstringlist.create;
list.loadfromfile(OpenDialog1.FileName);

а разбивать по значениям приходится варварским способом:

for i := 1 to list.count do
begin
for j := 1 to 6 do
begin
n := pos(",",list[i]);
list[i] := MidStr(list[i],n+1,Length(list[i]));
end;
n := pos(",",list[i]);
val1 := LeftStr(list[i],n-1);
end;
end;

В РНР вот хоть функция split специальная есть...

← →
MBo © (2004-04-09 09:24) [1]

TStringList.CommaText

Thanx, однако...

как разбить строку по запятым? Найти похожие ветки