Delphi - Convertir un caracter a su codigo ASCII

Deseo saber como convierto un caracter a su codigo ASCII correspondiente, lo necesito para controlar los comandos que recibo o envio por un puerto serie

Ord devuelve el código ASCII del carcater pasado como parámetro.

Ord('A') devuelve 65.

Saludos...

Si no me equivoco, las funciones Chr y Ord de la unidad System devuelven respectivamente el carácter ASCII o el código ASCII del valor pasado como argumento. En tu caso, el código sería

uses System;
...
...
var
Key : Char;
codigo : Word;

begin
codigo := Ord(Key);
...
...

Un saludo