C语言动态链接库编程
VB6中引用VC6编写的.DLL函数进行屏幕绘图
一、动态链接库的基本概念
动态链接库（Dynamic Link Library，简称DLL）是由函数对象以及资源组成的二进制库文件，此库文件能同时被多个进程或者应用程序使用。
图1、VB6中使用.dll库函数在窗体中绘制简单飞机模型
上图1展现了在VB6中调用VC6建立的屏幕绘图动态链接库（.DLL）的应用效果，程序的运行非常顺畅；实现了在VB中绘图象在VC中一样的效果（3D+消隐+光照）。 二、动态链接库不可少的两个文件 1. 创建动态库的函数源文件（.cpp）：编写库函数源码的源文件。 2. 导出函数名字的文件（.def）：编写Lib（*.dll）入口函数名字的源文件。 三、编程创建动态链接库
下面以简单的屏幕绘图函数为例，实现用VC6创建动态链接库，在VB6中调用（.dll）函数的全过程。
1. 打开VC6：文件－新建－工程（空工程）
图2、新建Win32 DLL工程
2. 添加（.cpp）文件到工程（Graph.cpp）
图3、新建Graph.cpp文件并添加到工程 3. 添加（.def）文件到工程（Graph.def）
图4、新建Graph.def文件并添加到工程 4.在Graph.cpp文件中编写函数源码 #ifndef WIN32GDI_API
#define WIN32GDI_API _declspec(dllexport) #define EXC extern \#define CALL _stdcall #endif
#include
typedef struct _tagSIZE2I{ int width; int height; }SIZE2I;
typedef struct _tagCOLOR4U{ unsigned char b; unsigned char g; unsigned char r; unsigned char a; }COLOR4U;
typedef struct _tagCOLOR4I{
int b; int g; int r; int a; }COLOR4I;
HDC _g_hDC; COLOR4U *_g_bitmap; COLOR4I _g_ftcolor; COLOR4I _g_bkcolor;
SIZE2I _g_size={300,200}; SIZE2I _g_oldsize={-100,-100}; int _g_win_test=0;
EXC WIN32GDI_API void CALL SetGraphicsDC(HDC shdc){ _g_hDC=shdc; }
EXC WIN32GDI_API void CALL InitGraph(int w,int h){ if(w<200) w=200; if(h<180) h=180; _g_size.width=w; _g_size.height=h; if(_g_win_test==1){ if(_g_size.width!=_g_oldsize.width||_g_size.height!=_g_oldsize.height){ _g_oldsize=_g_size; delete []_g_bitmap; _g_bitmap=new COLOR4U [_g_size.width*_g_size.height]; } } if(_g_win_test==0){ _g_oldsize=_g_size; _g_bitmap=new COLOR4U [_g_size.width*_g_size.height]; _g_win_test=1; } }
int TestNumber(int number){ if(number>255) number=255; if(number<0) number=0; return number; }
COLOR4I GetColor4i(int r,int g,int b,int a){ COLOR4I cr={b,g,r,a}; return cr; }
EXC WIN32GDI_API void CALL SetColor(int r,int g,int b){ r=TestNumber(r); g=TestNumber(g); b=TestNumber(b); _g_ftcolor=GetColor4i(r,g,b,0); }
EXC WIN32GDI_API void CALL SetBackColor(int r,int g,int b){ r=TestNumber(r); g=TestNumber(g); b=TestNumber(b); _g_bkcolor=GetColor4i(r,g,b,0); }
EXC WIN32GDI_API void CALL Flush(){ HBITMAP _cgl_bitmap=CreateBitmap(_g_size.width,_g_size.height,1,32,_g_bitmap); HBRUSH hb=CreatePatternBrush(_cgl_bitmap); SelectObject(_g_hDC,hb);
Rectangle(_g_hDC,10,10,_g_size.width-25,_g_size.height-50); DeleteObject(hb);
DeleteObject(_cgl_bitmap); }
COLOR4U GetColor4u(COLOR4I ci){ COLOR4U ti={ci.b,ci.g,ci.r,ci.a}; return ti; }
EXC WIN32GDI_API void CALL Clear(){ int len,i; COLOR4U tm=GetColor4u(_g_bkcolor); len=_g_size.width*_g_size.height; for(i=0;i EXC WIN32GDI_API void CALL SetPixel2i(int x,int y){ COLOR4U tm; tm=GetColor4u(_g_ftcolor); if(x>=0&&x<_g_size.width-1&&y>=0&&y<_g_size.height-1){ int len=y*_g_size.width+x; _g_bitmap[len]=tm; } } EXC WIN32GDI_API void CALL Line2Di (int x1,int y1,int x2,int y2){ int i,len; float dx,dy,x,y; x=(float)x1; y=(float)y1; if(abs(x2-x1)>=abs(y2-y1)) len=abs(x2-x1); else len=abs(y2-y1); SetPixel2i((int)x,(int)y); dx=(float)(x2-x1)/len; dy=(float)(y2-y1)/len; for(i=1;i<=len;i++){ x+=dx; y+=dy; SetPixel2i((int)x,(int)y); } } 5. 在Graph.def文件中编写Lib（*.dll）入口函数名字的源文件 LIBRARY Graph EXPORTS SetGraphicsDC InitGraph SetColor SetBackColor Flush Clear SetPixel2i Line2Di 6. 编译动态链接库文件 图5、成功编译Graph.dll
C语言动态链接库编程
