基于Fortran的計算優勢,編了一個DLL檔案bxl1s.dll,以供參考。
引數及呼叫 _B1SWC@20
界面用VC++,程序比較簡單,主要代碼如下:
typedef void (__stdcall *LPFN)(double *,double *,double *,double *,double *);
void CtestbbView::loadbxl1s()
{
double n_temp[10];
HINSTANCE hDLL;
LPFN lpfn;
hDLL=LoadLibrary(TEXT("bxl1s.dll"));
lpfn=(LPFN)GetProcAddress(hDLL, "_B1SWC@20");
(*lpfn)(&n_temp[0],&n_temp[1],&n_temp[2],&n_temp[3],&n_temp[4]);
FreeLibrary(hDLL);
return;
}
void CtestbbView::On32771() //menu選單項
{
loadbxl1s();
}
運行了21分鐘,程式報錯:
Critical error detected c0000374
轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/105765.html
標籤:新手樂園
上一篇:求大神幫幫忙,警告老是消除不了
下一篇:求順序存盤結構的一元多項試的值
