大地坐标与大地空间坐标转换工具Word格式文档下载.docx

大地坐标与大地空间坐标转换工具Word格式文档下载.docx

《大地坐标与大地空间坐标转换工具Word格式文档下载.docx》由会员分享，可在线阅读，更多相关《大地坐标与大地空间坐标转换工具Word格式文档下载.docx（14页珍藏版）》请在冰豆网上搜索。

MainDlg.h"

#include<

math.h>

stdio.h>

BOOLWINAPIMain_Proc（HWNDhWnd,UINTuMsg,WPARAMwParam,LPARAMlParam）{

switch（uMsg）

{

HANDLE_MSG（hWnd,WM」NITDIALOG,Main_OnlnitDialog）;

HANDLE_MSG（hWnd,WM_COMMAND,Main_OnCommand）;

HANDLE_MSG（hWnd,WM_CLOSE,Main_OnClose）;

}

returnFALSE;

BOOLMain_OnlnitDialog（HWNDhwnd,HWNDhwndFocus,LPARAMlParam）

returnTRUE;

voidMain_OnCommand（HWNDhwnd,intid,HWNDhwndCtl,UINTcodeNotify）

doublea=0;

doublee2=0;

switch（id）

caseIDC_B1:

a=6378245.0000;

e2=0.00669342162297;

if（a==0）

GetDlgItemText（hwnd,IDC_E111,stre111,sizeof（stre111））;

doubleL1=atof（stre1）;

doubleL11=atof（stre11）;

doubleL111=atof（stre111）;

doubleL=L1+（L11/60）+（L111/3600）;

TCHARstre2[256];

TCHARstre22[256];

TCHARstre222[256];

GetDlgItemText（hwnd,IDC_E2,stre2,sizeof（stre2））;

GetDlgItemText（hwnd,IDC_E22,stre22,sizeof（stre22））;

GetDlgItemText（hwnd,IDC_E222,stre222,sizeof（stre222））;

doubleB2=atof（stre2）;

doubleB22=atof（stre22）;

doubleB222=atof（stre222）;

doubleB=B2+（B22/60）+（B222/3600）;

TCHARstre3[256];

GetDlgItemText（hwnd,IDC_E3,stre3,sizeof（stre3））;

doubleH=atof（stre3）;

doublesinB=sin（（B/180）*3.1415926535897932385）;

doublesinL=sin（（L/180）*3.1415926535897932385）;

doublecosB=cos（（B/180）*3.1415926535897932385）;

inty1=100000*（Y-y）;

intz=（int）Z;

intz1=100000*（Z-z）;

TCHARstrx[256];

wsprintf（strx,"

%i"

x）;

SetDlgltemText（hwnd,IDC_E4,strx）;

TCHARstrx1[256];

wsprintf（strx1,"

x1）;

SetDlgItemText（hwnd,IDC_D1,strx1）;

TCHARstry[256];

wsprintf（stry,"

y）;

SetDlgItemText（hwnd,IDC_E5,stry）;

TCHARstry1[256];

wsprintf（stry1,"

y1）;

SetDlgItemText（hwnd,IDC_D2,stry1）;

TCHARstrz[256];

wsprintf（strz,"

z）;

SetDlgItemText（hwnd,IDC_E6,strz）;

TCHARstrz1[256];

wsprintf（strz1,"

z1）;

SetDlgItemText（hwnd,IDC_D3,strz1）;

break;

caseIDC_B2:

a=6378140.0000;

e2=0.00669438499959;

caseIDC_B3:

a=6378137.0000;

e2=0.00669438002290;

caseIDC_B4:

TCHARstre1[256];

GetDlgltemText（hwnd,