| Description | Hierarchy | Fields | Methods | Properties |
type TTeeWall = class(TArenaObject)
An arena object representing a T-shaped wall section. In Table 1 below follows an example of a definition of a T-shaped wall and in Figure 1 the corresponding graphics is shown.
Table 1: Example definition of a T-shaped wall.
|
object MyTeeWall: TTeeWall 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.500 LengthPart3 = 1.000 Thickness = 0.200 Transparent = False HasWallPaperRoom1 = False # WallPaperRoom1 = HasWallPaperRoom2 = False # WallPaperRoom2 = HasWallPaperRoom3 = False # WallPaperRoom3 = TextureTileLength = 1.000 TextureTileHeight = 1.000 end |

Figure
1: Graphical appearance of the T-shaped 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 HasWallPaperRoom1: Boolean; |
![]() |
property HasWallPaperRoom2: Boolean; |
![]() |
property HasWallPaperRoom3: Boolean; |
![]() |
property LengthPart1: real; |
![]() |
property LengthPart2: real; |
![]() |
property LengthPart3: real; |
![]() |
property TextureTileHeight: real; |
![]() |
property TextureTileLength: real; |
![]() |
property Thickness: real; |
![]() |
property Transparent: Boolean; |
![]() |
property WallPaperRoom1: string; |
![]() |
property WallPaperRoom2: string; |
![]() |
property WallPaperRoom3: string; |
![]() |
property HasWallPaperRoom1: Boolean; |
Indicates whether to use a texture in the first room or not. See also WallPaperRoom1.
![]() |
property HasWallPaperRoom2: Boolean; |
Indicates whether to use a texture in the second room or not. See also WallPaperRoom2.
![]() |
property HasWallPaperRoom3: Boolean; |
Indicates whether to use a texture in the third room or not. See also WallPaperRoom3.
![]() |
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 negative Y-axis (assuming zero rotation angle).
![]() |
property LengthPart3: real; |
Length of part of the wall that extends along the positive Y-axis (assuming zero rotation angle).
![]() |
property TextureTileHeight: real; |
Height of the texture tiles (along the Z-axis). This property is meaningful only when at least one of the properties HasWallPaperRoom1, HasWallPaperRoom2, or HasWallPaperRoom3 is set to True.
![]() |
property TextureTileLength: real; |
Length of the texture tiling (along X- and Y-axis). This property is meaningful only when at least one of the properties HasWallPaperRoom1, HasWallPaperRoom2, or HasWallPaperRoom3 is set to True.
![]() |
property Thickness: real; |
Thickness of the walls.
![]() |
property Transparent: Boolean; |
Indicates whether the wall is transparent or not.
![]() |
property WallPaperRoom1: string; |
Texture (a file name) to be used in the first room. This texture image is only used if HasWallPaperRoom1 is set to True.
![]() |
property WallPaperRoom2: string; |
Texture (a file name) to be used in the second room. This texture image is only used if HasWallPaperRoom2 is set to True.
![]() |
property WallPaperRoom3: string; |
Texture (a file name) to be used in the third room. This texture image is only used if HasWallPaperRoom3 is set to True.