WINNT下，可以用以下方式創建畫筆<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />
LOGBRUSH brush;
brush.lbColor=DrawColor;
brush.lbStyle=BS_SOLID;
mPen.CreatePen(PS_GEOMETRIC|PS_USERSTYLE|PS_ENDCAP_FLAT,(int)LineWide,&brush,i,PenStyle);
Win98中，給DC設置合適的筆寬，選擇實線，下面函數可以根據PenStyle數組給定長度值畫直線。如果畫曲線或者折線，需要把曲線離散成直線段，根據上次畫線返回值確定本次畫線的起始值，就可以了
#include "math.h"
DWORD PenStyle[16] = {0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0};
typedef struct xyz {
double x;
double y;
double z;
} XYZ,*PXYZ,**PPXYZ;
//按照PenStyle[]畫一條從p1點到p2點的直線
//例如PenStyle[0]=5，PenStyle[1]=2表示按照長度爲5的實線、長度爲2的間隔形成的線型畫線
//_____ _____ _____ _
//並且指定從線型的何處畫，例如iStart=6從Penstyle[1]處的第二個空格開始畫
//iStart取值範圍爲0到一個線型的總長度-1
//返回值：線型總長度與剩餘最後一段線長度之差，表示下一次畫線應該指定的從何處開始畫
int DrawLineA(CDC* pDC,POINT p1,POINT p2,int iStart)
{
int i=0;
int iEnd=0;//返回值，表示最後一段不完全的線段的長度
//計算直線長度
double dDistance=sqrt((p2.x-p1.x)*(p2.x-p1.x)+(p2.y-p1.y)*(p2.y-p1.y));
int iLineType=0;//線型的長度
if(dDistance<2)
{
for(i=0;i<16;i++)
{
if(PenStyle[i]==0)break;
iLineType+=PenStyle[i];
}
iEnd=(int(iStart-dDistance))%iLineType;
if(iEnd<0)iEnd+=iLineType;
return iEnd;
}
double ddltx[16]={0,0,0,0,//每一段線型的x距離
0,0,0,0,
0,0,0,0,
0,0,0,0};
double ddlty[16]={0,0,0,0,//每一段線型的y距離
0,0,0,0,
0,0,0,0,
0,0,0,0};
double dXScale=(p2.x-p1.x)/dDistance;//x方向長度和總長度比例
double dYScale=(p2.y-p1.y)/dDistance;//y方向長度和總長度比例
//計算每一段線型的x、y距離及線型的長度
for(i=0;i<16;i++)
{
if(PenStyle[i]==0)break;
ddltx[i]=PenStyle[i]*dXScale;
ddlty[i]=PenStyle[i]*dYScale;
iLineType+=PenStyle[i];
}
iEnd=(int(dDistance+iStart))%iLineType;
if(iEnd<0)iEnd+=iLineType;
XYZ pp={0,0,0};//第一段之前的完整線型開始點
pDC->MoveTo(p1);
int iLength=-iStart;//已經畫的線段的長度
pp.x=iLength*dXScale+p1.x;
pp.y=iLength*dYScale+p1.y;
for(;;)
{
for(i=0;i<16;i++)
{
if(PenStyle[i]==0)break;
pp.x+=ddltx[i];
pp.y+=ddlty[i];
iLength+=PenStyle[i];
if(i%2==0)
{
if(iLength>0)
{
if(iLength<dDistance)
{
pDC->LineTo(pp.x,pp.y);
}
else
{
pDC->LineTo(p2);
return iEnd;
}
}
}else
{
if(iLength>0)
{
if(iLength<dDistance)
{
pDC->MoveTo(pp.x,pp.y);
}
else
{
pDC->MoveTo(p2);
return iEnd;
}
}
}
}
}
return iEnd;
}