FRFaceEditor.dfm 6.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235
  1. object RFaceEditor: TRFaceEditor
  2. Left = 0
  3. Top = 0
  4. Width = 355
  5. Height = 247
  6. TabOrder = 0
  7. object Label1: TLabel
  8. Left = 3
  9. Top = 214
  10. Width = 49
  11. Height = 15
  12. Caption = 'Shininess'
  13. end
  14. object PageControl: TPageControl
  15. Left = 0
  16. Top = 56
  17. Width = 305
  18. Height = 130
  19. ActivePage = TSEmission
  20. Images = ImageList
  21. MultiLine = True
  22. TabOrder = 0
  23. object TSAmbient: TTabSheet
  24. BorderWidth = 3
  25. Caption = 'Ambient'
  26. inline CEAmbiant: TRColorEditor
  27. Left = 0
  28. Top = 0
  29. Width = 289
  30. Height = 95
  31. AutoSize = True
  32. TabOrder = 0
  33. TabStop = True
  34. inherited Label1: TLabel
  35. StyleElements = [seFont, seClient, seBorder]
  36. end
  37. inherited Label2: TLabel
  38. StyleElements = [seFont, seClient, seBorder]
  39. end
  40. inherited Label3: TLabel
  41. StyleElements = [seFont, seClient, seBorder]
  42. end
  43. inherited Label4: TLabel
  44. StyleElements = [seFont, seClient, seBorder]
  45. end
  46. inherited PAPreview: TPanel
  47. StyleElements = [seFont, seClient, seBorder]
  48. end
  49. inherited Panel1: TPanel
  50. StyleElements = [seFont, seClient, seBorder]
  51. end
  52. inherited RedEdit: TEdit
  53. StyleElements = [seFont, seClient, seBorder]
  54. end
  55. inherited GreenEdit: TEdit
  56. StyleElements = [seFont, seClient, seBorder]
  57. end
  58. inherited BlueEdit: TEdit
  59. StyleElements = [seFont, seClient, seBorder]
  60. end
  61. inherited AlphaEdit: TEdit
  62. StyleElements = [seFont, seClient, seBorder]
  63. end
  64. end
  65. end
  66. object TSDiffuse: TTabSheet
  67. BorderWidth = 3
  68. Caption = 'Diffuse'
  69. ImageIndex = 1
  70. inline CEDiffuse: TRColorEditor
  71. Left = 0
  72. Top = 0
  73. Width = 289
  74. Height = 95
  75. AutoSize = True
  76. TabOrder = 0
  77. TabStop = True
  78. inherited Label1: TLabel
  79. StyleElements = [seFont, seClient, seBorder]
  80. end
  81. inherited Label2: TLabel
  82. StyleElements = [seFont, seClient, seBorder]
  83. end
  84. inherited Label3: TLabel
  85. StyleElements = [seFont, seClient, seBorder]
  86. end
  87. inherited Label4: TLabel
  88. StyleElements = [seFont, seClient, seBorder]
  89. end
  90. inherited PAPreview: TPanel
  91. StyleElements = [seFont, seClient, seBorder]
  92. end
  93. inherited Panel1: TPanel
  94. StyleElements = [seFont, seClient, seBorder]
  95. end
  96. inherited RedEdit: TEdit
  97. StyleElements = [seFont, seClient, seBorder]
  98. end
  99. inherited GreenEdit: TEdit
  100. StyleElements = [seFont, seClient, seBorder]
  101. end
  102. inherited BlueEdit: TEdit
  103. StyleElements = [seFont, seClient, seBorder]
  104. end
  105. inherited AlphaEdit: TEdit
  106. StyleElements = [seFont, seClient, seBorder]
  107. end
  108. end
  109. end
  110. object TSEmission: TTabSheet
  111. BorderWidth = 3
  112. Caption = 'Emission'
  113. ImageIndex = 2
  114. inline CEEmission: TRColorEditor
  115. Left = 0
  116. Top = 0
  117. Width = 341
  118. Height = 98
  119. AutoSize = True
  120. TabOrder = 0
  121. TabStop = True
  122. ExplicitWidth = 341
  123. ExplicitHeight = 98
  124. inherited Label1: TLabel
  125. StyleElements = [seFont, seClient, seBorder]
  126. end
  127. inherited Label2: TLabel
  128. StyleElements = [seFont, seClient, seBorder]
  129. end
  130. inherited Label3: TLabel
  131. StyleElements = [seFont, seClient, seBorder]
  132. end
  133. inherited Label4: TLabel
  134. StyleElements = [seFont, seClient, seBorder]
  135. end
  136. inherited ColorEditorPaintBox: TPaintBox
  137. Width = 341
  138. Height = 98
  139. ExplicitWidth = 341
  140. ExplicitHeight = 98
  141. end
  142. inherited PAPreview: TPanel
  143. StyleElements = [seFont, seClient, seBorder]
  144. end
  145. inherited Panel1: TPanel
  146. StyleElements = [seFont, seClient, seBorder]
  147. end
  148. inherited RedEdit: TEdit
  149. StyleElements = [seFont, seClient, seBorder]
  150. end
  151. inherited GreenEdit: TEdit
  152. StyleElements = [seFont, seClient, seBorder]
  153. end
  154. inherited BlueEdit: TEdit
  155. StyleElements = [seFont, seClient, seBorder]
  156. end
  157. inherited AlphaEdit: TEdit
  158. StyleElements = [seFont, seClient, seBorder]
  159. end
  160. end
  161. end
  162. object TSSpecular: TTabSheet
  163. BorderWidth = 3
  164. Caption = 'Specular'
  165. ImageIndex = 3
  166. inline CESpecular: TRColorEditor
  167. Left = 0
  168. Top = 0
  169. Width = 289
  170. Height = 95
  171. AutoSize = True
  172. TabOrder = 0
  173. TabStop = True
  174. inherited Label1: TLabel
  175. StyleElements = [seFont, seClient, seBorder]
  176. end
  177. inherited Label2: TLabel
  178. StyleElements = [seFont, seClient, seBorder]
  179. end
  180. inherited Label3: TLabel
  181. StyleElements = [seFont, seClient, seBorder]
  182. end
  183. inherited Label4: TLabel
  184. StyleElements = [seFont, seClient, seBorder]
  185. end
  186. inherited PAPreview: TPanel
  187. StyleElements = [seFont, seClient, seBorder]
  188. end
  189. inherited Panel1: TPanel
  190. StyleElements = [seFont, seClient, seBorder]
  191. end
  192. inherited RedEdit: TEdit
  193. StyleElements = [seFont, seClient, seBorder]
  194. end
  195. inherited GreenEdit: TEdit
  196. StyleElements = [seFont, seClient, seBorder]
  197. end
  198. inherited BlueEdit: TEdit
  199. StyleElements = [seFont, seClient, seBorder]
  200. end
  201. inherited AlphaEdit: TEdit
  202. StyleElements = [seFont, seClient, seBorder]
  203. end
  204. end
  205. end
  206. end
  207. inline TBEShininess: TRTrackBarEdit
  208. Left = 50
  209. Top = 0
  210. Width = 201
  211. Height = 33
  212. TabOrder = 1
  213. ExplicitLeft = 50
  214. ExplicitWidth = 201
  215. ExplicitHeight = 33
  216. inherited TrackBar: TTrackBar
  217. Left = -2
  218. Top = 1
  219. Max = 128
  220. Frequency = 16
  221. OnChange = TBEShininessTrackBarChange
  222. ExplicitLeft = -2
  223. ExplicitTop = 1
  224. end
  225. inherited Edit: TEdit
  226. Left = 160
  227. StyleElements = [seFont, seClient, seBorder]
  228. ExplicitLeft = 160
  229. end
  230. end
  231. object ImageList: TImageList
  232. Left = 264
  233. Top = 8
  234. end
  235. end