readme.txt

来自「WAISS TW3DCanvas Component V1.5 Freeware」· 文本 代码 · 共 52 行

TXT
52
字号
WAISS TW3DCanvas Component V1.5

Freeware

This is a component that acts as a 3D canvas. It supports most of the
methods of the delphi TCanvas Component.  All drawing methods sent to
the component will be rendered in a 3D manor (extruded or embossed)
including Text,Circles etc...


To install copy the .pas file to a directory and install it into a package.

property///////////////////////////////////////////////////////

drawstyle // how to draw the image ((dsNormal-Not implemeted use the canvas property
	   // dsInlaid,dsRaised,dsNormal
HighLightColor // the color to use to draw tthe highlight
ShadowColor    // the color to draw the shadow;

methods/////////////////////////////////////////////////////////

  These are the standard TCanvas methods that are implemented
  in TW3DCanvas 

  procedure TextOut(X, Y: Integer;Text: string);
  procedure Ellipse(X1, Y1, X2, Y2: Integer);
  procedure Chord(X1, Y1, X2, Y2, X3, Y3, X4, Y4: Integer);
  procedure Rectangle(X1, Y1, X2, Y2: Integer);
  procedure Pie(X1, Y1, X2, Y2, X3, Y3, X4, Y4: Longint);
  procedure RoundRect(X1, Y1, X2, Y2, X3, Y3: Integer);
  procedure Arc(X1, Y1, X2, Y2, X3, Y3, X4, Y4: Integer);
  procedure FrameRect(Rect: TRect);
  procedure Polygon(Points: array of TPoint);
  procedure Polyline(Points: array of TPoint);
  Procedure LineTo(X, Y: Integer);
  
Note: You can access all of the underlying Canvas procedures by
using the canvas property (In order to set the Pen.Width you have to
do this). 

To draw normaly on this component just use the underlying Canvas property.


This component is freeware. You are Free to do with it what you wish.

If you make any major enhancments please send me the code. Thank you.

My URL is http://www.waiss.com
			or
	  http://members.xoom.com/WAISS

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?