pascal中透明像素的多边形

pascal中透明像素的多边形,pascal,Pascal,对于隐藏对象游戏的碰撞检测,下面的代码使用zengl 在纹理边缘周围生成点(用于设计时): tex_GetData(txtr,myData); 对于h:=0到txtr.Height-1 do 开始 对于w:=0到txtr.Width-1 do 开始 如果(PByte(Ptr(myData)+w*4+h*realWidth*4+3)^>50)和(PByte(Ptr(myData)+w*4+h*realWidth*4+3)^请正确缩进代码。目前很难阅读。

对于隐藏对象游戏的碰撞检测,下面的代码使用zengl 在纹理边缘周围生成点(用于设计时):

tex_GetData(txtr,myData);
对于h:=0到txtr.Height-1 do
开始
对于w:=0到txtr.Width-1 do
开始

如果(PByte(Ptr(myData)+w*4+h*realWidth*4+3)^>50)和(PByte(Ptr(myData)+w*4+h*realWidth*4+3)^请正确缩进代码。目前很难阅读。