Grafikfenster

Grafikfenster werden über Gwin_Open geöffnet:

Gwin_Open(Handle, X, Y, W, H [, VirtW, VirtH], Name$)
oder
Gwin_Open(Handle, X, Y, W, H, VirtW, VirtH, Name$, Info$ [, Kind])

Die Parameter verhalten sich analog zu Twin_Open. Momentan besteht die Einschränkung, daß Grafikfenster virtuell nicht größer sein können als der Bildschirm, außerdem machen sie auf Grafikkarten nach wie vor einige Probleme. Für beides wird aber an einer Lösung gearbeitet.
Die Verwaltung der Grafikfenster erfolgt auf die gleiche Weise wie im obrigen Beispiel, lediglich den Inhalt erhalten die Grafikfenster wie folgt:

Gwin_Activate(Fensterhandle) ' Grafikumlenkung auf Fenster einschalten
' Nun werden alle OMIKRON.Basic Grafikbefehle auf das Fenster wirksam
Gwin_Disactivate ' Grafikumlenkung ausschalten
Win_Redraw(Fensterhandle) ' Grafikfenster neu zeichnen

Dialoge

Auch für Dialoge wird kein RCS benötigt: Wie bei der Menüzeile wird die Dialogbox über Proceduren im Speicher aufgebaut:

Make_Dialog(Dialog1$, Dialog1) ' Neuen Dialog erstellen
' Zeile 2: 3 Radiobuttons
D_Radiobutton(2, "Richtig? [ Ja ][Nein][Vielleicht]")
' Zeile 4: Button OK-Button mit dem der Dialog verlassen werden kann
' Die 2 gibt an, das der OK-Button mit Return angewählt werden kann
D_Exitbutton (4, " [ OK ] ", 2)
' Zeile 5: Leerzeile
D_Empty(5)
End_Dialog(Dialog1$, Dialog1)

EasyGEM - 4 / 5

69