Zufälligen Vokal und Konsonant generieren

[siles]

Hallo zusammen
Ich bräuchte folgende Funktion:
Eine Generierung eines oder mehrere Zeichen, die entweder nur Vokale oder nur Konsonanten sind.
Leider reicht mein Wissen nur aus, um eine Random Zahl zu erstellen. Wie ich das mit Zeichen und dann noch einschränken auf Vokale und Konsonanten machen soll, weiss ich nicht so recht.

Erklärung:
Der User gibt einen String in Form einer Kombination aus v's und c's ein (z.B. vvccv (Vokal, Vokal, Konsonant, Konsonant, Vokal)).
Das Programm generiert daraus ein zufälliges Wort (beispiel: aorca)

Hat mir jemand Rat?

[Codewalker]

Erzeuge ein Array, in dem die möglichen Zeichen drin sind und wähle den Index zufällig per Random aus (Also ArrayName[Random(Length(ArrayName)] )

[siles]

Zitat:

Zitat von Codewalker

Erzeuge ein Array, in dem die möglichen Zeichen drin sind und wähle den Index zufällig per Random aus (Also ArrayName[Random(Length(ArrayName)] )

Gute Idee...eigentlich simpel aber ich hab schon zuweit gedacht :roll:
Danke Dir, ich versuche das mal so.

[b1zZ]

Deklaration der Arrays:

Delphi-Quellcode:

type 
  TKonsonant = Array [0..2] of Char = ('b', 'c', 'd'); 
type 
  TVokal = Array [0..2] of Char = ('a', 'e', 'i');

Edit: Unsinnigen Satz entfernt

[Neutral General]

Zitat:

Zitat von b1zZ

Du könntest dir ein 2 Dimensionales Array erstellen.

Deklaration der Arrays:

Delphi-Quellcode:

type 
  TKonsonant = Array [0..2] of Char = ('b', 'c', 'd'); 
type 
  TVokal = Array [0..2] of Char = ('a', 'e', 'i');

Und wo ist da die 2. Dimension?

[b1zZ]

Ich hatte angefangen zu tippen und dann klingelte das Telefon.
Dann wurde bereits geantwortet.
Das war auf meine erste Idee bezogen. Kann also getrost ignoriert werden.
Mit den Deklarationen wollte ich dem Threadersteller nur eine Hilfestellung geben, wie er die verschiedenen Zeichen in Arrays packen kann.

[siles]

Einwandfrei, vielen Dank :)