Ausgabe (Text) automatisch unterstreichen lassen?

[coly546]

Guten Abend liebes Forum,
im Rahmen des Informatikunterrichtes bin ich auf eine Problemstellung gestoßen,
wo ich keinen Ansatz für finde. Das Problem bezieht sich auf eine Konsolen-Anwendung.

Es geht im speziellen um eine Text-Ausgabe, die automatisch unterstrichen werden soll.


Bisher programmierten wir das immer wie folgt:

Delphi-Quellcode:

writeln('                   Testueberschrift');
writeln('                   ----------------');

halt ganz primitiv und einfach, aber leider nicht automatisch sondern programmiert.

Nun habe ich schon überlegt, ob man das vielleicht mit einer If-Then-Else Anweisung machen könnte.
Quasi wenn Text vorhanden, dann writeln(' ------------'); sonst mache nichts oder sowas in der Art. Leider habe ich auch im Internet keinerlei Informationen darüber gefunden wie man das Automatisieren könnte.



Um Rat und/oder Lösungsansätzen wäre ich euch sehr dankbar.




Beste Grüße und noch einen schönen Abend.
coly546