|
Registriert seit: 1. Jul 2003
347 Beiträge
Delphi 2007 Professional
|
Re: Zeichenkette per zufall ändern
19. Mai 2004, 20:10
ich habe es gerade ausprobiert funzt mit der zweiten stelle super,
Index := Random(AnzDreierGruppen) * 4 + 2
ist auch für die erste
Index := Random(AnzDreierGruppen) * 4 + 1
oder dritte stelle
Index := Random(AnzDreierGruppen) * 4 + 3
anwendbar.
super jetzt nur noch die kombi erste oder zweite stelle einer dreiergruppe der zeichenkette
z.b. zeichenkette '111,111,111,111,111`kann geändert werden z.b in
1. 111,211,111,111,111'
oder
2. 111,121,111,111,111'
oder
3. 111,111,111,211,111'
oder
4. 111,111,111,111,121'
usw.
|