Wie kann man den Asciiwert errechnen

[LingNeu]

hallo zusammen,
ich hab gelesen, dass man ja ganz einfach den Asciiwert über die funktion ord() holen kann.

Das hier scheint zu funktionieren

x := ord('A') ; //rückgabe 65

Aber wie mache ich das die Werte aus einem String ausgelesen werden ?
Da kommt ein Error: inkompatible typen
Was muss ich machen, damit der String passt?
Danke für jede Hilfe!
Lingneu

Delphi-Quellcode:

Procedure HF.btn_testclick(Sender: TObject);
var asc: integer;
text: string;
begin
text := 'ABC';
asc  := ord(copy(text,1,1));
//asc := ord(text[1]);

end;