GUI Anwendung Konsole (Textfenster öffnen)

[blackfin]

Ich hab mir vor einiger Zeit mal ne Unit zusammengeschustert, mit der man eine zusätzliche DOS-Konsole nicht-blockierend in einer GUI-Anwendung verwenden kann, um irgendwas auszugeben oder Befehle auszuführen.

Ist sicher verbesserungswürdig, aber ich lad sie euch hier mal mit einem kleinen Beispiel-Programm hoch.
Vielleicht kann es ja jemand gebrauchen.

Beispielprojekt:
Einfach mal auf den "Open console" Button klicken und dann in der Konsole irgendwas eingeben.
Gültige Befehle im Beispielprojekt sind
- exit
- quit
- show (z.B. show "Hello world")

Generell ist es damit möglich, bei einer GUI-Anwendung die DOS-Konsole ein- / auszuschalten, etwas (farbig) auszugeben, Kommandos einzugeben etc.
Die relevanten Funktionen sind in der unit "exConsole.pas", die Anwendung selbst initialisiert die Konsole, ruft die entsprechenden Funktionen auf und pollt den Input / parst die eingegebenen Kommandos und führt dazu etwas aus.