Eine Lösung für Delphi XE und aufwärts besteht darin, dem InputQuery() Aufruf im zweiten Parameter ein #31 voranzustellen.
Wobei diese Lösung, im kurz vor dir verlinkten Beitrag, auch schon genannt wurde.
Und nein, das "ab XE" stimmt nicht, denn es wurde erst später so eingebaut.