https://abundantcode.com/delphi-e2052-unterminated-string/