谁用过TextRect这个过程,为什么它的最后一个参数TextFlags无法用,一加上这个参数就报告参数个数太多?

Question

TextRect这个函数最后的参数是字符串呀?定义:
procedure TCanvas.TextRect(Rect: TRect; X, Y: Integer; const Text: string);

Answer 1

在d6的help中是这样定义的:
Writes a string inside a clipping rectangle. procedure TextRect(Rect: TRect; X, Y: Integer; const Text: WideString; TextFlags: Integer = 0);DescriptionUse TextRect to write a string within a limited rectangular region. Any portions of the string that fall outside the rectangle passed in the Rect parameter are clipped and don't appear. The upper left corner of the text is placed at the point (X, Y).The TextFlags parameter specifies how the text should be aligned within the rectangle. It is an integer built by adding a horizontal and a vertical alignment flag. The alignment flags are as follows:Flag Type MeaningAlignLeft Horizontal Align text to the left edge of the rectangle.
AlignRight Horizontal Align text to the right edge of the rectangle.
AlignHCenter Horizontal Center text horizontally in the rectangle.
AlignTop Vertical Align text to the top edge of the rectangle.
AlignBottom Vertical Align text to the bottom edge of the rectangle.
AlignVCenter Vertical Center text vertically in the rectangle.You can also use the AlignCenter flag to indicate AlignHCenter + AlignVCenter.我就是想用Textflags参数的功能,请大家指点?