Skocz do zawartości


Legrand

Rejestracja: 15 wrz 2006
OFFLINE Ostatnio: 12 06 2007 15:38
-----

Moje tematy

[Delphi]Problem z komponentami Memo

10 06 2007 - 11:47

Siema,
musze napisac program w Delphi,
a pewną cześć (pętla) mam w C++,
może ktoś mi pomoże napisac to w delphi...
bo sam chyba nie dam rady
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
		 }
	}
}

z góry dzięki za pomoc