ApdComPort und ASCII Char versenden ???

[marabu]

Hi,

so geht es:

Delphi-Quellcode:

var
  iChar: Integer;
begin
  if TryStrToInt(Edit.Text, iChar) 
    then ApdComPort1.Output := Chr(iChar)
    else Edit.Text := '?' + Edit.Text;
end;

Freundliche Grüße