[Delphi]Problem z komponentami Memo

int liczba;  //zmienna typu integer
String tmp=""; //zmienna typu string
for(int i=0;i<memo1.Text.Length();i++)
{
   if(memo1.Text1.c_str()[i]!=' ') //jesli kolejna wczytana litera nie jest spacja
	 tmp=tmp+memo1.Text.SubString(i+1,1); //dodaj ja do stringa tmp
   else  //w przeciwnym wypadku
	 {
	   if(tmp!="")  //dodatkowo sprawdz czy tmp w ogole zawiera 
					   //jakies znaki, czyli jesli tmp rozne od pustego stringa
		 {
			 liczba=StrToInt(tmp); //zamien otrzymane tmp na integer i 
			/*zapisz w zmiennej liczba. Teraz mozesz uzyc liczby do  
			   obliczen. Koniecznie zanim przejdziesz do kolejnego kroku petli i zmieni 
			   sie zawartosc zmiennej liczba, czyli w tym miejscu*/
			  tmp=""; //wyczysc zawartosc stringa tmp, aby mozna go poprawnie 
						 //uzyc w nastepnym kroku petli
		 }
	}
}

var liczba : integer;
	  tmp:string;
	  i : integer;

begin

for i:=0 to Length(memo1.Text) do
 begin
   if memo1.Text1<>' ' then 
	 tmp:=tmp+memo1.Text.SubString(i+1,1)
   else 
	begin
	 if tmp<>'' then
	  begin
		liczba:=StrToInt(tmp); 
		tmp:=''; 
	  end;
	end;
 end;

end;

tmp:=tmp+memo1.Text.(błąd)SubString(i+1,1)
właśnie tu gdzieś jest błąd

Rekord, obiekt, lub class type required