Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**Mick**

ich habe es nun mit der repeat until und funst, danke

Code:

			 i:=0;

     repeat 

           i:=i+1;

     until (feld[i+1]<feld[i]) or (i=5);

gruß
Mick

Mick Registriert seit: 31. Dez 2002 47 Beiträge Delphi 6 Personal	#5 2. Apr 2003, 13:02 ich habe es nun mit der repeat until und funst, danke markieren Code: i:=0; repeat i:=i+1; until (feld[i+1]<feld[i]) or (i=5); gruß Mick
	Zitat