Problems with RAGrid and Userlib

Everything else that doesn't fall into one of the other PB categories.
localmotion34
Enthusiast
Enthusiast
Posts: 665
Joined: Fri Sep 12, 2003 10:40 pm
Location: Tallahassee, Florida

Problems with RAGrid and Userlib

Post by localmotion34 »

I am trying to compile the PBOSL example of RAgrid to a userlib. I have successfully compiled PBOSL to userlibs, and am trying to get the Ragrid to work as a standalone PB lib.


Here is where my problem is:

Code: Select all

Procedure Grid_Callback(*gadget.PB_Gadget,hwnd.l,uMsg.l,wParam.l,lParam.l)
  Protected *notify.GRIDNOTIFY
  Protected pbid = GetProp_(*gadget\Gadget,"PB_ID")
  Protected PB_Gadget_SendGadgetCommand.PB_Gadget_SendGadgetCommand

  !EXTRN _PB_Gadget_SendGadgetCommand@8
  !MOV   [p.v_PB_Gadget_SendGadgetCommand],dword _PB_Gadget_SendGadgetCommand@8

I get that EXTRN _PB_Gadget_SendGadgetCommand@8 is already defined. Commenting out either of the inline ASM lines either throws an undefined symbol error, or the grid control no longer becomes visible. Anyone have any ideas what could be going wrong?

Code: Select all

!.WHILE status != dwPassedOut
! Invoke AllocateDrink, dwBeerAmount
!MOV Mug, Beer
!Invoke Drink, Mug, dwBeerAmount
!.endw
User avatar
ts-soft
Always Here
Always Here
Posts: 5756
Joined: Thu Jun 24, 2004 2:44 pm
Location: Berlin - Germany

Post by ts-soft »

You can test it without ASM:

Code: Select all

Import ""
  PB_Gadget_SendGadgetCommand(hWnd, EventType)
EndImport 

Procedure Grid_Callback(*gadget.PB_Gadget,hwnd.l,uMsg.l,wParam.l,lParam.l)
  Protected *notify.GRIDNOTIFY
  Protected pbid = GetProp_(*gadget\Gadget,"PB_ID")
PureBasic 5.73 | SpiderBasic 2.30 | Windows 10 Pro (x64) | Linux Mint 20.1 (x64)
Old bugs good, new bugs bad! Updates are evil: might fix old bugs and introduce no new ones.
Image
localmotion34
Enthusiast
Enthusiast
Posts: 665
Joined: Fri Sep 12, 2003 10:40 pm
Location: Tallahassee, Florida

Post by localmotion34 »

Now tailbite throws a messagebox error that only contains the path of the RaGrid pb source, and nothing else. No errors ect.

Code: Select all

!.WHILE status != dwPassedOut
! Invoke AllocateDrink, dwBeerAmount
!MOV Mug, Beer
!Invoke Drink, Mug, dwBeerAmount
!.endw
Post Reply