%@LANGUAGE="JScript" CODEPAGE="936"% script language=VBScript runat="Server" Function bytes2BSTR(vIn) strReturn = "" For i = 1 To LenB(vIn) ThisCharCode = ...
void S_RevColor(Graphics::TBitmap *Bmp)//图片反色 { BYTE *ptr; for (int y = 0; y Bmp-Height; y++) { ptr =(BYTE *) Bmp-ScanLine[y]; for (int x = 0; x Bmp-Width*3; x+=3) { ptr[x]=BYTE(255-ptr[...