Skip to main content

[archive] Help with background image of a #grid

  • June 20, 2007
  • 3 replies
  • 0 views
D

[Migrated content. Thread originally posted on 20 June 2007]

Hi to all,

I am trying to set the background image of a #grid by doing the following:

...
WORKING-STORAGE SECTION.
77 BITMAP-HANDLE HANDLE OF iPictureDisp.
...
PROCEDURE DIVISION.
...
CALL "W$BITMAP" USING WBITMAP-LOAD-PICTURE, "MY-BITMAP.BMP" GIVING BITMAP-HANDLE
MODIFY MY-SHARP-GRID @BKGPICTURE = (BITMAP-HANDLE)

My "acuclass.def" file contains the definition of iPictureDisp interface.

At runtime I am getting a "bad variable type" error...

Thanks in advance.
Thanos

    3 replies

    D

    [Migrated content. Thread originally posted on 20 June 2007]

    Hi to all,

    I am trying to set the background image of a #grid by doing the following:

    ...
    WORKING-STORAGE SECTION.
    77 BITMAP-HANDLE HANDLE OF iPictureDisp.
    ...
    PROCEDURE DIVISION.
    ...
    CALL "W$BITMAP" USING WBITMAP-LOAD-PICTURE, "MY-BITMAP.BMP" GIVING BITMAP-HANDLE
    MODIFY MY-SHARP-GRID @BKGPICTURE = (BITMAP-HANDLE)

    My "acuclass.def" file contains the definition of iPictureDisp interface.

    At runtime I am getting a "bad variable type" error...

    Thanks in advance.
    Thanos
    I would try:

    MODIFY MY-SHARP-GRID @BKGPICTURE = BITMAP-HANDLE AS nnnn

    where nnnn is some type of VARIANT type defined in activex.def. I'm not sure which one you would use, however. Perhaps that will resolve the problem?

    Rob
    D

    [Migrated content. Thread originally posted on 20 June 2007]

    Hi to all,

    I am trying to set the background image of a #grid by doing the following:

    ...
    WORKING-STORAGE SECTION.
    77 BITMAP-HANDLE HANDLE OF iPictureDisp.
    ...
    PROCEDURE DIVISION.
    ...
    CALL "W$BITMAP" USING WBITMAP-LOAD-PICTURE, "MY-BITMAP.BMP" GIVING BITMAP-HANDLE
    MODIFY MY-SHARP-GRID @BKGPICTURE = (BITMAP-HANDLE)

    My "acuclass.def" file contains the definition of iPictureDisp interface.

    At runtime I am getting a "bad variable type" error...

    Thanks in advance.
    Thanos
    Thank you for the response!

    I tried MODIFY MY-SHARP-GRID @BKGPICTURE = BITMAP-HANDLE AS 16413 but I got the same error: "bad variable type". Any other num literal gives a "type mismatch" error.

    Bellow is the part of the SGgrid.def file that describes the bkgpicture property:

    * BkgPicture
    * Returns or sets grid's background picture.
    PROPERTY-PUTREF, 87, @BkgPicture,
    "IPictureDisp* (Property_Value)", TYPE 16413


    Thanos
    D

    [Migrated content. Thread originally posted on 20 June 2007]

    Hi to all,

    I am trying to set the background image of a #grid by doing the following:

    ...
    WORKING-STORAGE SECTION.
    77 BITMAP-HANDLE HANDLE OF iPictureDisp.
    ...
    PROCEDURE DIVISION.
    ...
    CALL "W$BITMAP" USING WBITMAP-LOAD-PICTURE, "MY-BITMAP.BMP" GIVING BITMAP-HANDLE
    MODIFY MY-SHARP-GRID @BKGPICTURE = (BITMAP-HANDLE)

    My "acuclass.def" file contains the definition of iPictureDisp interface.

    At runtime I am getting a "bad variable type" error...

    Thanks in advance.
    Thanos
    It finally worked !!!

    MODIFY MY-SHARP-GRID @BKGPICTURE = BITMAP-HANDLE AS 9

    9 is VT_DISPATCH

    Thanks for giving me the idea!

    Thanos

    Recent badge winners

    Explore all badges
    Terms & ConditionsAccessibility statement