Full Screen Mode

Targets Windows
1

Hi,

In a current project (utility), I set the main window at full screen mode (OS X).

I just get an eye on the exe (Windows XP), and checked the documentation to learn that this works only on OS X.

I built that project because I have plenty (tons, 10,000 or more) screen shots to do and need as much screen width (most of all HEIGHT) as I can to lower the number of screen shots files for the same image (very large image). *

How can I have a window “full screen” under windows (XP) ?

I use VirtualBox on my MacBook Pro to run Windows XP, so the testing is not fantastic (hard to do, sometimes).

Nota: is there’s a kind of borderless window usable on XP ?
(the less I have to remove after MICE use the faster the process is)

  • with 1,440 x 900 screen resolution, I have to make around 10 screen shots to get one image (of a kind, there two kinds or images: Portrait and Landscape: 2 to 4 screen shots).
2

Maybe a small solution:
Make a new “Container Control” with name ContentContainer. Put all your required controls on this window.
Create a window as Window1 with type = Document
Create a window as WindowFullScreen with type = Plain Box
Add the ContentContainer to Window1 and WindowFullScreen
Add a button “FullScreen” to Window1
In the button action event: WindowFullscreen.show
In the Window open event of WindowFullScreen: me.maximize
In the Window KeyDown event of WindowFullScreen:
if key.Asc = 127 then // DEL Key
self.close
Window1.show
end if

3

Hi Horst,

thank you for the tip.

However:
I have no control at all in the window (the idea was to do useful snapshots for the whole screen).
The screen shot is done in the default window (so no Container Control)

The URL is changed from a different window.
The Bookmark system is also done in a different window (I do the display, changes, delete / append in that window).

For Windows, I think that I will implement the save screen in Window1.DoubleClick (if one exists). Argh ! None exists. I will try alt-click [for Windows only] and save the screen (DrawInto ?) to disk using the window title ( tag contents).

AFAIK: Plain Box have a surrounding “rect” ?
It have one on OS X. [the target here is Windows]

BTW: it is a very simple (and small) “browser”.

4

Is that what you are looking for (Print Screen )

  #if TargetWin32
    // Virtual key codes: http://msdn.microsoft.com/en-us/library/windows/desktop/dd375731%28v=vs.85%29.aspx
    // http://msdn.microsoft.com/en-us/library/aa928103.aspx
    
    Const VK_CONTROL = &H11 //CTRL key
    Const VK_SNAPSHOT = &H2C  //PRINT SCREEN key
    Const KEYEVENTF_KEYUP = &H2
    
    Soft Declare Sub keybd_event Lib "user32" (bVk As Byte, bScan As Byte,dwFlags As uint32, dwExtraInfo As uint32)
    
    'To get the Entire Screen
    keybd_event(VK_CONTROL, 1, 0, 0 )
    keybd_event(VK_SNAPSHOT, 1, 0, 0)
    //Release keys
    keybd_event(VK_SNAPSHOT, 1, KEYEVENTF_KEYUP, 0)
    keybd_event(VK_CONTROL, 1, KEYEVENTF_KEYUP, 0 )
  #endif

You might also have a look on this link: https://forum.xojo.com/6009-sendkey-function if you want to maximize the window. Sendkey function from wsh can’t use PRTSCR directly

5

Thank you John.

I will check later today (back home).

6

From what I can see, the Xojo full screen is supposed to be cross-platform, they have the FullScreenButton which is just for OS X
http://documentation.xojo.com/index.php/Window.FullScreen

7

shao sean:

I may have to change my glasses / eyes / stop reading too early in the morning or when the night is young !

Thank you.

PS: I may need a brain upgrade !

This property has no effect on Windows or Linux.

That sentence in the docs leads me to think wrong !

For one time that I read carefully the whole text on the page ! ;-:slight_smile:

8

[quote=83573:@Emile Schwarz]This property has no effect on Windows or Linux.
That sentence in the docs leads me to think wrong ![/quote]

yeah, that is just for the FullScreenButton property…