Helft mir bitte mit Delphi 6

[Dagon]

Also, ich habs zum laufen gebracht! Hier meine "Musterlösung":

Delphi-Quellcode:

program Project2;

{$APPTYPE CONSOLE}

uses
  Windows, Sysutils;

var x: Integer;
    y: Char;
begin
  write('Bitte geben sie das zeichen ein, ');
  readln(y);
  x := ord(y);
  writeln('Das zeichen ist: ' + IntToStr(x));
  readln;
end.