readme.htm

一个不错的画图控件, 大家可以

                  </TR>
                  <TR>
                    <TD WIDTH="15%" VALIGN="TOP"><STRONG><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">zoCenter</FONT></STRONG></TD>
                    <TD WIDTH="20"><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">&nbsp;</FONT></TD>
                    <TD><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">Tries to keep the center of the current view, still centered. </FONT></TD>
                  </TR>
                  <TR>
                    <TD WIDTH="15%" VALIGN="TOP"><STRONG><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">zoCursor</FONT></STRONG></TD>
                    <TD WIDTH="20"><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">&nbsp;</FONT></TD>
                    <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">Tries to keep the point under cursor, still under cursor.</FONT></TD>
                  </TR>
                  <TR>
                    <TD VALIGN="TOP"><STRONG><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">zoCursorCenter</FONT></STRONG></TD>
                    <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">&nbsp;</FONT></TD>
                    <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">Tries to move the point under cursor to the center of view. </FONT></TD>
                  </TR>
                </TABLE>
                <P>&nbsp;</P></TD>
            </TR>
            <TR>
              <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif"><STRONG><A NAME="ChangeZoomBy" ID="ChangeZoomBy"></A>function ChangeZoomBy(Delta: Integer; Origin: TGraphZoomOrigin): Boolean;<BR>
    TGraphZoomOrigin = (zoTopLeft, zoCenter, zoCursor);<BR>
              </STRONG>Changes zoom factor by the value specified by the Delta parameter. The Origin parameter determines how the zoomed area appears on the client area of the control. </FONT>
                <P></P>
                <TABLE WIDTH="90%" BORDER="0" CELLSPACING="5" CELLPADDING="0" ALIGN="CENTER">
                  <TR>
                    <TD WIDTH="15%" VALIGN="TOP"><STRONG><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">zoTopLeft</FONT></STRONG></TD>
                    <TD WIDTH="20"><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">&nbsp;</FONT></TD>
                    <TD><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">Tries to keep top left cornor of the current view visible. </FONT></TD>
                  </TR>
                  <TR>
                    <TD WIDTH="15%" VALIGN="TOP"><STRONG><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">zoCenter</FONT></STRONG></TD>
                    <TD WIDTH="20"><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">&nbsp;</FONT></TD>
                    <TD><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">Tries to keep the center of the current view, still centered. </FONT></TD>
                  </TR>
                  <TR>
                    <TD WIDTH="15%" VALIGN="TOP"><STRONG><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">zoCursor</FONT></STRONG></TD>
                    <TD WIDTH="20"><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">&nbsp;</FONT></TD>
                    <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">Tries to keep the point under cursor, still under cursor.</FONT></TD>
                  </TR>
                  <TR>
                    <TD VALIGN="TOP"><STRONG><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">zoCursorCenter</FONT></STRONG></TD>
                    <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">&nbsp;</FONT></TD>
                    <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">Tries to move the point under cursor to the center of view. </FONT></TD>
                  </TR>
                </TABLE>
              <P>&nbsp;</P></TD>
            </TR>
            <TR>
              <TD><P><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif"><STRONG><A NAME="AlignSelection"></A>function AlignSelection(Horz: THAlignOption; Vert: TVAlignOption): Boolean;<BR>
      THAlignOption = (haNoChange, haLeft, haCenter, haRight, haSpaceEqually);<BR>
      TVAlignOption = (vaNoChange, vaTop, vaCenter, vaBottom, vaSpaceEqually);</STRONG><BR>
      Lines up selected objects in relation to each other. </FONT><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">The function returns True if at least one object resizes, otherwise returns False.</FONT> </P>
                  <P></P>
                  <TABLE WIDTH="90%" BORDER="0" CELLSPACING="5" CELLPADDING="0" ALIGN="CENTER">
                    <TR>
                      <TD WIDTH="15%" VALIGN="TOP"><STRONG><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">haNoChange</FONT></STRONG></TD>
                      <TD WIDTH="20"><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">&nbsp;</FONT></TD>
                      <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">Does not change the alignment of the object. </FONT></TD>
                    </TR>
                    <TR>
                      <TD WIDTH="15%" VALIGN="TOP"><STRONG><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">haLeft</FONT></STRONG></TD>
                      <TD WIDTH="20"><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">&nbsp;</FONT></TD>
                      <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">Lines up the left edges of the selected objects .</FONT></TD>
                    </TR>
                    <TR>
                      <TD WIDTH="15%" VALIGN="TOP"><STRONG><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">haCenter</FONT></STRONG></TD>
                      <TD WIDTH="20"><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">&nbsp;</FONT></TD>
                      <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">Lines up horizontally the centers of the selected objects.</FONT></TD>
                    </TR>
                    <TR>
                      <TD VALIGN="TOP"><STRONG><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">haRight</FONT></STRONG></TD>
                      <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">&nbsp;</FONT></TD>
                      <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">Lines up the right edges of the selected objects. </FONT></TD>
                    </TR>
                    <TR>
                      <TD VALIGN="TOP"><STRONG><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">haSpaceEqually</FONT></STRONG></TD>
                      <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">&nbsp;</FONT></TD>
                      <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">Lines up the selected objects horizontally equidistant from each other.</FONT></TD>
                    </TR>
                  </TABLE>
                  <P></P>
                  <TABLE WIDTH="90%" BORDER="0" CELLSPACING="5" CELLPADDING="0" ALIGN="CENTER">
                    <TR>
                      <TD WIDTH="15%" VALIGN="TOP"><STRONG><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">vaNoChange</FONT></STRONG></TD>
                      <TD WIDTH="20"><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">&nbsp;</FONT></TD>
                      <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">Does not change the alignment of the object. </FONT></TD>
                    </TR>
                    <TR>
                      <TD WIDTH="15%" VALIGN="TOP"><STRONG><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">vaTop</FONT></STRONG></TD>
                      <TD WIDTH="20"><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">&nbsp;</FONT></TD>
                      <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">Lines up the top edges of the selected objects .</FONT></TD>
                    </TR>
                    <TR>
                      <TD WIDTH="15%" VALIGN="TOP"><STRONG><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">vaCenter</FONT></STRONG></TD>
                      <TD WIDTH="20"><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">&nbsp;</FONT></TD>
                      <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">Lines up vertically the centers of the selected objects.</FONT></TD>
                    </TR>
                    <TR>
                      <TD VALIGN="TOP"><STRONG><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">vaBottom</FONT></STRONG></TD>
                      <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">&nbsp;</FONT></TD>
                      <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">Lines up the bottom edges of the selected objects. </FONT></TD>
                    </TR>
                    <TR>
                      <TD VALIGN="TOP"><STRONG><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">vaSpaceEqually</FONT></STRONG></TD>
                      <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">&nbsp;</FONT></TD>
                      <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">Lines up the selected objects vertically equidistant from each other.</FONT></TD>
                    </TR>
                  </TABLE>
                  <P>&nbsp;</P></TD>
            </TR>
            <TR>
              <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif"><STRONG><A NAME="ResizeSelection" ID="ResizeSelection"></A>function ResizeSelection(Horz, Vert: TResizeOption): Boolean;<BR>
    TResizeOption = (roNoChange, roSmallest, roLargest);<BR>
                </STRONG></FONT><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">Resizes selected objects to be exactly the same height or width. The function returns True if at least one object resizes, otherwise returns False.</FONT>
                <P></P>
                <TABLE WIDTH="90%" BORDER="0" CELLSPACING="5" CELLPADDING="0" ALIGN="CENTER">
                  <TR>
                    <TD WIDTH="15%" VALIGN="TOP"><STRONG><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif"><STRONG>roNoChange</STRONG></FONT></STRONG></TD>
                    <TD WIDTH="20"><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">&nbsp;</FONT></TD>
                    <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">Does not change the size of the components.</FONT></TD>
                  </TR>
                  <TR>
                    <TD WIDTH="15%" VALIGN="TOP"><STRONG><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif"><STRONG>roSmallest</STRONG></FONT></STRONG></TD>
                    <TD WIDTH="20"><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">&nbsp;</FONT></TD>
                    <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">Resizes the selected objects to the height or width of the smallest selected object.</FONT></TD>
                  </TR>
                  <TR>
                    <TD WIDTH="15%" VALIGN="TOP"><STRONG><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif"><STRONG>roLargest</STRONG></FONT></STRONG></TD>
                    <TD WIDTH="20"><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">&nbsp;</FONT></TD>
                    <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif">Resizes the selected object to the height or width of the largest selected object.</FONT></TD>
                  </TR>
                </TABLE>
                <P>&nbsp;</P></TD>
            </TR>
            <TR>
              <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif"><STRONG><A NAME="SnapPoint"></A>function SnapPoint(const Pt: TPoint): TPoint;</STRONG><BR>
    Returns the closest grid point to the given point. </FONT></TD>
            </TR>
            <TR>
              <TD><FONT SIZE="2" FACE="Verdana, Arial, Helvetica, sans-serif"><STRONG><A NAME="SnapOffset" ID="SnapOffset"></A>procedure SnapOffset(const Pt: TPoint; var dX, dY: Integer);</STRONG><BR>
                Adjusts dX and dY parameters in the way that offseting the point specified by the Pt parameter by these values, moves the point on the closest grid point. </FONT></TD>
            </TR>
            <TR> 
              <TD><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><B><A NAME="ClientToGraph"></A>function 
                ClientToGraph(X, Y: Integer): TPoint;</B><BR>
                Converts X and Y pair of values from the client coordinates to 
                the graph cordinates.</FONT></TD>
            </TR>
            <TR> 
              <TD><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><B><A NAME="GraphToClient"></A>function 
                GraphToClient(X, Y: Integer): TPoint;</B><BR>
                Converts X and Y pair of values from the graph coordinates to 
                the client cordinates.</FONT></TD>
            </TR>
            <TR>
              <TD><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><B><A NAME="ScreenToGraph" ID="ScreenToGraph"></A>function ScreenToGraph(X, Y: Integer): TPoint;</B><BR>
    Converts X and Y pair of values from the screen coordinates to the graph cordinates.</FONT></TD>
            </TR>
            <TR>