Unit1.dfm 3.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113
  1. object Form1: TForm1
  2. Left = 0
  3. Top = 0
  4. Caption = 'Bitmap Font'
  5. ClientHeight = 385
  6. ClientWidth = 508
  7. Color = clBtnFace
  8. Font.Charset = DEFAULT_CHARSET
  9. Font.Color = clWindowText
  10. Font.Height = -11
  11. Font.Name = 'Tahoma'
  12. Font.Style = []
  13. OldCreateOrder = False
  14. OnCreate = FormCreate
  15. PixelsPerInch = 96
  16. TextHeight = 13
  17. object GLSceneViewer1: TGLSceneViewer
  18. Left = 0
  19. Top = 0
  20. Width = 508
  21. Height = 385
  22. Camera = GLCamera1
  23. Buffer.BackgroundColor = clBackground
  24. FieldOfView = 150.879455566406300000
  25. PenAsTouch = False
  26. Align = alClient
  27. OnClick = GLSceneViewer1Click
  28. TabOrder = 0
  29. end
  30. object GLScene1: TGLScene
  31. ObjectsSorting = osNone
  32. Left = 16
  33. Top = 16
  34. object GLCamera1: TGLCamera
  35. DepthOfView = 100.000000000000000000
  36. FocalLength = 50.000000000000000000
  37. TargetObject = Teapot1
  38. Position.Coordinates = {0000A04000004040000080400000803F}
  39. Left = 240
  40. Top = 152
  41. end
  42. object GLLightSource1: TGLLightSource
  43. ConstAttenuation = 1.000000000000000000
  44. Position.Coordinates = {0000204100002041000020410000803F}
  45. SpotCutOff = 180.000000000000000000
  46. end
  47. object Teapot1: TGLTeapot
  48. Material.FrontProperties.Diffuse.Color = {ADAC2C3FAAA9293FF0EF6F3F0000803F}
  49. Direction.Coordinates = {EE83843E00000000EA46773F00000000}
  50. Scale.Coordinates = {0000A0400000A0400000A04000000000}
  51. end
  52. object HUDText1: TGLHUDText
  53. Position.Coordinates = {0000484200008C42000000000000803F}
  54. BitmapFont = BitmapFont1
  55. Text = 'Hello World'
  56. Rotation = 0.000000000000000000
  57. end
  58. object HUDText2: TGLHUDText
  59. Position.Coordinates = {0000C84200009643000000000000803F}
  60. BitmapFont = BitmapFont1
  61. Text = 'Spin'
  62. Rotation = 0.000000000000000000
  63. Alignment = taCenter
  64. Layout = tlCenter
  65. end
  66. object HUDText3: TGLHUDText
  67. Position.Coordinates = {0000AF4300009643000000000000803F}
  68. BitmapFont = BitmapFont1
  69. Text = 'Scale'
  70. Rotation = 0.000000000000000000
  71. Alignment = taCenter
  72. Layout = tlCenter
  73. end
  74. object HUDTextFPS: TGLHUDText
  75. Position.Coordinates = {0000C8420000A041000000000000803F}
  76. BitmapFont = BitmapFont1
  77. Text = 'FPS'
  78. Rotation = 0.000000000000000000
  79. end
  80. end
  81. object BitmapFont1: TGLBitmapFont
  82. GlyphsIntervalX = 1
  83. GlyphsIntervalY = 1
  84. Ranges = <
  85. item
  86. StartASCII = ' '
  87. StopASCII = 'Z'
  88. StartGlyphIdx = 0
  89. end
  90. item
  91. StartASCII = 'a'
  92. StopASCII = 'z'
  93. StartGlyphIdx = 33
  94. end>
  95. CharWidth = 30
  96. CharHeight = 30
  97. HSpace = 3
  98. VSpace = 6
  99. Left = 80
  100. Top = 16
  101. end
  102. object GLCadencer1: TGLCadencer
  103. Scene = GLScene1
  104. OnProgress = GLCadencer1Progress
  105. Left = 16
  106. Top = 48
  107. end
  108. object Timer1: TTimer
  109. OnTimer = Timer1Timer
  110. Left = 16
  111. Top = 80
  112. end
  113. end