x := Chr(c)
Oha: Herzlich Willkommen
Zum Drucken:
Binde die
Unit "Printer" ein und dann in etwa:
Delphi-Quellcode:
Printer.BeginDoc;
Printer.Canvas.TextOut(50,20, 'Die Zahl ' + InttoStr(c) + ' entspricht ' + x);
Printer.EndDoc;
Printer.Print;
Da bin ich mir jetzt nicht ganz sicher, da ich gerade kein Delphi zur Hand habe