Is there a way to ensure that a window retains its pre-set size and therefore be moved around to reveal its full extent, instead of being reduced in size? This requirement is for software demonstration purposes, where the user's system has a small monitor 1280 x 1024. Therefore it isn't important to us if the window does not fit entirely into the monitor's dimensions, because we can grab the title bar and move it around, to reveal the section we want to view.
What I remember happening in the past, when monitors were of smaller dimensions, is that Windows O/S only showed a portion of the window on the monitor. That was not PureBasic, but certain applications I recall, in the days of the VGA monitors. Can that behaviour be reproduced?
Code: Select all
win.i = OpenWindow(#PB_Any, #PB_Ignore, #PB_Ignore, 1920, 1080, "Test", #PB_Window_MinimizeGadget | #PB_Window_SystemMenu)
TextGadget(#PB_Any, 30, 30, 160, 25, "Item ref.")
pcode.i = StringGadget(#PB_Any, 140, 25, 140, 25, "")
exitbutton.i = ButtonGadget(#PB_Any, 30, 160, 100, 25, "Exit")
SetActiveGadget(pcode.i)
Repeat
event = WaitWindowEvent()
Select event
Case #PB_Event_CloseWindow
Break
Case #PB_Event_Gadget
Select EventGadget()
; **
; ** Exit button
; **
Case exitbutton.i
Break
EndSelect
EndSelect
ForEver
CloseWindow(win.i)
End
