[Delphi] Char Zeichen an anderes Char zeichen anhängen

01/28/2010 17:33 HardCore.1337#1
Hallo, ich habe grade einen Blackout und komme an doch dieser einfachen Aufgabe nicht weiter :o.

Und zwar:
Ich habe eine Variable s vom Typ Char.
Diese beginnt mit a und wird immer um 1 erhöht und anschließend werden die Ergebniss angezeigt.

Code:
for i := 1 to 26 do
  begin
    s := Chr(Ord(s)+1);
    ListBox1.Items.Add(s);
  end;
end;
Jetzt will ich aber wieder von vorne anfangen, wenn ich bei z gelandet bin.
Also

Code:
a
b
..
x
y
z
aa
ab
..
ax
wie mach ich das? Sry, raff das grade wirklich nicht, da ich normalerweise nur mit Strings aberbeite, diese lassen sich aber nicht um 1 erhöhen

Danke schonmal ;)
01/28/2010 21:21 .nAno#2
Ich kenn mich mit Delphi zwar nicht aus aber kann man das nicht vllt mit ner if-Anweisung machen?^^
01/28/2010 22:04 ^darkwing#3
char zu string casten?
01/28/2010 22:46 12354#4
Quote:
Originally Posted by ^darkwing View Post
char zu string casten?
o0

Dann schreibste(beim anhängen) einfach ma so in irgendwelchen Speicher rein : D
Hey, warum nich?! :/
01/28/2010 23:10 ^darkwing#5
Er will doch "Char Zeichen an anderes Char zeichen anhängen" und sagt er arbeite normalerweise mit Strings.
Warum macht er nicht aus einem Char ein String und nutzt dann die append-Methode um weitere Zeichen anzuhängen? Edit: Falls es sowas in Delphi geben sollte.
01/29/2010 06:43 HardCore.1337#6
ok, habs.
FÜr alle dies interessiert:

Code:
var s: string
     c: Char

begin
  s := String(c);
  s := Concat (s, s);
end;
Ok, was ich damit machen will ist eine Art brute FOrce Programm.
(Wenn illegal bitte löschen :o)

Wenn ich nun die erste Reihe voll hab möchte ich weiter gehen. Dazu wieder hole ich die Schleife. Dann kommt aber nur sowas raus.

aa
bb
cc
..
xx

wie kann ich nun erreichen das der vordere Buchstabe gleich bleibt bis ich wieder beim z angekommen bin?
Also

aa
ab
ac
..
az
ba
bb
..

danke ;)