| Description | Hierarchy | Fields | Methods | Properties |
type TCornerWall = class(TArenaObject)
An arena object representing a corner wall. Below (in Table 1) follows an example of a definition of a corner wall and in Figure 1 the corresponding graphics is shown.
Table 1: Example definition of a corner wall.
|
object MyCornerWall:
TCornerWall Position = 0.000 0.000 0.000 Velocity = 0.000 0.000 0.000 Angle = 0.000 Height = 2.500 Mass = -1.000 RGBColor = 0 0 30 # Texture = LengthPart1 = 2.000 LengthPart2 = 1.000 Thickness = 0.200 Transparent = False HasWallPaperFront = False # WallPaperFront = HasWallPaperBack = False # WallPaperBack = TextureTileLength = 1.000 TextureTileHeight = 1.000 end |

Figure
1: Graphical appearance of the corner wall defined in Table 1.
![]() |
constructor Create(Owner: TArena); |
![]() |
destructor Destroy; override; |
![]() |
procedure AddAsStrings(Strings: TStringList); override; |
![]() |
function Edit(Dlg: TArenaObjectEditor = nil): Boolean; override; |
![]() |
procedure GenerateShapes; override; |
![]() |
constructor Create(Owner: TArena); |
Constructor
![]() |
destructor Destroy; override; |
Destructor
![]() |
procedure AddAsStrings(Strings: TStringList); override; |
Adds all properties as strings to a list of strings. Used internally by TArena.SaveToFile.
![]() |
function Edit(Dlg: TArenaObjectEditor = nil): Boolean; override; |
Displays an edit dialog (for visual editing of the object's properties).
Nil. (Only used internally.)True if the user clicks the OK button, False otherwise.
![]() |
procedure GenerateShapes; override; |
Generates geometric representations of the object. The result of this procedure can be retrieved through the property Shapes.
This procedure is automatically called when needed and should never be called explicitly by a user.
![]() |
property HasWallPaperBack: Boolean; |
![]() |
property HasWallPaperFront: Boolean; |
![]() |
property LengthPart1: real; |
![]() |
property LengthPart2: real; |
![]() |
property TextureTileHeight: real; |
![]() |
property TextureTileLength: real; |
![]() |
property Thickness: real; |
![]() |
property Transparent: Boolean; |
![]() |
property WallPaperBack: string; |
![]() |
property WallPaperFront: string; |
![]() |
property HasWallPaperBack: Boolean; |
Indicates whether the corner wall should use a texture on its back side or not. See also WallPaperBack.
![]() |
property HasWallPaperFront: Boolean; |
Indicates whether the corner wall should use a texture on its front side or not. See also WallPaperFront.
![]() |
property LengthPart1: real; |
Length of part of the wall that extends along the X-axis (assuming zero rotation angle).
![]() |
property LengthPart2: real; |
Length of part of the wall that extends along the Y-axis (assuming zero rotation angle).
![]() |
property TextureTileHeight: real; |
Height of the texture tiling (along the Z-axis). This property is meaningful only when HasWallPaperBack and/or HasWallPaperFront is set to True.
![]() |
property TextureTileLength: real; |
Length of the texture tiling (along X- and Y-axis). This property is meaningful only when HasWallPaperBack and/or HasWallPaperFront is set to True.
![]() |
property Thickness: real; |
Wall thickness.
![]() |
property Transparent: Boolean; |
Indicates whether the wall is transparent or not.
![]() |
property WallPaperBack: string; |
Texture (a file name) to be used on the back of the wall. This is only used if HasWallPaperBack is set to True.
![]() |
property WallPaperFront: string; |
Texture (a file name) to be used on the front of the wall. This is only used if HasWallPaperFront is set to True.