User Activity

  • Posted a comment on discussion Contributions on GnuCOBOL

    Hi, I'm starting to write the wrapper. In the main program (in "trigger-draw-label") I deleted this call with all the related style calls call "AG_LabelNewS" using by value agar-box-row7 by value ag-label-vfill by content z"This is a LABEL" returning agar-label4 end-call and I replaced it with move z" Call LABEL " to ws-label-caption move z"rgb(43, 255, 0)" to ws-label-text-color move z"rgb(0, 0, 0)" to ws-label-background move z"Arial" to ws-label-font move z"28" to ws-label-font-size call "Label"...

  • Modified a comment on discussion Contributions on GnuCOBOL

    Hi everyone, I managed to hide those two scrollbars from the table (vertical and horizontal) because they were really ugly, but it wasn't easy because the scrollbar is a parent widget of the table, and to find the pointer's name I used this very useful function (it's an Agar Core function. It finds a child object of a parent object by name, and must be written in lowercase). call "ag_object_find_child" using by value agar-table by content z "scrollbar1" returning agar-scrollbar end-call and after...

  • Modified a comment on discussion Contributions on GnuCOBOL

    OK Simon, thanks for pointing that out. I've fixed it for both "AG_InitGraphics" and "AG_InitCore".

  • Posted a comment on discussion Contributions on GnuCOBOL

    OK Simon, thanks for pointing that out. I've corrected it.

  • Posted a comment on discussion Contributions on GnuCOBOL

    Hi everyone, I managed to hide those two scrollbars from the table (vertical and horizontal) because they were really ugly, but it wasn't easy because the scrollbar is a parent widget of the table, and to find the pointer's name I used this very useful function (it's an Agar Core function. It finds a child object of a parent object by name, and must be written in lowercase). call "ag_object_find_child" using by value agar-table by content z "scrollbar1" returning agar-scrollbar end-call and after...

  • Posted a comment on discussion Contributions on GnuCOBOL

    Hi Eugenio, Yes, of course I've seen it. It's Brian Tiffin's colossal project; that's where I go to check when something isn't working. His libagar.cpy with the structure definitions is especially interesting. The way he handles pointers is interesting, but his code is about 7,000 lines long (there's a sea of functions). It's best to start a project from scratch to better understand how it works. Brian also seems to have created cobweb-agar specifically to use it as a sort of wrapper. However, I...

  • Posted a comment on discussion Contributions on GnuCOBOL

    Hi, I also added the combobox function (which required no less than 3 program event entries). The code contains very detailed comments. The drop-down menu that opens to select items is actually a popup window, from which you can select the item with a click. I attach: 1) agar-tools.cob (updated) 2) agar-logo.png 3 screenshots Regards Giancarlo

  • Posted a comment on discussion Contributions on GnuCOBOL

    Hi Ralph, thanks for the compliments, it was a lot of fun. But the surprises don't seem to end there: by pure chance I discovered that if you create a new empty box, it's drawn as a line (which can have a thickness, color, and a raised/engraved style). I also added this other feature that might be useful as a separator tool (only horizontally, though; I haven't managed to do it vertically yet).

View All

Personal Data

Username:
pluto72
Joined:
2021-01-04 14:38:35

Projects

This is a list of open source software projects that Giancarlo Canini is associated with:

  • Project Logo GnuCOBOL A free COBOL compiler Last Updated:

Personal Tools