随笔 - 2146  文章 - 97 评论 - 11765 trackbacks - 253

function MakePoint(X, Y: Integer): TGPPoint; overload;
function MakePoint(X, Y: Single): TGPPointF; overload;

function MakeSize(Width, Height: Integer): TGPSize; overload;
function MakeSize(Width, Height: Single): TGPSizeF; overload;

function MakeRect(x, y, width, height: Integer): TGPRect; overload;
function MakeRect(x, y, width, height: Single): TGPRectF; overload;
function MakeRect(location: TGPPoint; size: TGPSize): TGPRect; overload;
function MakeRect(location: TGPPointF; size: TGPSizeF): TGPRectF; overload;
function MakeRect(const Rect: TRect): TGPRect; overload;

function MakeColor(r, g, b: Byte): ARGB; overload;
function MakeColor(a, r, g, b: Byte): ARGB; overload;

function MakeCharacterRange(First, Length: Integer): TCharacterRange;


//获取透明度 function GetAlpha(color: ARGB): BYTE; //获取红色成分 function GetRed(color: ARGB): BYTE; //获取绿色成分 function GetGreen(color: ARGB): BYTE; //获蓝色成分 function GetBlue(color: ARGB): BYTE; //Delphi 颜色转换到 GDI+ 颜色 function ColorRefToARGB(rgb: COLORREF): ARGB; //GDI+ 颜色转换到 Delphi 颜色 function ARGBToColorRef(Color: ARGB): COLORREF;
posted on 2008-06-10 13:05 万一 阅读(...) 评论(...) 编辑 收藏