Eingabe mischen

**STS301**

hi

ich will in einem Editfeld zb: 'ABCDE' eingeben und dass zufällig zb. zu 'DBACE' machen.

Wie soll ich da am besten anfangen?

Mit zb.

markieren

Delphi-Quellcode:

			var

//hier einen Char Array erstellen

begin

Char.max:= edit1.length;

...??

**gsh**

hmm du könntest mit random() einen zufälligen buchstaben auswählen. Ungefähr so:
augabe := ausgabe+string[random(Length(string))+1]; dann musst du nur noch diesen buchstaben löschen (damit er nicht nochmal vorkommt)
//edit: das ganze muss natürlich noch in eine schleife while Length(ausgabe) < Length(eingabe) do

Viel Glück

**DeddyH**

AFAIK gibt es in StrUtils die Funktion ReverseString.

**gsh**

Zitat von DeddyH:

AFAIK gibt es in StrUtils die Funktion ReverseString.

also wenn ich ihn richtig verstanden habe dann will er den string nicht umdrehen sondern zufällig zusammen mischen

**STS301**

@gsh: genau, sry wenn ich mich nicht klar ausgedrückt habe

**DeddyH**

So früh am Morgen kann ich noch nicht richtig lesen

**DeddyH**

Willst Du denn nun "mischen" oder "umdrehen"?

**STS301**

mischen, ich ändere den Titel gleich

**Klaus01**

Guten Morgen,

schau Dir doch mal die Routine am Ende dieses

Beitrags an.

.. und wenn Du magst, lese auch den ganzen Thread, liest sich sehr interessant.

Grüße
Klaus

**STS301**

etwas verwirrend, nur wie mache ich das mit Buchstaben, ich würde mir einmal die Länge des Textes auslesen, und dann (irgendwie durchmischen) hänge ich..

Eingabe mischen

Eingabe mischen

Re: Eingabe verdrehen

Re: Eingabe verdrehen

Re: Eingabe verdrehen

Re: Eingabe verdrehen

Re: Eingabe verdrehen

Re: Eingabe verdrehen

Re: Eingabe verdrehen

Re: Eingabe mischen

Re: Eingabe mischen

Forumregeln

STS301 Registriert seit: 6. Nov 2007 668 Beiträge Delphi 7 Personal	#1 Eingabe mischen 16. Okt 2008, 07:19 hi ich will in einem Editfeld zb: 'ABCDE' eingeben und dass zufällig zb. zu 'DBACE' machen. Wie soll ich da am besten anfangen? Mit zb. markieren Delphi-Quellcode: var //hier einen Char Array erstellen begin Char.max:= edit1.length; ...?? Sebastian ölpölp Linux will rule the universe!!
	Zitat

DeddyH Registriert seit: 17. Sep 2006 Ort: Barchfeld 27.541 Beiträge Delphi 11 Alexandria	#3 Re: Eingabe verdrehen 16. Okt 2008, 07:28 AFAIK gibt es in StrUtils die Funktion ReverseString. Detlef *"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen."* (Albert Einstein) Dieser Tag ist längst gekommen
	Zitat

STS301 Registriert seit: 6. Nov 2007 668 Beiträge Delphi 7 Personal	#5 Re: Eingabe verdrehen 16. Okt 2008, 07:29 @gsh: genau, sry wenn ich mich nicht klar ausgedrückt habe Sebastian ölpölp Linux will rule the universe!!
	Zitat

DeddyH Registriert seit: 17. Sep 2006 Ort: Barchfeld 27.541 Beiträge Delphi 11 Alexandria	#6 Re: Eingabe verdrehen 16. Okt 2008, 07:30 So früh am Morgen kann ich noch nicht richtig lesen Detlef *"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen."* (Albert Einstein) Dieser Tag ist längst gekommen
	Zitat

DeddyH Registriert seit: 17. Sep 2006 Ort: Barchfeld 27.541 Beiträge Delphi 11 Alexandria	#7 Re: Eingabe verdrehen 16. Okt 2008, 07:35 Willst Du denn nun "mischen" oder "umdrehen"? Detlef *"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen."* (Albert Einstein) Dieser Tag ist längst gekommen
	Zitat

STS301 Registriert seit: 6. Nov 2007 668 Beiträge Delphi 7 Personal	#8 Re: Eingabe verdrehen 16. Okt 2008, 07:39 mischen, ich ändere den Titel gleich Sebastian ölpölp Linux will rule the universe!!
	Zitat

Klaus01 Registriert seit: 30. Nov 2005 Ort: München 5.755 Beiträge Delphi 10.4 Sydney	#9 Re: Eingabe mischen 16. Okt 2008, 08:04 Guten Morgen, schau Dir doch mal die Routine am Ende dieses Beitrags an. .. und wenn Du magst, lese auch den ganzen Thread, liest sich sehr interessant. Grüße Klaus Klaus
	Zitat

STS301 Registriert seit: 6. Nov 2007 668 Beiträge Delphi 7 Personal	#10 Re: Eingabe mischen 16. Okt 2008, 08:30 etwas verwirrend, nur wie mache ich das mit Buchstaben, ich würde mir einmal die Länge des Textes auslesen, und dann (irgendwie durchmischen) hänge ich.. Sebastian ölpölp Linux will rule the universe!!
	Zitat