Если количество параметров всегда одно и тоже, то можно просто циклом искать всё между очередной "=" и знаком "," записывая в массив
Код:
var
params = array[0..9] of string;
while not pos("=",str) <> 0 do
begin
p1 := pos('=',str);
params[i] := copy(str, p1, pos(','str) - p1);
i:=i+1;
end;
Школьное решение.
А вообще надо присуммонить M.A.D.M.A.N'a с его плакатом "Используй RegExp!"