Sende String an comport

[Natcree]

Hallo ich habe ein externes Display. Dieses ist am Comport5 angeschlossen. ich möchte nun einen Text an dieses externe Display schicken. Jedoch passiert nichts mit meinem Code. habe die rs232 in uses eingebunden und auch die com.dll. Hier der code

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
text:String;
begin
OPENCOM('COM5: baud=19200, data=8, parity=N, stop=1');
text:='Hallo';
for i:=0 to length(text)-1 do
begin
  SendByte(ord(text[i]));
end;

end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  closeCOM;
end;

ich hoffe ihr könnt mir weiterhelfen. wenn ich eine druckausgabe an diesen comport über canvas mache dann zeigt er nur Hyroglyphen.