[movnet]

Код:

var t:TStringList;
begin
 t:=TStringList.create; //создаём класс
 t.text:=stringReplace('999, Text1, 0, -2303.41, 2002.48, 9.2, 0, 0, 0, 1, -1',',',#13#10,[rfReplaceAll]);//заменяем все запятые на символы конца троки //теперь можно убедится что у вас строка разбита на элементы:
 showmessage(t[0]);
 showmessage(t[1]);
 showmessage(t[2]);
 showmessage(t[3]);
 ...
 //после работы надо уничтожить класс
FreeAndNill(t);

Admin: Напоминаю про теги!