Bin gerade dabei eine Consolen Anwendung zu schreiben.

Jetzt wollte ich, wie ich es aus meinen alten
TP-Zeiten die Cursor (Caret) Grösse ändern.
Die Cursorgrössen sind ja Normal _, Halbblock ▄ und Block █.
Mit
CreateCaret(GetStdHandle(STD_OUTPUT_HANDLE), 0, 255, 0) konnte ich Delphi nicht dazu bewegen den Cursor umzuschalten.
Hat jemand eine Idee ?