Problem ze zmianą Strina na integer

Witam.
mam liczbe w edit3.text np. 4,604
Funkcją

usuwam przecinek więc zostaje mi 4604

edit3.Text :=ansireplacetext(edit3.Text , ',', '');

następnie nie widzę problemu żeby zmienić liczbę na integer ze stringa i wpisać ją do zmiennej "P" która jest integerem

używam

P:= StrToInt(edit3.Text);

Ale kiedy próbuje to zrobić wyskakuje mi komunikat

No i nie wiem co się programowi nie podoba...

Na końcu masz chyba jakieś zbędne przejście do nowej linii.

ok
wcześniej dodawałem z memo1.Text zmieniłem na memo1.lines[0] i po kłopocie