D
dearchen
Unregistered / Unconfirmed
GUEST, unregistred user!
我的一段程序如下:(bcb的)
bool __fastcall TForm7::BeSelected(TPoint sPoint,TPoint nStartP,TPoint nEndP)
{
bool nBool = false;
TPoint tPoint[4];TPoint nPoint[4];
tPoint[0]= GetPoint(nStartP,nEndP,90,3,&tPoint[1]);//这个是自定义的函数
tPoint[2]= GetPoint(nEndP,nStartP,90,3,&tPoint[3]);
nPoint[0]= GetCorP(nStartP,nEndP,tPoint[0],tPoint[1],&nPoint[1]);//这个是自定义的函数
nPoint[2]= GetCorP(nEndP,nStartP,tPoint[2],tPoint[3],&nPoint[3]);
HRGN nRgn =CreatePolygonRgn(nPoint,4,WINDING);
nBool = PtInRegion(nRgn,sPoint.x,sPoint.y);
if (!(DeleteObject((HGDIOBJ*)&nRgn))) ShowMessage("释放内存不成功!");
return nBool;
}
结果:程序提示我的“内存”总是不能马上释放,而这个又是我必须的!!!!
为什么呢?????????
bool __fastcall TForm7::BeSelected(TPoint sPoint,TPoint nStartP,TPoint nEndP)
{
bool nBool = false;
TPoint tPoint[4];TPoint nPoint[4];
tPoint[0]= GetPoint(nStartP,nEndP,90,3,&tPoint[1]);//这个是自定义的函数
tPoint[2]= GetPoint(nEndP,nStartP,90,3,&tPoint[3]);
nPoint[0]= GetCorP(nStartP,nEndP,tPoint[0],tPoint[1],&nPoint[1]);//这个是自定义的函数
nPoint[2]= GetCorP(nEndP,nStartP,tPoint[2],tPoint[3],&nPoint[3]);
HRGN nRgn =CreatePolygonRgn(nPoint,4,WINDING);
nBool = PtInRegion(nRgn,sPoint.x,sPoint.y);
if (!(DeleteObject((HGDIOBJ*)&nRgn))) ShowMessage("释放内存不成功!");
return nBool;
}
结果:程序提示我的“内存”总是不能马上释放,而这个又是我必须的!!!!
为什么呢?????????