摘要：
//正常显示图片, 没有变换var g:TGPGraphics; img:TGPImage;begin g:=TGPGraphics.Create(Canvas.Handle); g.Clear(aclWhite); img:=TGPImage.Create('d:\mm.png');{测试文件要存在} g.DrawImage(img,10,10,img.GetWidth,img.Ge... 阅读全文
posted @ 2010-12-08 21:58
巅枫
阅读(926)
评论(0)
推荐(0)
摘要：
WMF:Windows MetaFile (windows 图元文件) “Windows 图元文件”是 16 位图元文件格式，可以同时包含矢量信息和位图信息。它针对 Windows 操作系统进行了优化。EMF:Enhancement MetaFile (增强型图元文件) “增强型图元文件”是 32 位格式，可以同时包含矢量信息和位图信息。此格式是对“Windows 图元文件格式”的改进，包含了一些扩展功能，例如，下面的功能：内置的缩放比例信息 · 与文件一起保存的内置说明 调色板和设备独立性方面的改进EMF 格式是可扩展的格式，这意味着程序员可以修改原始规范以添加功能或满足特定的需要 阅读全文
posted @ 2010-12-08 21:51
巅枫
阅读(1125)
评论(0)
推荐(0)
摘要：
//创建并填充区域var g:TGPGraphics; sb:TGPSolidBrush; region:TGPRegion;{定义区域}begin g:=TGPGraphics.Create(Canvas.Handle); g.Clear(aclWhite); sb:=TGPSolidBrush.Create(aclGold); region:=TGPRegion.Create(M... 阅读全文
posted @ 2010-12-08 21:38
巅枫
阅读(1647)
评论(0)
推荐(0)
摘要：
PixelFormat: (指定图像中每个像素的颜色数据的格式)Delphi微软说明PixelAlphaAlpha像素数据包含没有进行过自左乘的 alpha 值。PixelCanonicalCanonical默认像素格式，每像素 32 位。此格式指定 24 位颜色深度和一个 8 位 alpha 通道。PixelDontCareDontCare没有指定像素格式。PixelExtendedExtended保留。PixelFormat16bppArgb1555Format16bppArgb1555像素格式为每像素 16 位。该颜色信息指定 32,768 种色调，其中 5 位为红色，5 位为绿色，5 阅读全文
posted @ 2010-12-08 21:24
巅枫
阅读(1739)
评论(0)
推荐(0)
摘要：
//用 Bitmap 显示图像var g:TGPGraphics; bit:TGPBitmap;begin g:=TGPGraphics.Create(Canvas.Handle); g.Clear(aclWhite); bit:=TGPBitmap.Create('d:\mm.jpg'); g.DrawImage(bit,11,11); {没有指定宽高，默认大小可能跟分辨率有关} ... 阅读全文
posted @ 2010-12-08 21:18
巅枫
阅读(1912)
评论(0)
推荐(0)
摘要：
缩放或旋转图像时的算法选项:Delphi微软说明InterpolationModeBicubicBicubic指定双三次插值法。不进行预筛选。将图像收缩为原始大小的 25% 以下时，此模式不适用。InterpolationModeBilinearBilinear指定双线性插值法。不进行预筛选。将图像收缩为原始大小的 50% 以下时，此模式不适用。InterpolationModeDefaultDefault指定默认模式。InterpolationModeHighHigh指定高质量插值法。InterpolationModeHighQualityBicubicHighQualityBicubic指 阅读全文
posted @ 2010-12-08 20:51
巅枫
阅读(1828)
评论(0)
推荐(0)
摘要：
//比例变化var g: TGPGraphics; p: TGPPen; rect: TGPRect;begin g := TGPGraphics.Create(Canvas.Handle); p := TGPPen.Create(MakeColor(255,255,0,0),0); rect := MakeRect(10,10,100,100); g.DrawRectangle(p... 阅读全文
posted @ 2010-12-08 20:10
巅枫
阅读(649)
评论(0)
推荐(0)
摘要：
//获取字体信息var fontFamily: TGPFontFamily; font: TGPFont;begin fontFamily := TGPFontFamily.Create('宋体'); font := TGPFont.Create(fontFamily, 9, FontStyleRegular, UnitPixel); ShowMessage(FloatToStr(fon... 阅读全文
posted @ 2010-12-08 20:02
巅枫
阅读(576)
评论(0)
推荐(0)
摘要：
文本对齐方式:Delphi微软说明StringAlignmentCenterCenter指定文本在布局矩形中居中对齐。StringAlignmentFarFar指定文本远离布局矩形的原点位置对齐。在左到右布局中，远端位置是右。在右到左布局中，远端位置是左。StringAlignmentNearNear指定文本靠近布局对齐。在左到右布局中，近端位置是左。在右到左布局中，近端位置是右。文本格式化标志:Delphi微软说明StringFormatFlagsDirectionRightToLeftDirectionRightToLeft按从右向左的顺序显示文本。StringFormatFlagsDir 阅读全文
posted @ 2010-12-08 19:52
巅枫
阅读(1846)
评论(0)
推荐(0)
摘要：
文本样式类型表:Delphi微软说明FontStyleBoldBold加粗文本。FontStyleItalicItalic倾斜文本。FontStyleRegularRegular普通文本。FontStyleStrikeoutStrikeout中间有直线通过的文本。FontStyleUnderlineUnderline带下划线的文本。坐标单位类型表:Delphi微软说明UnitDisplayDisplay指定显示设备的度量单位。通常，视频显示使用的单位是像素；打印机使用的单位是 1/100 英寸。UnitDocumentDocument将文档单位（1/300 英寸）指定为度量单位。UnitInc 阅读全文
posted @ 2010-12-08 19:34
巅枫
阅读(870)
评论(0)
推荐(0)
摘要：
//颜色透明度var g: TGPGraphics; sb: TGPSolidBrush;begin g := TGPGraphics.Create(Canvas.Handle); sb := TGPSolidBrush.Create(MakeColor(128,255,0,0)); {128表示半透明} g.FillRectangle(sb,10,10,100,100); sb.Fr... 阅读全文
posted @ 2010-12-08 18:59
巅枫
阅读(543)
评论(0)
推荐(0)
摘要：
绘图质量参数: 阅读全文
posted @ 2010-12-08 18:45
巅枫
阅读(655)
评论(0)
推荐(0)
摘要：
路径中的拐点结合样式:Delphi微软说明LineJoinBevelBevel指定成斜角的联接。这将产生一个斜角。LineJoinMiterMiter指定斜联接。这将产生一个锐角或切除角，具体取决于斜联接的长度是否超过斜联接限制。LineJoinMiterClippedMiterClipped指定斜联接。这将产生一个锐角或斜角，具体取决于斜联接的长度是否超过斜联接限制。LineJoinRoundRound指定圆形联接。这将在两条线之间产生平滑的圆弧。 阅读全文
posted @ 2010-12-08 18:37
巅枫
阅读(969)
评论(0)
推荐(0)
摘要：
//闭合曲线var g: TGPGraphics; p: TGPPen; sb: TGPSolidBrush; pts: array[0..4] of TGPPoint;begin g := TGPGraphics.Create(Canvas.Handle); sb := TGPSolidBrush.Create(MakeColor(255,255,255)); p := TGPPe... 阅读全文
posted @ 2010-12-08 18:32
巅枫
阅读(502)
评论(0)
推荐(0)
摘要：
//画曲线var g: TGPGraphics; p: TGPPen; pts: array[0..4] of TGPPoint;begin g := TGPGraphics.Create(Canvas.Handle); p := TGPPen.Create(MakeColor(255,0,0),4); pts[0].X := 11; pts[0].Y := 11; pts[1].... 阅读全文
posted @ 2010-12-08 18:28
巅枫
阅读(637)
评论(0)
推荐(0)
摘要：
//画贝塞尔曲线var g: TGPGraphics; p: TGPPen;begin g := TGPGraphics.Create(Canvas.Handle); p := TGPPen.Create(MakeColor(255,0,0),2); g.DrawBezier(p, 11,11, 88,333, 99,0, 222,111); {参数是画笔与 4 个点的坐标} p.Fr... 阅读全文
posted @ 2010-12-08 17:50
巅枫
阅读(773)
评论(0)
推荐(0)
摘要：
var g:TGPGraphics; p:TGPPen; sb:TGPSolidBrush; pts:array[0..4] of TGPPoint;begin g:=TGPGraphics.Create(Canvas.Handle); g.Clear(aclWhite); p:=TGPPen.Create(aclRed,2); sb:=TGPSolidBrush.Create(a... 阅读全文
posted @ 2010-12-08 17:41
巅枫
阅读(430)
评论(0)
推荐(0)
摘要：
//饼图描边与填充var g: TGPGraphics; p: TGPPen; sb: TGPSolidBrush;begin g := TGPGraphics.Create(Canvas.Handle); sb := TGPSolidBrush.Create(MakeColor(255,255,255)); p := TGPPen.Create(MakeColor(255,0,0),... 阅读全文
posted @ 2010-12-08 17:34
巅枫
阅读(489)
评论(0)
推荐(0)
摘要：
//画弧线var g: TGPGraphics; p: TGPPen;begin g := TGPGraphics.Create(Canvas.Handle); p := TGPPen.Create(MakeColor(255,0,0),2); g.DrawArc(p,11,32,300,200,0,90); {参数 2-5 是一个椭圆} p.SetColor(MakeColor(0,... 阅读全文
posted @ 2010-12-08 17:22
巅枫
阅读(456)
评论(0)
推荐(0)
摘要：
//填充与描边var g: TGPGraphics; p: TGPPen; sb: TGPSolidBrush;begin g := TGPGraphics.Create(Canvas.Handle); sb := TGPSolidBrush.Create(MakeColor(255,255,255)); p := TGPPen.Create(MakeColor(255,0,0),6)... 阅读全文
posted @ 2010-12-08 17:19
巅枫
阅读(720)
评论(0)
推荐(0)
摘要：
//路径渐变画刷var g: TGPGraphics; path: TGPGraphicsPath; pb: TGPPathGradientBrush; {声明渐变画刷} num: Integer;const colors: array[0..0] of TGPColor = (aclAqua);begin g := TGPGraphics.Create(Canvas.Handle);... 阅读全文
posted @ 2010-12-08 17:11
巅枫
阅读(1052)
评论(0)
推荐(0)
摘要：
线性渐变的方向参数:Delphi微软说明LinearGradientModeBackwardDiagonalBackwardDiagonal指定从右上到左下的渐变。LinearGradientModeForwardDiagonalForwardDiagonal指定从左上到右下的渐变。LinearGradientModeHorizontalHorizontal指定从左到右的渐变。LinearGradientModeVerticalVertical指定从上到下的渐变。 阅读全文
posted @ 2010-12-08 16:24
巅枫
阅读(855)
评论(1)
推荐(0)
摘要：
WrapMode 选项:Delphi微软说明WrapModeClampClamp纹理或渐变没有平铺。WrapModeTileTile平铺渐变或纹理。WrapModeTileFlipXTileFlipX水平反转纹理或渐变，然后平铺该纹理或渐变。WrapModeTileFlipXYTileFlipXY水平和垂直反转纹理或渐变，然后平铺该纹理或渐变。WrapModeTileFlipYTileFlipY垂直反转纹理或渐变，然后平铺该纹理或渐变。 阅读全文
posted @ 2010-12-08 16:12
巅枫
阅读(777)
评论(0)
推荐(0)
摘要：
画刷阴影样式表:Delphi微软说明HatchStyleBackwardDiagonalBackwardDiagonal从右上到左下的对角线的线条图案。HatchStyleCrossCross指定交叉的水平线和垂直线。HatchStyleDarkDownwardDiagonalDarkDownwardDiagonal指定从顶点到底点向右倾斜的对角线，其两边夹角比ForwardDiagonal小50%，宽度是其两倍。此阴影图案不是锯齿消除的。HatchStyleDarkHorizontalDarkHorizontal指定水平线的两边夹角比Horizontal小50%并且宽度是Horizontal 阅读全文
posted @ 2010-12-08 16:00
巅枫
阅读(959)
评论(0)
推荐(0)
摘要：
//实心画刷var g: TGPGraphics; sb: TGPSolidBrush;begin g := TGPGraphics.Create(Canvas.Handle); sb := TGPSolidBrush.Create(aclGreen); {参数是颜色} g.FillEllipse(sb, 11, 11, 222, 111); sb.Free; g.Free;end;... 阅读全文
posted @ 2010-12-08 15:57
巅枫
阅读(620)
评论(0)
推荐(0)
摘要：
//使用画刷建立画笔var g: TGPGraphics; img: TGPImage; tb: TGPTextureBrush; p: TGPPen;begin g := TGPGraphics.Create(Canvas.Handle); img := TGPImage.Create('d:\mm.jpg'); tb := TGPTextureBrush.Create(img);... 阅读全文
posted @ 2010-12-08 15:50
巅枫
阅读(378)
评论(0)
推荐(0)
摘要：
//复合画笔var g: TGPGraphics; p: TGPPen; arr: array[0..9] of Single; {10 个元素可以分成 5 条线, 每条线需要起点和终点}begin g := TGPGraphics.Create(Canvas.Handle); p := TGPPen.Create(MakeColor(255,255,0,0),100); {笔宽定为 1... 阅读全文
posted @ 2010-12-08 15:26
巅枫
阅读(450)
评论(0)
推荐(0)
摘要：
画笔对齐方式:Delphi微软说明PenAlignmentCenterCenter指定 Pen 对象以理论的线条为中心。PenAlignmentInsetInset指定 Pen 被定位于理论的线条内。无定义Left指定将 Pen 定位于理论的线条的左侧。无定义Outset指定将 Pen 定位于理论的线条外。无定义Right指定将 Pen 定位于理论的线条的右侧。 阅读全文
posted @ 2010-12-08 15:09
巅枫
阅读(378)
评论(0)
推荐(0)
摘要：
虚线样式表:Delphi微软说明DashStyleCustomCustom指定用户定义的自定义划线段样式。DashStyleDashDash指定由划线段组成的直线。DashStyleDashDotDashDot指定由重复的划线点图案构成的直线。DashStyleDashDotDotDashDotDot指定由重复的划线点点图案构成的直线。DashStyleDotDot指定由点构成的直线。DashStyleSolidSolid指定实线。 阅读全文
posted @ 2010-12-08 15:05
巅枫
阅读(997)
评论(0)
推荐(0)
摘要：
线帽样式表:Delphi微软说明LineCapAnchorMaskAnchorMask指定用于检查线帽是否为锚头帽的掩码。LineCapArrowAnchorArrowAnchor指定箭头状锚头帽。LineCapCustomCustom指定自定义线帽。LineCapDiamondAnchorDiamondAnchor指定菱形锚头帽。LineCapFlatFlat指定平线帽。LineCapNoAnchorNoAnchor指定没有锚。LineCapRoundRound指定圆线帽。LineCapRoundAnchorRoundAnchor指定圆锚头帽。LineCapSquareSquare指定方线帽 阅读全文
posted @ 2010-12-08 14:57
巅枫
阅读(511)
评论(0)
推荐(0)
摘要：
//画笔var g: TGPGraphics; p: TGPPen;begin g := TGPGraphics.Create(Canvas.Handle); g.Clear(aclWhite); p:=TGPPen.Create(aclRed,5); {参数1颜色; 参数2是笔宽, 笔宽是可选, 默认 1} g.DrawLine(p,10,50,200,50); p.Free; ... 阅读全文
posted @ 2010-12-08 14:52
巅枫
阅读(647)
评论(0)
推荐(0)
浙公网安备 33010602011771号