mapgis6.7二次开发vc6_demo 之六(mapgis公用函数二次封装库)

mapgis6.7二次开发vc6_demo 之六(mapgis公用函数二次封装库)

///
//mapgis_common.cpp
//mapgis公用函数二次封装库
//vp:hsg
//create date:2012-04
//
///
#include "stdafx.h"
#include "resource.h"
#include <math.h>
#include "win_area.h"
#include "win_oper.h"
#include "map_out.h"
#include "demo.h"
//
extern char* AppTitle;                    //应用程序名称
extern AREA_HINST    AHInst;
extern HWND         MainWnd;              //主窗口句柄
extern HWND         GrpWnd;               //图形窗口句柄
//------------------------------------------------------------
//define function style  mapgis_common.cpp
/*
char* GetDiskSpace_lc(unsigned char dsk);
char* ltrim_lc(char* s);
char* rtrim_lc(char* s);
char* trim_lc(char* s);
char* l2cp(long n);
char* i2cp(int n);
char* d2cp(double value);
char* short2cp(short value);
char* a2u(const char* A,const char* B);
char* a3u(const char* A,const char* B,const char* C);
char* a4u(const char* A,const char* B,const char* C,const char* D);
char* a5u(const char* A,const char* B,const char* C,const char* D,const char* E);
char* a6u(const char* A,const char* B,const char* C,const char* D,const char* E,const char* F);
char* a7u(const char* a1,const char* a2,const char* a3,const char* a4,const char* a5,const char* a6,const char* a7);
char* substr_lc(const char* cs,char* fd);
char* getdir_lc(char* s,const char* d);
char* getfilenameWithEx_lc(char* s,const char* d);
char* getfilenameNoExt_lc(char* s,const char* d);
char* getprestr(char* s,const char* d);
char **GetStrArray(char* s,const char* d);
void ShowMsg(char* msg);
void TestGetDiskSpace();
void D2A_test();
char* GetGeoVctType(short ai);  //获取图层类型
*/
//------------------------------------------------------------
//long  _GetDiskSpace(unsigned char dsk)
//参数：入口   dsk 磁盘号, 1=A,2=B...
//     出口   无
//返回值 返回磁盘剩余空间的字节数
char* GetDiskSpace_lc(unsigned char dsk)
{
    long sy=_GetDiskSpace(dsk); //
	long M=sy/1024;  
	char* atitle;
	int mLen=sizeof(M);
	atitle=new char[mLen];
	ltoa(M,atitle,mLen);
	return atitle;
}
//去掉字符串首(左)空格函数
char* ltrim_lc(char* s)
{
    char* s_s=new char[strlen(s)+1];
	strcpy(s_s,s);
	char* s_rev=strrev(s_s);
    s_rev=rtrim_lc(s_rev);
	char* d_s=strrev(s_rev);
	return d_s;
}
//去掉字符串尾(右)空格函数
char* rtrim_lc(char* s)
{
	char* s_s=new char[strlen(s)+1];
	strcpy(s_s,s);
	//
    int s_len=strlen(s_s);
	for(int i=s_len-1;i>=0;i--)
	{
         if(s_s[i]==' ')
		 {
			 s_s[i]='\0';
		 }
	}
	char* d_s=new char[strlen(s_s)];
	strcpy(d_s,s_s);
	return d_s;	
}
//去掉字符串首尾空格函数
char* trim_lc(char* s)
{
    return ltrim_lc(rtrim_lc(s));
}
//long转字符串函数
char* l2cp(long n)
{
    int nLen=sizeof(n);
	char* atitle=new char[nLen];
	memset(atitle,0,nLen);
	//
	sprintf(atitle,"%d",n);
	//ltoa(n,atitle,nLen); //有问题
	return atitle;
}
//int转字符串函数
char* i2cp(int n)
{
	int nLen=sizeof(n);
	char* atitle=new char[nLen];
	sprintf(atitle,"%d",n);
	//itoa(n,atitle,nLen);
	return atitle;    
}
//double转字符串函数 
char* d2cp(double value)
{
	/*
   char *tt;    
   int dec, sign; 
   int ndig = 10; 
   tt = ecvt(value, ndig, &dec, &sign); 
   //tt = fcvt(value, ndig, &dec, &sign);
   return tt;*/
	char* s=new char[sizeof(value)];
	sprintf(s,"%8.6f",value); 
    char* ret_s=new char[strlen(s)];
	strcpy(ret_s,s);
	return ret_s;
}
//short转字符串函数 
char* short2cp(short value)
{
    char* s=new char[sizeof(value)];
	sprintf(s,"%d",value); 
    char* ret_s=new char[strlen(s)];
	strcpy(ret_s,s);
	return ret_s;
}
//合并
char* a2u(const char* A,const char* B)
{
    return strcat_lc(A,B);
}
char* a3u(const char* A,const char* B,const char* C)
{
	char* t=strcat_lc(A,B);
	t=strcat_lc(t,C);
    return t;
}
char* a4u(const char* A,const char* B,const char* C,const char* D)
{
	char* t=strcat_lc(A,B);
	t=strcat_lc(t,C);
	t=strcat_lc(t,D);
    return t;
}
char* a5u(const char* A,const char* B,const char* C,const char* D,const char* E)
{
	char* t=strcat_lc(A,B);
	t=strcat_lc(t,C);
	t=strcat_lc(t,D);
	t=strcat_lc(t,E);
    return t;
}
char* a6u(const char* A,const char* B,const char* C,const char* D,const char* E,const char* F)
{
	char* t=strcat_lc(A,B);
	t=strcat_lc(t,C);
	t=strcat_lc(t,D);
	t=strcat_lc(t,E);
	t=strcat_lc(t,F);
    return t;
}
char* a7u(const char* a1,const char* a2,const char* a3,const char* a4,const char* a5,const char* a6,const char* a7)
{
	char* t=strcat_lc(a1,a2);
	t=strcat_lc(t,a3);
	t=strcat_lc(t,a4);
	t=strcat_lc(t,a5);
	t=strcat_lc(t,a6);
	t=strcat_lc(t,a7);
    return t;
}
char* substr_lc(const char* cs,char* fd)
{
     return strstr(cs,fd);
}
char* getdir_lc(char* s,const char* d)
{	
	char* s_s=new char[strlen(s)];
	strcpy(s_s,s);
	char* s_rev=strrev(s_s);
	char* t_rev=strstr(s_rev,d);
	char* t=strrev(t_rev);
	return t;
}
char* getfilenameWithEx_lc(char* s,const char* d)
{	
    char* t_dir=getdir_lc(s,d);
	//
	char* s_s=new char[strlen(s)];
	strcpy(s_s,s);
	int dir_len=strlen(t_dir);
	int fn_len=strlen(s_s)-dir_len;
    char* fn_ext=new char[fn_len];
	memset(fn_ext,0,fn_len);
	//
	for(int i=0;i<fn_len;i++)
	{
		fn_ext[i]=s_s[dir_len+i];
	}
	char* ret_s=new char[strlen(fn_ext)];
	strcpy(ret_s,fn_ext);
	return ret_s;
}
//获取不带扩展名的文件名
char* getfilenameNoExt_lc(char* s,const char* d)
{     
	//获取带扩展名的文件名
	 char** strArray;
	 char* t_f_ext=NULL;
	 strArray=GetStrArray(s,"\\");
	 int t_len=atoi(strArray[0]);
	 t_f_ext=strArray[t_len];
    //获取不带扩展名的文件名
	 char* t_fname=NULL;	 			
	 strArray=GetStrArray(t_f_ext,".");
	 int arraylen=atoi(strArray[0]);
	 if(arraylen>=2)
	 {
	    t_fname=strArray[1];
	 }
	 return t_fname;
}
//分割字符并返回字符数组
char **GetStrArray(char* s,const char* d)
{		
    char* s_s=new char[strlen(s)];
	strcpy(s_s,s);
	//计算字符数组个数
	int rows=0;
    char *p_str=strtok(s_s,d);
	while(p_str) 
    { 	
		rows+=1;
        p_str=strtok(NULL,d); 
	} 
	//重新初始二维数据
	char **strArray=new char*[rows+1];
	for(int i=0;i<rows;i++)
	{
        strArray[i]=NULL;
	}	
	strArray[0]=i2cp(rows);  //数组总长度
	//
	int index=1;
	s_s=new char[strlen(s)];
	strcpy(s_s,s);
    p_str=strtok(s_s,d);
	while(p_str) 
    { 			
        char* s_p=new char[strlen(p_str)];
	    strcpy(s_p,p_str);
		//添加到二维数组中
        strArray[index]=s_p;
		//
		index+=1;
        p_str=strtok(NULL,d); 
	}	
	return strArray;
}
void ShowMsg(char* msg)
{    
	::MessageBox(NULL,msg,"提示",0);
	//_MapGisAbout(msg);
}
void TestGetDiskSpace()
{
    char* atitle=GetDiskSpace_lc(4);
	//char* atitle=AppTitle;
	ShowMsg(atitle);
	//MessageBox(hWnd,(LPCSTR)m,(LPCSTR)m,NULL);     
    //_DispAbout();
}
void D2A_test()
{	
	char* f_ext="cun_xzdw.wl";	
	char **strArray=GetStrArray(f_ext,".");
    int tlen=atoi(strArray[0]);
	ShowMsg(strArray[1]);
	return;
	//
	int rows=3;
	int cols=4;
	int i;
	//int j;
	int *p;
	char* pret;
	//静态声明二维数据
	/*
    int a[3][4]={{1,2,3,4},{11,12,13,14},{21,22,23,24}};
    //赋值
	for(i=0;i<rows;i++)
	{
		for(j=0;j<cols;j++)
		{
			a[i][j]=i*4+j;		    
		}
	}
		//
	p=a[0];  //数组首地址
	//一般二维数据读取法
	pret="一般二维数据读取法\n";	
	for(i=0;i<rows;i++)
	{
         for(j=0;j<cols;j++)
		 {
			 char* ret=new char[50];
			 memset(ret,0,50);
             sprintf(ret,"%d,",a[i][j]);
			 if(strlen(pret)<=0)
			 {
                 pret=ret;
			 }
			 else
			 {
			     pret=a2u(pret,ret);
			 }
		 }
		 pret=a2u(pret,"\n");
	}
	//*(p+5)=pos(0,1,2,3,4,5)=12
	//sprintf(ret,"test 2 array=%d,%d",*(p+5),a[1][1]);	//12,12
	ShowMsg(pret); 	
	//输出结果
	//一般二维数据读取法
	//1,2,3,4
	//11,12,13,14
	//21,22,23,24
	*/
	//动态声明二维数据	
	int zlen=rows*cols;
	int **a=new int*[rows];
	for(i=0;i<rows;i++)
	{
		a[i]=new int[cols];
	}
	p=a[0];  //数组首地址
	//赋值
	for(i=0;i<zlen;i++)
	{
		*(p+i)=i;
	}	
	//指针读取二维数据方法
	pret="指针读取二维数据方法\n";
	for(i=0;i<zlen;i++)
	{
		char* ret=new char[50];
		memset(ret,0,50);
        sprintf(ret,"%d,",*(p+i));
		if(strlen(pret)<=0)
		{
            pret=ret;
		}
		else
		{
		    pret=a2u(pret,ret);
		}         
	}
	ShowMsg(pret);
	//输出结果
	//指针读取二维数据方法
	//1,2,3,4,11,12,13,14,21,22,23,24
	return;
	//-----------------------------------
	//查看属性
	_ViewAtt(MainWnd,AHInst,0);
	//查看mapgis图层字段结构api
	_ViewStruct(MainWnd,AHInst);

	char* s;
	double value;
	int dec,sign;
	int ndig=2;  //字符串长度
	value=35951234.876533324234;
    s=ecvt(value,ndig,&dec,&sign);	
	ShowMsg(a5u(s,",dec=",i2cp(dec),",sign=",i2cp(sign)));
	sprintf(s,"%8.6f",value);  //OK
	ShowMsg(s);

	//
	value=-123.45;
	ndig=15;
	s=ecvt(value,ndig,&dec,&sign);
	ShowMsg(a5u(s,",dec=",i2cp(dec),",sign=",i2cp(sign)));
	//
	value=0.6789e5;
	ndig=5;
	s=ecvt(value,ndig,&dec,&sign);
	ShowMsg(a5u(s,",dec=",i2cp(dec),",sign=",i2cp(sign)));
	return;
}

//获取图层类型 OK
char* GetGeoVctType(short ai)
{	
	short LayerType=_GetAreaType(ai);
	char* GeoVctType="UnKown";
	switch(LayerType)
	{
		case REG:
			GeoVctType="Polygon";
			break;
		case LIN:
			GeoVctType="Line";
			break;
		case PNT:
            GeoVctType="Point";
			break;
		default:
			break;
	}
	return GeoVctType;
}

--the--end---