Nächsten Buchstaben im Alphabet

[Lord_Stifterl]

Hi liebe DPler,

wie kann ich den nächsten Buchstaben im Alphabet herausfinden?

LG
Lord_Stifterl

[Cuchulainn]

Du kannst mit dem Ascii-Code arbeiten. Sieh dir dazu mal die Funktionen Ord und Chr an.

Beispiel: Mit Ord('A') bekommst du den Ascii-Code von A, also 65. B ist 66, C 67.

[fkerber]

Hi!

Relativ zu was?

Der nächste zu a ist b, der nächste zu y ist z :-D

Spaß beiseite:

a ist #97
b ist #98
etc.

Ciao fkerber

[Matze]

Delphi-Quellcode:

function NextLetter(Letter: string): string;
begin
  Result := Chr(Ord(Letter[1]) + 1);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  Label1.Caption := NextLetter(Edit1.Text);
end;

Edit1: Delphi-Tags vergessen :oops:
Edit2: Zu langsam. :(

[Lord_Stifterl]

Wunderbar, Problem gelöst.

Danke Euch allen.

LG
Lord_Stifterl

[nailor]

Ich würde lieber nen array machen, mit allen Buchstaben drin. Dann den Index suchen, und eins weiter gehen. Ist besser, wenn man z.b. Sonderzeichen hat.

PS: String dürfte reichen, kein array

[Stanlay Hanks]

Hi.
@Nailor aber das Alphabet hat doch keine Sonderzeichen :gruebel:

[MrKnogge]

Warum macht ihr aus einer Fliege einen Elefanten:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  i : char;
begin
  i := 'a';
  inc(i);
  ShowMessage(i);
end;

[nailor]

Zitat:

Zitat von Stanlay Hanks

Hi.
@Nailor aber das Alphabet hat doch keine Sonderzeichen :gruebel:

okok... aber schon beim z gibts probleme

[Stanlay Hanks]

Zitat:

Zitat von Nailor

Zitat:

Zitat von Stanlay Hanks

Hi.
@Nailor aber das Alphabet hat doch keine Sonderzeichen :gruebel:

okok... aber schon beim z gibts probleme

Kapier ich nicht :oops: Kannst du mir das erklähren? :oops: