Vokal ersetzen

[Axl]

Nein txt:= ARRAY[1..50] OF STRING[255].
Für Shortstring geht auch String.
Mein Fehler liegt nur noch in dem Aufruf. V soll in der Listbox alle Vokale ersetzen. Also zum Beispiel aus "Inhalt" durch eingabe des Vokal u in dem Editfeld "Unhult" machen.

[DeddyH]

Delphi-Quellcode:

for i := 0 to DeineListbox.Items.Count - 1 do
  DeineListbox.Items[i] := Ersetze(DeineListbox.Items[i], DeinEdit.Text[1]);

So einfach könnte das sein, Du brauchst halt nur noch die "Ersetze"-Routine.

[Bummi]

Für mein Verständnis müsste txt ein String und v ein Char sein ....

[Axl]

Meine Datentypen also String usw. funktionieren da ich ja schon andere prozeduren eingefügt habe.

Mein einziges problem noch:
v soll als Wert in die listbox, also sowas wie v:=lb.items.add(weis ich nicht??))<-muss noch was eingefügt werden.
Mir fehlt der korrekte Aufruf.
e_xs.text:=FLOATTOSTR(xs); wäre ja nicht für eine Listbox aber das halt nur für eine Listbox mit v.

[DeddyH]

Nochmal ganz langsam für alte Männer: Du willst in irgendeinem String die Vokale durch einen bestimmten ersetzen, der in ein Edit eingegeben werden soll, soweit richtig? Wenn ja, wo kommen die ursprünglichen Strings her und wo genau sollen die bearbeiteten hin?

[p80286]

Alte Männer ist Gut!!

Zitat:

Zitat von Axl (Beitrag 1161555)

Mein einziges problem noch:
v soll als Wert in die listbox,...

dafür gibt es

Delphi-Quellcode:

lb.Items.Add(v);

Zitat:

Zitat von Axl (Beitrag 1161555)

also sowas wie v:=lb.items.add(weis ich nicht??))

Das kann nicht funktionieren da das .Add einen integer-Wert zurück gibt, Du aber V als Shortstring definiert hast.

Zitat:

Zitat von Axl (Beitrag 1161555)

Mir fehlt der korrekte Aufruf.

Da scheint noch das eine oder andere zu fehlen.

Gruß
K-H

[Bummi]

><((((º> ?