[Progress Communities] [Progress OpenEdge ABL] Comment on Pure4GLTv a clone of the MS treeview in pure ABL

  • Thread starter Thread starter slegian-bva
  • Start date Start date
Status
Not open for further replies.
S

slegian-bva

Guest
This control works fine with OE 11.5 64bit, but GetKeyboardState fails on OE11.7 64 bit. The following change fixed the issue: &IF {&PROCESS-ARCHITECTURE} EQ 64 &THEN &SCOPED-DEFINE PBYTE INT64 &ELSE &SCOPED-DEFINE PBYTE LONG &ENDIF PROCEDURE GetKeyboardState EXTERNAL "user32.dll": DEFINE INPUT PARAMETER KBState AS {&PBYTE}. /* memptr */ &IF DEFINED(APIRtnParm) &THEN DEFINE RETURN PARAMETER RetVal AS LONG. /* bool */ &ENDIF END PROCEDURE.

Continue reading...
 
Status
Not open for further replies.
Back
Top