[archive] Using Full GUI terminal Screen

[Migrated content. Thread originally posted on 28 August 2007]

After you've created the window, try this:-MODIFY WINDOW-HANDLE, Action = Action-Maximize.This will take the size of the task bar in to account.

Ian

I'm new to GUI programming.

I want to display a GUI screen using acuthin. I want to use the full screen.

I have used some code from the Acucorp sample program win-start-max.

So, my program will call the SYSTEM-INFORMATION and TERMINAL-ABILITIES to check the PHYSICAL-SCREEN-WIDTH variable. I then call the appropriate display statement depending on the PHYSICAL-SCREEN-WIDTH variable. This works fine when the microsoft windows task bar is set to 'auto hide taskbar'. But, not all users have the option set on. When this option is not set to auto hide, the bottom few fields on my screen are hidden by the task bar.

Is there a way to auto adjust the GUI screen? Is there a way to auto adjust the screen to stay above the task bar?

What do I need to do?

Thanks

Steve

[Migrated content. Thread originally posted on 28 August 2007]

After you've created the window, try this:-MODIFY WINDOW-HANDLE, Action = Action-Maximize.This will take the size of the task bar in to account.

Ian

I'm new to GUI programming.

I want to display a GUI screen using acuthin. I want to use the full screen.

I have used some code from the Acucorp sample program win-start-max.

So, my program will call the SYSTEM-INFORMATION and TERMINAL-ABILITIES to check the PHYSICAL-SCREEN-WIDTH variable. I then call the appropriate display statement depending on the PHYSICAL-SCREEN-WIDTH variable. This works fine when the microsoft windows task bar is set to 'auto hide taskbar'. But, not all users have the option set on. When this option is not set to auto hide, the bottom few fields on my screen are hidden by the task bar.

Is there a way to auto adjust the GUI screen? Is there a way to auto adjust the screen to stay above the task bar?

What do I need to do?

Thanks

Steve

[Migrated content. Thread originally posted on 28 August 2007]

After you've created the window, try this:-MODIFY WINDOW-HANDLE, Action = Action-Maximize.This will take the size of the task bar in to account.

Ian

I'm new to GUI programming.

I want to display a GUI screen using acuthin. I want to use the full screen.

I have used some code from the Acucorp sample program win-start-max.

So, my program will call the SYSTEM-INFORMATION and TERMINAL-ABILITIES to check the PHYSICAL-SCREEN-WIDTH variable. I then call the appropriate display statement depending on the PHYSICAL-SCREEN-WIDTH variable. This works fine when the microsoft windows task bar is set to 'auto hide taskbar'. But, not all users have the option set on. When this option is not set to auto hide, the bottom few fields on my screen are hidden by the task bar.

Is there a way to auto adjust the GUI screen? Is there a way to auto adjust the screen to stay above the task bar?

What do I need to do?

Thanks

Steve

[Migrated content. Thread originally posted on 28 August 2007]

After you've created the window, try this:-MODIFY WINDOW-HANDLE, Action = Action-Maximize.This will take the size of the task bar in to account.

Ian

What you request is Windows specific, which is why this is not returned with the SYSTEM-INFORMATION.
You may however get this from the API using this technique:

       01 RECT.
          03 LEFT-POS               PIC X(4) COMP-N.   
          03 TOP-POS                PIC X(4) COMP-N.   
          03 RIGHT-POS              PIC X(4) COMP-N.   
          03 BOTTOM-POS             PIC X(4) COMP-N.   
       PROCEDURE DIVISION.
       MAIN-LOGIC.
    CALL    "USER32.DLL".
    CALL    "[EMAIL="SystemParametersInfoA@WINAPI"]SystemParametersInfoA@WINAPI[/EMAIL]" USING
            BY VALUE         X#00000030
            BY VALUE         X#00000000
            BY REFERENCE     RECT
            BY VALUE         X#00000000.
    CANCEL  "USER32.DLL".


You will find the visible sizes then in respectively RIGHT-POS and BOTTOM-POS.

[Migrated content. Thread originally posted on 28 August 2007]

After you've created the window, try this:-MODIFY WINDOW-HANDLE, Action = Action-Maximize.This will take the size of the task bar in to account.

Ian

Remember to do the initial display VISIBLE 0. Then apply VISIBLE 1 to blacky' suggestion and you avoid flashing.