VS:GetScreen: Difference between revisions
Jump to navigation
Jump to search
No edit summary |
m (Transfer Orso to _c_) |
||
Line 47: | Line 47: | ||
----------------------------------------------------------------------------------------------------------- | ----------------------------------------------------------------------------------------------------------- | ||
<remark> | <remark> | ||
([[User: | ([[User:CBM-c-|_c_]], 2014.08.19): The values returned are pixels. For example my iMac returns "0, 0, 2560, 1440". | ||
Latest revision as of 05:44, 30 December 2020
.VectorScript|VectorScript ..VS:Function Reference|Function Reference ..VS:Function_Reference_Appendix|Appendix
Description
Procedure GetScreen returns the top-left and bottom-right corners of the display screen. These values will change as different sized screens are used. This procedure can be utilized to aid in development of dialog boxes, or as a check of screen size for sizing or displaying custom dialogs.
PROCEDURE GetScreen(
VAR x1 :INTEGER;
VAR y1 :INTEGER;
VAR x2 :INTEGER;
VAR y2 :INTEGER);
def vs.GetScreen(): return (x1, y1, x2, y2)
Parameters
x1 INTEGER Returns X coordinate of top left of screen. y1 INTEGER Returns Y coordinate of top left of screen. x2 INTEGER Returns X coordinate of bottom right of screen. y2 INTEGER Returns Y coordinate of bottom right of screen.
Remarks
(_c_, 2014.08.19): The values returned are pixels. For example my iMac returns "0, 0, 2560, 1440".
This seems to crash VW on Win98.
Works OK on 1000 8367 on XP.
Example
VectorScript
PROCEDURE Example; VAR x1, y1, x2, y2 :INTEGER; BEGIN GetScreen(x1, y1, x2, y2); Message(x1,' ',y1,' ',x2,' ',y2); END; RUN(Example);
Python
def Example(): x1, y1, x2, y2 = vs.GetScreen() vs.Message(x1,' ',y1,' ',x2,' ',y2); Example()
Version
Availability: from All Versions