动态链接函数库（Dynamic Link Library 简称DLL）是组成Windows系统的重要元素之一。Windows将构成其系统的大部分程序代码、数据以及经常用到的资源，以动态链接函数库（二进制文件）的形式存贮在磁盘里。本文主要介绍如何在应用程序中预留待扩展功能接口，以及利用DLL编写这类扩展功能代码的方法。
应用实例
在开发应用程序的时候考虑到以后可能要添加某些新的功能，为避免修改源程序所带来的麻烦，我们可以在开发应用程序的过程中先预留一个扩展功能接口，以后需要扩展功能时，只要把扩展功能部分的代码单独编译成DLL即可。下面是一个示例程序，该示例程序分为应用程序和扩展功能两部分，当应用程序收到WM_CREATE消息时，检查是否有扩展功能，若有则装入；否则返回。该程序在Windows 95下，用Borland c++ 4.5调试通过。
/*------PRAC.C 应用程序部分------*/
#include <windows.h>
#include "prac.h"
int PASCAL WinMain(HANDLE, HANDLE, LPSTR, int);
long FAR PASCAL MainWndProc(HWND, WORD, WORD, LONG);
void MsgFilter(HWND , WPARAM );
FARPROC LpExtProc ;
/*------- WinMain() -------*/
int PASCAL WinMain (HANDLE hInstance, HANDLE hPrevInstance,
LPSTR lpszCmdLine, int nCmdShow)
{
MSG msg;
HWND hWnd;
WNDCLASS wndclass;
if ( ! hPrevInstance )
{
wndclass.style = CS_HREDRAW | CS_VREDRAW;
wndclass.lpfnWndProc = MainWndProc;
wndclass.cbClsExtra = 0;
wndclass.cbWndExtra = 0;
wndclass.hInstance = hInstance;
wndclass.hIcon = LoadIcon (NULL, IDI_APPLICATION);
wndclass.hCursor = LoadCursor (NULL, IDC_ARROW);
wndclass.hbrBackground = GetStockObject (WHITE_BRUSH);
wndclass.lpszMenuName = "OurOwnMenu"; //装入应用程序菜单
wndclass.lpszClassName = "Application";
if ( ! RegisterClass (&wndclass) )
return FALSE;
}
hWnd = CreateWindow ( "Extend Function" ,
"应用程序示例",
WS_OVERLAPPEDWINDOW,
CW_USEDEFAULT,
CW_USEDEFAULT,
CW_USEDEFAULT,
CW_USEDEFAULT,
NULL,
NULL,
hInstance,
NULL);
If (!hWnd )
return FALSE;
ShowWindow (hWnd, nCmdShow);
UpdateWindow (hWnd);
while ( GetMessage (&msg, NULL, 0, 0) )
{
TranslateMessage (&msg);
DispatchMessage (&msg);
}
return msg.wParam;
}
/*---------- 主窗口函数 WndProc()-------------*/
long FAR PASCAL MainWndProc(HWND hWnd, WORD message,
WORD wParam, LONG lParam)
{
static HANDLE hLibrary;
char szBuf[80];
switch(message)
{
case WM_CREATE:
/*读应用程序的初始化文件prac.ini，检查是否有扩展功能的动态链接库，若没有则返回；若有则装入该动态链接函接数库，并取得接口函数的地址，对接口函数进行初始化*/
GetPrivateProfileString("MyApp" , "AddMyapp" , "" ,
szBuf,sizeof(szBuf) , "prac.ini");
if (szBuf[0] != ’\0’)
if ((hLibrary = LoadLibrary(szBuf)) >= 32)
{
LpExtProc=(FARPROC)GetProcAddress(hLibrary,
MAKEINTRESOURCE(2));
LpExtProc(hWnd , EXTPROC_LOAD);
}
else
MessageBox(hWnd,"Load library failed!","Error",MB_OK);
break;
case WM_COMMAND:
/*函数MsgFilter( )用来过滤菜单消息*/
MsgFilter(hWnd , wParam);
switch (wParam)
{
case IDM_COMMAND1: //处理应用程序
case IDM_COMMAND2: //定义的菜单功
case IDM_COMMAND3: //能，此处省略。
}
return 0;
case WM_DESTROY:
if(hLibrary != NULL)
FreeLibrary(hLibrary);
PostQuitMessage(0);
break;
}
return DefWindowProc(hWnd, message, wParam, lParam);
}
/*下面过滤函数，把菜单消息的来源分成两类，即应用程序本身的菜单消息和来自功能扩展部分的菜单消息。应用程序把值在MIN_FMT至MAX_FMT之间的菜单消息留给待扩展程序使用。如果有来自扩展程序的消息，就通过接口函数LpExtProc()把该消息传送给扩展程序，由扩展程序负责处理该消息*/
void MsgFilter(HWND hWnd , WPARAM wParam)
{
if((wParam >= MIN_FMT)&&(wParam <= MAX_FMT))
LpExtProc(hWnd , wParam);
return;
}
/*---------------- End of PRAC.C-----------------*/
/*----------- PRAC.H ----------*/
#define MIN_FMT 100
#define MAX_FMT199
#define EXTPROC_LOAD 200
#define IDM_COMMAND1 201
#define IDM_COMMAND2 202
#define IDM_COMMAND3 203
/*---End of PRAC.H ---*/
; 应用程序的模块定义文件PRAC.DEF
NAME PRAC
DESCRIPTION’demonstrate a different system menu’
EXETYPEWINDOWS
STUB’WINSTUB.EXE’
CODEPRELOAD MOVEABLE DISCARDABLE
DATA PRELOAD MOVEABLE MULTIPLE
HEAPSIZE 1024
STACKSIZE 8192
EXPORTSMainWndProc
; End of PRAC.DEF
/*---资源定义文件PRAC.RC---*/
#include "prac.h"
OurOwnMenu MENU
BEGIN
MENUITEM "Command&1", IDM_COMMAND1
MENUITEM "Command&2", IDM_COMMAND2
MENUITEM "Command&3", IDM_COMMAND3
END
/*---End of PRAC.RC---*/
若要扩展上面应用程序的功能，在不改动上述程序的情况下，只需将功能扩展部分的代码编写成动态链接函数库，编译成.DLL文件，并在PRAC.INI文件中加入下面语句，即可达到扩展功能的目的。在PRAC.INI中加入：
［AddApp］
AddMyapp=c:\win95\system\extproc.dll
扩展功能的动态链接函数库代码如下：
/*-----EXTPROC_DLL.c-----*/
#include <windows.h>
#include <commdlg.h>
#include "extproc_dll.h"
HMENU hMenu , hExtMenu;
HWND hWndExt = NULL;
int FAR PASCAL LibMain(HANDLE hModule , WORD wDataSeg,
WORD HeapSize , LPSTR lpszCmdLine)
{
if(HeapSize != 0)
UnlockData(0);
return 1;
}
int FAR PASCAL WEP(int SystemExit)
{
switch (SystemExit)
{
case WEP_SYSTEM_EXIT:
return 1;
case WEP_FREE_DLL:
return 1;
default:
return 1;
}
}
/*函数FMExtensionProc()即为扩展功能的处理函数，当过滤函数检索到有来自扩展功能的菜单消息时，就调用该函数进行处理。在此仅以设置打印机、选择字体来说明扩展功能的处理过程，读者可根据自己的需要修改*/
void FAR PASCAL FMExtensionProc(HWND hWndFMExt , WORD wMessage)
{
PRINTDLGpd;
CHOOSEFONT fnt;
LOGFONT lf;
CHOOSECOLOR chclr;
DWORD dwColor;
DWORD dwCustClrs[16];
int i;
switch(wMessage)
{
/*处理FMEVENT_LOAD消息，加载用户扩展功能菜单FMExtMenu*/
case EXTPROC_LOAD:
hExtMenu = LoadMenu(FMExtInst,"FMExtMenu");
hMenu = GetMenu(hWndFMExt);
AppendMenu(hMenu,MF_POPUP,hExtMenu ,"扩展功能(&E)");
SetMenu(hWndFMExt,hMenu);
break;
/*下面是用户可自定义的扩展功能代码*/
case IDM_PRINTERSETUP: //设置打印机
pd.lStructSize = sizeof(PRINTDLG);
pd.hwndOwner = hWndFMExt;
pd.hDevMode= NULL;
pd.hDevNames = NULL;
pd.Flags = PD_RETURNDC|PD_SELECTION|PD_PRINTSETUP;
pd.nCopies = 1;
PrintDlg((LPPRINTDLG)&pd);
break;
case IDM_SELECTFONT: //选择字体
fnt.lStructSize = sizeof(CHOOSEFONT);
fnt.hwndOwner = hWndFMExt;
fnt.hDC = NULL;
fnt.lpLogFont = &lf;
fnt.Flags = CF_SCREENFONTS|CF_EFFECTS;
fnt.rgbColors = RGB(0,255,255);
fnt.lCustData = 0L;
fnt.nFontType = SCREEN_FONTTYPE;
fnt.nSizeMin= 0;
fnt.nSizeMax= 0;
ChooseFont(&fnt);
break;
}
return;
}
/*------------End of EXTPROC_DLL.C------------*/
/*----- EXTPROC_DLL.H -----*/
#define IDM_PRINTERSETUP 101
#define IDM_SELECTFONT102
#define EXTPROC_LOAD 200
void FAR PASCAL _export FMExtensionProc(HWND,WORD);
/*-----End of EXTPROC_DLL.H -----*/
;资源文件EXTPROC_dll.RC
#include "windows.h"
#include "extproc_dll.h"
FMExtMenu MENU DISCARDABLE
BEGIN
MENUITEM "Printer&Setup" ,IDM_PRINTERSETUP
MENUITEM "Select&Font",IDM_SELECTFONT
END
;End of EXTPROC_DLL.RC
;模块定义文件EXTPROC_DLL.DEF
LIBRARY EXTPROC
DESCRIPTION ’File Manager Extension DLL’
EXETYPE WINDOWS
CODE PRELOAD MOVEABLE DISCARDABLE
DATA PRELOAD SINGLE SHARED
HEAPSIZE 1024
EXPORTS
WEP @1 RESIDENTNAME
FMExtensionProc @2
;End of EXTPROC_DLL.DEF
