Page 1 of 1

SystemRequest window in full screen under MorphOS

Posted: Tue Aug 28, 2018 5:15 pm
by Juan Carlos
Andrea this code:

@DISPLAY {Title="Test", Desktop=True, DisableBlanker=True}

Function p_Teclado(msg)
Switch(msg.action)
Case "OnKeyDown":
If msg.key="h" Or msg.key="H"
p_Help()
EndIf
EndSwitch
EndFunction

SetFont(#SANS, 50)
SetFontColor(#RED)
SetFontStyle(#ANTIALIAS)
TextOut(#CENTER, #CENTER, "THIS IS A TEST")

Function p_Help()
SystemRequest("WINDOW BUG",
"Testing the requester window.".."\n"..
"ESC: Exit of the test."
,"Ok",#REQICON_INFORMATION)
EndFunction


InstallEventHandler({OnKeyDown=p_Teclado})

EscapeQuit(True)
Repeat
WaitEvent
Forever

This easy code to activate the desktop window, under MorphOS can'ts open the requester window, under Windows and AmigaOS3.9 yeah, but under MOS not.

Re: SystemRequest window in full screen under MorphOS

Posted: Thu Aug 30, 2018 1:50 pm
by Juan Carlos
I compiled the example for 68k and I tested under MorphOS and this 68k version open the requester window, the problem or bug is in the MorphOS executable.

Re: SystemRequest window in full screen under MorphOS

Posted: Thu Aug 30, 2018 3:09 pm
by jPV

Re: SystemRequest window in full screen under MorphOS

Posted: Thu Aug 30, 2018 9:02 pm
by Juan Carlos
I'm sorry I didn't see your post, as I said, I work in three proyects and I visit this forum rarely.

Re: SystemRequest window in full screen under MorphOS

Posted: Fri Aug 31, 2018 2:28 pm
by jPV
As said in the other thread, you can use GrabDesktop() to make a work-around.

For example like this:

@DISPLAY {Title="Test", Hidden=True, Borderless=True, DisableBlanker=True}
GrabDesktop(1)
BrushToBGPic(1,1)
DisplayBGPic(1)
FreeBrush(1)
OpenDisplay(1)


That would work on MorphOS too.

Re: SystemRequest window in full screen under MorphOS

Posted: Sun Sep 02, 2018 12:35 pm
by Juan Carlos
I could test the same code on AmigaOS4 and it also has the same bug not only with MorphOS.
Thank you for your solution, I'll test it.