摘要：
//声明: RoundRect( DC: HDC; {设备环境句柄} X1, Y1, X2, Y2, X3, Y3: Integer {点1、点2是构成矩形的坐标; X3是圆角宽度、Y3是圆角高度} ): BOOL; //举例: procedure TForm1.FormPaint(Sender: TObject); const x1... 阅读全文
posted @ 2008-02-09 16:59
万一
阅读(4896)
评论(0)
推荐(0)
摘要：
//声明: Ellipse( DC: HDC; {设备环境句柄} X1, Y1, X2, Y2: Integer {两个点的坐标} ): BOOL; //举例: procedure TForm1.FormPaint(Sender: TObject); const x1 = 20; y1 = 20; x2 = 200; y2 = 100; ... 阅读全文
posted @ 2008-02-09 16:51
万一
阅读(2746)
评论(0)
推荐(0)
摘要：
//声明: Rectangle( DC: HDC; {设备环境句柄} X1, Y1, X2, Y2: Integer {两个点的坐标} ): BOOL; //举例: procedure TForm1.FormPaint(Sender: TObject); const x1 = 20; y1 = 20; x2 = 200; y2 = 100... 阅读全文
posted @ 2008-02-09 16:45
万一
阅读(3762)
评论(0)
推荐(0)
摘要：
//声明: Pie( DC: HDC; {设备环境句柄} X1, Y1, X2, Y2, X3, Y3, X4, Y4: Integer {四个坐标点} ): BOOL; //举例: procedure TForm1.FormPaint(Sender: TObject); const x1 = 10; y1 = 1... 阅读全文
posted @ 2008-02-09 16:35
万一
阅读(3012)
评论(0)
推荐(0)
摘要：
//声明: MoveToEx( DC: HDC; {设备环境句柄} p2, p3: Integer; {坐标} p4: PPoint {用于保存 p2、p3 值的 TPoint 结构的指针} ): BOOL; LineTo( DC: HDC; {设备环境句柄} X, Y: Integer {直线终点坐标} ): BOOL; //举例... 阅读全文
posted @ 2008-02-09 15:58
万一
阅读(6471)
评论(4)
推荐(0)
摘要：
//声明: CreateFontIndirect( const p1: TLogFont {字体结构} ): HFONT; {返回新字体指针} //TLogFont 是 tagLOGFONTA 结构的重定义: tagLOGFONTA = packed record lfHeight: Longint; {字体高度} lfWidth: Longint;... 阅读全文
posted @ 2008-02-09 15:08
万一
阅读(12069)
评论(5)
推荐(3)
摘要：
//声明: GetCharABCWidths( DC: HDC; {设备环境句柄} FirstChar, LastChar: UINT; {范围内的第一个和最后一个字符值} const ABCStructs {接受每个字符信息的 TABC 结构数组} ): BOOL; //TABC 类型是 _ABC 结构的重定义: _ABC ... 阅读全文
posted @ 2008-02-09 12:42
万一
阅读(4205)
评论(0)
推荐(0)
摘要：
//声明: GetCharWidth( DC: HDC; {设备环境句柄} FirstChar, LastChar: UINT; {范围内的第一个和最后一个字符值} const Widths {接受每个字符宽度值的整型数组} ): BOOL; GetCharWidth32( DC: HDC; ... 阅读全文
posted @ 2008-02-09 11:55
万一
阅读(6509)
评论(2)
推荐(1)
摘要：
//声明: GetTextFace( DC: HDC; {设备环境句柄} Count: Integer; {缓冲区大小} Buffer: PChar {缓冲区} ): Integer; {返回字符串长度} //举例: var dc: HDC; b: array[0..254] of Char; num: Integer; begin ... 阅读全文
posted @ 2008-02-09 11:20
万一
阅读(3291)
评论(0)
推荐(0)
浙公网安备 33010602011771号