1;
2; Under GNU GPL V3
3; Alain C., 22 February 2017
4;
5; Very preliminary version of IDLSYSMONITORINFO,
6; just what is needed by some examples in Coyote lib.
7; (which is provided by Debian ...)
8;
9; Please post improvments or comments at:
10; https://github.com/gnudatalanguage/gdl/issues
11;
12function idlsysmonitorinfo::GetPrimaryMonitorIndex
13return, 0
14end
15;
16function idlsysmonitorinfo::GetRectangles, Exclude_Taskbar=Exclude_Taskbar
17;
18size=GET_SCREEN_SIZE()
19xmax=size[0]
20ymax=size[1]
21;
22return, [0,0, xmax, ymax]
23;
24end
25;
26; --------------------------
27;
28function idlsysmonitorinfo::GetResolutions
29;
30size=GET_SCREEN_SIZE(resolution=resolution)
31;
32return, resolution
33;
34end
35;
36; --------------------------
37;
38function IDLsysMonitorInfo::IsExtendedDesktop
39return, 0
40end
41;
42; --------------------------
43;
44function idlsysmonitorinfo::Init, filename, VERBOSE=verbose
45;
46;self._rectangles = ptr_new(/ALLOCATE_HEAP)
47;self._DISPLAY_NAMES = ''
48;self._RESOLUTIONS = ptr_new(/ALLOCATE_HEAP)
49;self.IDLSYSMONITORINFO_TOP=0L
50return, 1
51end
52
53pro idlsysmonitorinfo__define, struct
54struct = {idlsysmonitorinfo, $
55          _rectangles: ptr_new(), $
56          _DISPLAY_NAMES: '', $
57          _RESOLUTIONS: ptr_new(), $
58          IDLSYSMONITORINFO_BOTTOM: 0l, $
59          IDLSYSMONITORINFO_TOP: 0l $
60}
61end
62
63