Konsole-Programme (RootCRT)

Textmodus, nicht mehr

Für Clipper-Migranten bietet sich ein Programm an, dass auf einem Objekt der RootCRT()-Klasse basiert. Leider gibt die Dokumentation gar nichts über diese Klasse preis, und man erfährt von ihrer Existenz nur durch einen Blick in die mitgelieferte Quelle der AppSys.prg:

oCrt := RootCrt():New()

RootCRT() stellt ein Text-Modus-Fenster zur Verfügung.

Entscheidend hierfür ist - bei Verwendung der Standard-AppSys.prg die Projekt-Definitionsdatei. Es gibt dort zwei Stellen, an denen die Weichen für ein XbpCRT-Programm gestellt werden:

GUI = no
LINKFLAGS =

Beide Anweisungen verhindern in dieser Form, dass ein Presentation Manager Programm erzeugt wird.

In der Standard-AppSys.prg findet sich folgender Code:

nAppType := AppType()
DO CASE
CASE nAppType == APPTYPE_PM
   // wird in unserem Fall nicht ausgewählt, verwendet entweder XbpDialog() oder XbpCRT()
CASE nAppType == APPTYPE_VIO .OR. nAppType == APPTYPE_NOVIO
   // entspricht den Alternativen, die auf RootCRT() aufbauen