MainFormUnit.dfm 5.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241
  1. object Form1: TForm1
  2. Left = 140
  3. Top = 116
  4. Caption = 'Gui Skin Editor and Manager'
  5. ClientHeight = 325
  6. ClientWidth = 553
  7. Color = clBtnFace
  8. Font.Charset = DEFAULT_CHARSET
  9. Font.Color = clWindowText
  10. Font.Height = -11
  11. Font.Name = 'MS Sans Serif'
  12. Font.Style = []
  13. Menu = MainMenu1
  14. OldCreateOrder = False
  15. OnCreate = FormCreate
  16. PixelsPerInch = 96
  17. TextHeight = 13
  18. object Label1: TLabel
  19. Left = 8
  20. Top = 8
  21. Width = 99
  22. Height = 13
  23. Caption = 'Layouts in collection:'
  24. end
  25. object ListBox: TListBox
  26. Left = 8
  27. Top = 56
  28. Width = 233
  29. Height = 281
  30. ItemHeight = 13
  31. PopupMenu = ListPopup
  32. TabOrder = 0
  33. OnClick = ListBoxClick
  34. end
  35. object GLSceneViewer1: TGLSceneViewer
  36. Left = 248
  37. Top = 8
  38. Width = 297
  39. Height = 329
  40. Camera = GLCamera1
  41. Buffer.BackgroundColor = clBackground
  42. FieldOfView = 142.783203125000000000
  43. TabOrder = 1
  44. end
  45. object Edit3: TEdit
  46. Left = 8
  47. Top = 24
  48. Width = 153
  49. Height = 21
  50. TabOrder = 2
  51. Text = 'Newly Added'
  52. OnChange = Edit3Change
  53. OnKeyPress = Edit3KeyPress
  54. end
  55. object Button1: TButton
  56. Left = 168
  57. Top = 24
  58. Width = 33
  59. Height = 25
  60. Caption = 'Add'
  61. TabOrder = 3
  62. OnClick = Button1Click
  63. end
  64. object Button2: TButton
  65. Left = 208
  66. Top = 24
  67. Width = 33
  68. Height = 25
  69. Caption = 'Edit'
  70. TabOrder = 4
  71. OnClick = Button2Click
  72. end
  73. object MainMenu1: TMainMenu
  74. Left = 160
  75. Top = 160
  76. object File1: TMenuItem
  77. Caption = '&File'
  78. object Open1: TMenuItem
  79. Caption = 'Open...'
  80. OnClick = Open1Click
  81. end
  82. object Save1: TMenuItem
  83. Caption = 'Save...'
  84. OnClick = Save1Click
  85. end
  86. object Close1: TMenuItem
  87. Caption = 'Close'
  88. OnClick = Close1Click
  89. end
  90. object N1: TMenuItem
  91. Caption = '-'
  92. end
  93. object Import1: TMenuItem
  94. Caption = 'Import...'
  95. OnClick = Import1Click
  96. end
  97. object N2: TMenuItem
  98. Caption = '-'
  99. end
  100. object Exit1: TMenuItem
  101. Caption = 'Exit'
  102. OnClick = Exit1Click
  103. end
  104. end
  105. object Edit1: TMenuItem
  106. Caption = 'Edit'
  107. object EditLayout1: TMenuItem
  108. Caption = 'Edit Layout'
  109. OnClick = EditLayout1Click
  110. end
  111. end
  112. object Image1: TMenuItem
  113. Caption = 'Image'
  114. object Load1: TMenuItem
  115. Caption = 'Load...'
  116. OnClick = Load1Click
  117. end
  118. end
  119. end
  120. object OpenDialog: TOpenDialog
  121. DefaultExt = '*.layout'
  122. Filter = 'Layouts|*.layout'
  123. Title = 'Open Layout'
  124. Left = 32
  125. Top = 208
  126. end
  127. object SaveDialog: TSaveDialog
  128. DefaultExt = '*.layout'
  129. Filter = 'Layouts|*.layout'
  130. Title = 'Save Layout'
  131. Left = 64
  132. Top = 272
  133. end
  134. object GLGuiLayout1: TGLGuiLayout
  135. BitmapFont = WindowsBitmapFont1
  136. Material.MaterialLibrary = GLMaterialLibrary1
  137. Material.LibMaterialName = 'LibMaterial'
  138. GuiComponents = <>
  139. Left = 32
  140. Top = 160
  141. end
  142. object ImportDialog: TOpenDialog
  143. DefaultExt = '*.layout'
  144. Filter = 'Layouts|*.layout'
  145. Options = [ofHideReadOnly, ofAllowMultiSelect, ofFileMustExist, ofEnableSizing]
  146. Left = 176
  147. Top = 208
  148. end
  149. object ListPopup: TPopupMenu
  150. Left = 104
  151. Top = 208
  152. object Add1: TMenuItem
  153. Caption = 'Add'
  154. OnClick = Add1Click
  155. end
  156. object Remove1: TMenuItem
  157. Caption = 'Remove'
  158. OnClick = Remove1Click
  159. end
  160. object N3: TMenuItem
  161. Caption = '-'
  162. end
  163. object Edit2: TMenuItem
  164. Caption = 'Edit'
  165. OnClick = Edit2Click
  166. end
  167. end
  168. object GLScene1: TGLScene
  169. Left = 56
  170. Top = 64
  171. object HUDSprite1: TGLHUDSprite
  172. Material.MaterialLibrary = GLMaterialLibrary1
  173. Material.LibMaterialName = 'LibMaterial'
  174. Position.Coordinates = {0000164300001643000000000000803F}
  175. Width = 200.000000000000000000
  176. Height = 200.000000000000000000
  177. Rotation = 0.000000000000000000
  178. end
  179. object GLPanel1: TGLPanel
  180. Autosize = False
  181. RedrawAtOnce = False
  182. GuiLayout = GLGuiLayout1
  183. Rotation = 0.000000000000000000
  184. NoZWrite = False
  185. DoChangesOnProgress = False
  186. Width = 200.000000000000000000
  187. Height = 200.000000000000000000
  188. Left = 50.000000000000000000
  189. Top = 50.000000000000000000
  190. Position.Coordinates = {0000484200004842000000000000803F}
  191. end
  192. object GLCamera1: TGLCamera
  193. DepthOfView = 100.000000000000000000
  194. FocalLength = 50.000000000000000000
  195. end
  196. end
  197. object WindowsBitmapFont1: TGLWindowsBitmapFont
  198. Font.Charset = DEFAULT_CHARSET
  199. Font.Color = clWhite
  200. Font.Height = -16
  201. Font.Name = 'Verdana'
  202. Font.Style = []
  203. Ranges = <
  204. item
  205. StartASCII = 'A'
  206. StopASCII = 'Z'
  207. StartGlyphIdx = 0
  208. end
  209. item
  210. StartASCII = 'a'
  211. StopASCII = 'z'
  212. StartGlyphIdx = 26
  213. end
  214. item
  215. StartASCII = '0'
  216. StopASCII = '9'
  217. StartGlyphIdx = 52
  218. end
  219. item
  220. StartASCII = ' '
  221. StopASCII = ' '
  222. StartGlyphIdx = 62
  223. end>
  224. Left = 160
  225. Top = 64
  226. end
  227. object OpenPictureDialog: TOpenPictureDialog
  228. Left = 144
  229. Top = 272
  230. end
  231. object GLMaterialLibrary1: TGLMaterialLibrary
  232. Materials = <
  233. item
  234. Name = 'LibMaterial'
  235. Tag = 0
  236. Material.Texture.Disabled = False
  237. end>
  238. Left = 104
  239. Top = 112
  240. end
  241. end