We already do this in the RealBasic.rbp example:
#if TargetWin32 Declare Function ActivateEx Lib TALibrary (ByRef options As ACTIVATE_OPTIONS_W) As Int32 Dim options As ACTIVATE_OPTIONS_W options.nLength = 8 options.sExtraData = ExtraData #else Declare Function ActivateEx Lib TALibrary (ByRef options As ACTIVATE_OPTIONS) As Int32 Dim options As ACTIVATE_OPTIONS options.nLength = 8 options.sExtraData = ExtraData #endif Dim ret As Int32 = ActivateEx(options)
Notice "ACTIVATE_OPTIONS_W" uses a WString, and ACTIVATE_OPTIONS uses CString.
Are you using the latest version?