C / C++ / MFC

<br />
subroutine swap(x,y,z)<br />
real , intent(inout) :: x<br />
real , intent(inout) :: y<br />
real , intent(out) :: z<br />
real :: t<br />
!<br />
!DEC$ATTRIBUTES dllexport :: swap<br />
!DEC$ATTRIBUTES DEFAULT, DECORATE, ALIAS: 'swap' :: swap<br />
!<br />
t=x<br />
x=y<br />
y=t<br />
z=1.23<br />
end subroutine swap<br />
<\code><br />
<br />
The C++ calling code is:<br />
<br />
<code><br />
#include <iostream><br />
using namespace std;<br />
extern "C" __declspec(dllimport)void swap(double &x, double &y,double &z);<br />
int main() <br />
{<br />
	double x,y,z;<br />
	x	= 10;<br />
	y	= 999;<br />
	swap(x,y,z);<br />
	cout<<x<<"\t"<<y<<"\t"<<z<<endl;<br />
 return="" 0;<br />
}<br />
<\code=""><br />
<br />
There are some problems however. x and y are not swapped but they do display their original values on the console. And z has not been assigned a value. I think it's a problem with the C++ bit but I could be wrong. The good thing is that it compiles and executes.<br />
I will eventually try and do this in C# but one step at a time ;)<br />
<br />
Kash

wxPoint point = GetPosition();<br />
HMENU pSysMenu = (HMENU )GetSystemMenu((HWND)this->GetHandle(),  FALSE);<br />
if (pSysMenu != NULL)<br />
{<br />
    int flag = TrackPopupMenu(pSysMenu, TPM_LEFTALIGN|TPM_LEFTBUTTON|TPM_RETURNCMD, point.x+pt.x, point.y+pt.y, NULL, (HWND)this->GetHandle(), 0);<br />
    if(flag > 0)<br />
       SendMessage((HWND)this->GetHandle(), WM_SYSCOMMAND, flag, 0);<br />
}<br />