vfeap.fi

来自「边界元程序,供力学工作者参考,希望对大家有所帮助」· FI 代码 · 共 16 行

!DEC$ FREEFORM
!/*********************  Prototypes  ***********************/
interface 
integer*4 function MainWndProc ( hwnd, mesg, wParam, lParam )
!DEC$ IF DEFINED(_X86_)
!DEC$ ATTRIBUTES STDCALL, ALIAS : '_MainWndProc@16' :: MainWndProc
!DEC$ ELSE
!DEC$ ATTRIBUTES STDCALL, ALIAS : 'MainWndProc' :: MainWndProc
!DEC$ ENDIF
integer*4 hwnd 
integer*4 mesg  
integer*4 wParam
integer*4 lParam 
end function 
end interface