XbpCrt always on top
Verfasst: Sa, 27. Sep 2014 19:33
Hallo.
Ich arbeite mit GET und SLE somit mit XbpCrt.
In der Appsys erzeuge ich mir ein xbpCrt-Fenster. Die Größe in Abhängigkeit von der Bildschirmauflösung und Größe.
So habe ich immer "fast" Vollbild.
Nun löse ich im Programm (extra Thread) im Hintergrund einen Ausdruck über Access aus. Das Problem ist nun das
Access kurz eine Meldung bringt: "Drucken" was beim weiteren bearbeiten der Maske aber stört. (Focus weg ).
Access konnte ich leider nicht dazu bringen ohne Meldung zu drucken.
Also nächster Versuch das CRT-Fenster als "alwaysontop" damit die Accessmeldung im Hintergrund bleibt.
Bei xbpDlg gibt es die Eigenschaft und da geht es einfach.
Hat jemand eine Idee wie ich mein crt-Fenster in der Appsys auf alwaysontop setzen kann.
Ich hoffe, wenn ich mein CRT-Fenster always on to habe, das damit dann die Meldung von Access im Hintergrund bleibt.
Gruß
Bernd
Ich arbeite mit GET und SLE somit mit XbpCrt.
In der Appsys erzeuge ich mir ein xbpCrt-Fenster. Die Größe in Abhängigkeit von der Bildschirmauflösung und Größe.
So habe ich immer "fast" Vollbild.
Nun löse ich im Programm (extra Thread) im Hintergrund einen Ausdruck über Access aus. Das Problem ist nun das
Access kurz eine Meldung bringt: "Drucken" was beim weiteren bearbeiten der Maske aber stört. (Focus weg ).
Access konnte ich leider nicht dazu bringen ohne Meldung zu drucken.
Also nächster Versuch das CRT-Fenster als "alwaysontop" damit die Accessmeldung im Hintergrund bleibt.
Bei xbpDlg gibt es die Eigenschaft und da geht es einfach.
Hat jemand eine Idee wie ich mein crt-Fenster in der Appsys auf alwaysontop setzen kann.
Code: Alles auswählen
oCrt := XbpCrt():new(NIL ,NIL ,;
aPos , DEF_ROWS, DEF_COLS, ;
" Mein Titel " )
oCrt:FontHeight := loc_fontheight // fonthöhe je nach Auflösung
oCrt:FontWidth := loc_fontwidth // fontbreite je nach Auflösung
oCrt:FontName := "Courier New Fett"
oCrt:Icon := 1000
// oCrt:alwaysOnTop := .t. // Versuch ob neue Meldungen von ACCESS nicht mehr erscheinen. Geht wohl nur bei xbpdlg
oCrt:Create()
// Presentation Space initialisieren
oCrt:PresSpace()
// XbpCrt wird aktives Fenster und Ausgabegerõt
SetAppWindow ( oCrt )
Gruß
Bernd