Page 1 of 1
dcsay on desktop the bottom right of the screen
Posted: Thu Nov 15, 2018 1:11 pm
by digitsoft
hello Roger
How to present a message in the bottom right of the screen
always this visible posision if it has different resolution in the monitors.
Re: dcsay on desktop the bottom right of the screen
Posted: Thu Nov 15, 2018 1:50 pm
by rdonnay
Code: Select all
#INCLUDE "dcdialog.CH"
FUNCTION Main()
LOCAL GetList[0], GetOptions
@ 0,0 DCSAY 'This is my message' FONT '18.Arial Bold' ;
COLOR GRA_CLR_DARKRED SAYSIZE 0
DCGETOPTIONS HIDE ALWAYSONTOP NOTASKBAR
DCREAD GUI FIT BUTTONS DCGUI_BUTTON_OK OPTIONS GetOptions ;
EVAL {|o|o:setPos({AppDeskTop():currentSize()[1]-o:currentSize()[1],0}), ;
DC_ZoomTransparent(o)} ;
TITLE 'Alert'
RETURN nil
PROC appsys ; RETURN