Jump to content

JDRenk

Members
 View Profile  See their activity

  • Content Count

    26

  • Joined

  • Last visited

Everything posted by JDRenk

  1. JDRenk

    Comport Serial Port help

    JDRenk replied to JDRenk's topic in General Help

    When I use this I get integer values that don't make sense. procedure TForm2.ComPort4RxChar(Sender: TObject); var Text: String; Result: Integer; begin Result := ComPort4.ReadWord; Text := IntToStr(Result); Memo2.Text := string(Text); end; When I use this I get the correct ANSI String. procedure TForm2.ComPort4RxChar(Sender: TObject); var Text: AnsiString; begin Text := ComPort4.ReadAnsiString; Memo2.SelText := string(Text); end;
×