Delphi-PRAXiS
Seite 1 von 4  1 23     Letzte »    

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Eingabe mischen (https://www.delphipraxis.net/122439-eingabe-mischen.html)

STS301 16. Okt 2008 07:19


Eingabe mischen
 
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.
Delphi-Quellcode:
var
//hier einen Char Array erstellen
begin
Char.max:= edit1.length;
...??

gsh 16. Okt 2008 07:26

Re: Eingabe verdrehen
 
hmm du könntest mit random() einen zufälligen buchstaben auswählen. Ungefähr so:
Delphi-Quellcode:
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 16. Okt 2008 07:28

Re: Eingabe verdrehen
 
AFAIK gibt es in StrUtils die Funktion ReverseString.

gsh 16. Okt 2008 07:28

Re: Eingabe verdrehen
 
Zitat:

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 16. Okt 2008 07:29

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

DeddyH 16. Okt 2008 07:30

Re: Eingabe verdrehen
 
So früh am Morgen kann ich noch nicht richtig lesen :mrgreen:

DeddyH 16. Okt 2008 07:35

Re: Eingabe verdrehen
 
Willst Du denn nun "mischen" oder "umdrehen"?

STS301 16. Okt 2008 07:39

Re: Eingabe verdrehen
 
mischen, ich ändere den Titel gleich

Klaus01 16. Okt 2008 08:04

Re: Eingabe mischen
 
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 16. Okt 2008 08:30

Re: Eingabe mischen
 
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..


Alle Zeitangaben in WEZ +1. Es ist jetzt 07:43 Uhr.
Seite 1 von 4  1 23     Letzte »    

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz