Einzelnen Beitrag anzeigen

MrKnogge

Registriert seit: 9. Jun 2003
Ort: Pforzheim
2.458 Beiträge
 
Delphi 2007 Professional
 
#15

Re: Nächsten Buchstaben im Alphabet

  Alt 25. Feb 2004, 23:28
Zitat von Matze:
Zitat von 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;
Is meins da nicht besser?

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

Edit: Delphi-Tags, wie immer...
Warum ne Funkton schreiben, dies schon gibt ?
Christian Bootz
Einstein ist tot, Newton ist tot,
und mir ist auch schon ganz schlecht...
  Mit Zitat antworten Zitat