Changeset 521 for GraphicTest/Packages/bgrabitmap/part3d.inc
- Timestamp:
- Apr 17, 2019, 12:58:41 AM (5 years ago)
- Location:
- GraphicTest
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
GraphicTest
- Property svn:ignore
-
old new 8 8 GraphicTest.lps 9 9 GraphicTest.dbg 10 heaptrclog.trc
-
- Property svn:ignore
-
GraphicTest/Packages/bgrabitmap/part3d.inc
r494 r521 19 19 destructor Destroy; override; 20 20 procedure Clear(ARecursive: boolean); 21 function Add(x,y,z: single): IBGRAVertex3D; 22 function Add(pt: TPoint3D): IBGRAVertex3D; 23 function Add(pt: TPoint3D; normal: TPoint3D): IBGRAVertex3D; 24 function Add(pt: TPoint3D_128): IBGRAVertex3D; 25 function Add(pt: TPoint3D_128; normal: TPoint3D_128): IBGRAVertex3D; 26 function Add(const coords: array of single): arrayOfIBGRAVertex3D; 27 function Add(const pts: array of TPoint3D): arrayOfIBGRAVertex3D; 28 function Add(const pts: array of TPoint3D_128): arrayOfIBGRAVertex3D; 29 procedure Add(const pts: array of IBGRAVertex3D); 30 procedure Add(AVertex: IBGRAVertex3D); 31 function AddNormal(x,y,z: single): IBGRANormal3D; 32 function AddNormal(pt: TPoint3D): IBGRANormal3D; 33 function AddNormal(pt: TPoint3D_128): IBGRANormal3D; 34 procedure AddNormal(ANormal: IBGRANormal3D); 21 function Add(x,y,z: single): IBGRAVertex3D; overload; 22 function Add(pt: TPoint3D): IBGRAVertex3D; overload; 23 function Add(pt: TPoint3D; normal: TPoint3D): IBGRAVertex3D; overload; 24 function Add(pt: TPoint3D_128): IBGRAVertex3D; overload; 25 function Add(pt: TPoint3D_128; normal: TPoint3D_128): IBGRAVertex3D; overload; 26 function Add(const coords: array of single): arrayOfIBGRAVertex3D; overload; 27 function Add(const pts: array of TPoint3D): arrayOfIBGRAVertex3D; overload; 28 function Add(const pts: array of TPoint3D_128): arrayOfIBGRAVertex3D; overload; 29 procedure Add(const pts: array of IBGRAVertex3D); overload; 30 procedure Add(AVertex: IBGRAVertex3D); overload; 31 function AddNormal(x,y,z: single): IBGRANormal3D; overload; 32 function AddNormal(pt: TPoint3D): IBGRANormal3D; overload; 33 function AddNormal(pt: TPoint3D_128): IBGRANormal3D; overload; 34 procedure AddNormal(ANormal: IBGRANormal3D); overload; 35 35 procedure RemoveVertex(Index: integer); 36 36 procedure RemoveNormal(Index: integer); … … 50 50 procedure SetNormal(AIndex: Integer; AValue: IBGRANormal3D); 51 51 procedure ResetTransform; 52 procedure Translate(x,y,z: single; Before: boolean = true); 53 procedure Translate(ofs: TPoint3D; Before: boolean = true); 54 procedure Scale(size: single; Before: boolean = true); 55 procedure Scale(x,y,z: single; Before: boolean = true); 56 procedure Scale(size: TPoint3D; Before: boolean = true); 52 procedure Translate(x,y,z: single; Before: boolean = true); overload; 53 procedure Translate(ofs: TPoint3D; Before: boolean = true); overload; 54 procedure Scale(size: single; Before: boolean = true); overload; 55 procedure Scale(x,y,z: single; Before: boolean = true); overload; 56 procedure Scale(size: TPoint3D; Before: boolean = true); overload; 57 57 procedure RotateXDeg(angle: single; Before: boolean = true); 58 58 procedure RotateYDeg(angle: single; Before: boolean = true);
Note:
See TracChangeset
for help on using the changeset viewer.