Делфи.Функция.Строка

[Scabby]

У меня есть функция f(x)=ax^2+bх+c
пользователь вводит свою функцию, потом при комплеляции выводятся коэфициенты a,b,c.
не представляюкак разбить функцию саму ax^2+bх+c на токены, чтобы определялись знаки цифры и т.д.
каждого оператора....(((
помогите

Делфи

 

[dimat]

var s,s2:string;
var i:integer;
s:='2x^2+3x+4';
s2:='';
for i:=1 to length(s) do begin
if s in {0..9} then s2:=s2+s+' ';

end;
showmessage(s2);