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 2010-12-31 10:59  巅枫  阅读(596)  评论(0编辑  收藏  举报