Unit1.dfm 21 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606
  1. object Form1: TForm1
  2. Left = 0
  3. Top = 0
  4. Caption = 'Gui Demo'
  5. ClientHeight = 381
  6. ClientWidth = 537
  7. Color = clBtnFace
  8. Font.Charset = DEFAULT_CHARSET
  9. Font.Color = clWindowText
  10. Font.Height = -11
  11. Font.Name = 'Tahoma'
  12. Font.Style = []
  13. Menu = MainMenu1
  14. OldCreateOrder = False
  15. OnCreate = FormCreate
  16. OnKeyDown = FormKeyDown
  17. OnKeyPress = FormKeyPress
  18. OnKeyUp = FormKeyUp
  19. PixelsPerInch = 96
  20. TextHeight = 13
  21. object GLSceneViewer1: TGLSceneViewer
  22. Left = 0
  23. Top = 0
  24. Width = 537
  25. Height = 381
  26. Camera = GLCamera1
  27. Buffer.BackgroundColor = clBackground
  28. FieldOfView = 150.586914062500000000
  29. Align = alClient
  30. OnMouseDown = GLSceneViewer1MouseDown
  31. OnMouseMove = GLSceneViewer1MouseMove
  32. OnMouseUp = GLSceneViewer1MouseUp
  33. TabOrder = 0
  34. end
  35. object GLScene1: TGLScene
  36. ObjectsSorting = osNone
  37. Left = 40
  38. Top = 16
  39. object GLLightSource1: TGLLightSource
  40. ConstAttenuation = 1.000000000000000000
  41. Position.Coordinates = {0000204100002041000020410000803F}
  42. SpotCutOff = 180.000000000000000000
  43. end
  44. object GLForm1: TGLForm
  45. Autosize = False
  46. RedrawAtOnce = False
  47. GuiLayout = GLGuiLayout1
  48. GuiLayoutName = 'form'
  49. Rotation = 0.000000000000000000
  50. AlphaChannel = 0.500000000000000000
  51. NoZWrite = False
  52. DoChangesOnProgress = False
  53. Width = 300.000000000000000000
  54. Height = 170.000000000000000000
  55. Left = 100.000000000000000000
  56. Top = 100.000000000000000000
  57. Position.Coordinates = {0000C8420000C842000000000000803F}
  58. BitmapFont = WindowsBitmapFont1
  59. DefaultColor = clMaroon
  60. Caption = 'Gui Form'
  61. TitleColor = clWhite
  62. TitleOffset = 2.000000000000000000
  63. object GLButton1: TGLButton
  64. Autosize = False
  65. RedrawAtOnce = False
  66. GuiLayout = GLGuiLayout1
  67. GuiLayoutName = 'panel'
  68. Rotation = 0.000000000000000000
  69. NoZWrite = False
  70. DoChangesOnProgress = False
  71. Width = 140.000000000000000000
  72. Height = 25.000000000000000000
  73. Left = 80.000000000000000000
  74. Top = 120.000000000000000000
  75. Position.Coordinates = {0000344300005C43000000000000803F}
  76. BitmapFont = WindowsBitmapFont1
  77. DefaultColor = clBlack
  78. Caption = 'Set Title'
  79. Focused = False
  80. FocusedColor = clBlack
  81. Group = -1
  82. Pressed = False
  83. OnButtonClick = GLButton1ButtonClick
  84. GuiLayoutNamePressed = 'panel'
  85. AllowUp = True
  86. end
  87. object GLEdit1: TGLEdit
  88. Autosize = False
  89. RedrawAtOnce = False
  90. GuiLayout = GLGuiLayout1
  91. GuiLayoutName = 'panel'
  92. Rotation = 0.000000000000000000
  93. NoZWrite = False
  94. DoChangesOnProgress = False
  95. Width = 180.000000000000000000
  96. Height = 21.000000000000000000
  97. Left = 100.000000000000000000
  98. Top = 70.000000000000000000
  99. Position.Coordinates = {0000484300002A43000000000000803F}
  100. BitmapFont = WindowsBitmapFont1
  101. DefaultColor = clBlack
  102. Caption = 'New Title'
  103. Focused = False
  104. FocusedColor = clBlack
  105. EditChar = '*'
  106. SelStart = 0
  107. end
  108. object GLLabel1: TGLLabel
  109. Autosize = False
  110. RedrawAtOnce = False
  111. GuiLayout = GLGuiLayout1
  112. Rotation = 0.000000000000000000
  113. NoZWrite = False
  114. DoChangesOnProgress = False
  115. Width = 80.000000000000000000
  116. Height = 21.000000000000000000
  117. Left = 10.000000000000000000
  118. Top = 70.000000000000000000
  119. Position.Coordinates = {0000DC4200002A43000000000000803F}
  120. BitmapFont = WindowsBitmapFont1
  121. DefaultColor = clBlack
  122. Caption = 'Title'
  123. Alignment = taLeftJustify
  124. TextLayout = tlCenter
  125. end
  126. end
  127. object GLCamera1: TGLCamera
  128. DepthOfView = 100.000000000000000000
  129. FocalLength = 50.000000000000000000
  130. Position.Coordinates = {0000A04000004040000080400000803F}
  131. Left = 240
  132. Top = 152
  133. end
  134. end
  135. object GLCadencer1: TGLCadencer
  136. Scene = GLScene1
  137. OnProgress = GLCadencer1Progress
  138. Left = 40
  139. Top = 80
  140. end
  141. object Timer1: TTimer
  142. OnTimer = Timer1Timer
  143. Left = 376
  144. Top = 16
  145. end
  146. object WindowsBitmapFont1: TGLWindowsBitmapFont
  147. Font.Charset = DEFAULT_CHARSET
  148. Font.Color = clWhite
  149. Font.Height = -11
  150. Font.Name = '@Arial Unicode MS'
  151. Font.Style = []
  152. Left = 40
  153. Top = 136
  154. end
  155. object MainMenu1: TMainMenu
  156. Left = 440
  157. Top = 88
  158. object Font1: TMenuItem
  159. Caption = 'Font'
  160. object WindowsFont1: TMenuItem
  161. Caption = 'Set New Font...'
  162. OnClick = WindowsFont1Click
  163. end
  164. end
  165. object miFPS: TMenuItem
  166. Caption = 'FPS'
  167. end
  168. end
  169. object FontDialog1: TFontDialog
  170. Font.Charset = DEFAULT_CHARSET
  171. Font.Color = clWindowText
  172. Font.Height = -11
  173. Font.Name = 'MS Sans Serif'
  174. Font.Style = []
  175. Left = 440
  176. Top = 16
  177. end
  178. object GLGuiLayout1: TGLGuiLayout
  179. BitmapFont = WindowsBitmapFont1
  180. Material.MaterialLibrary = GLMaterialLibrary1
  181. Material.LibMaterialName = 'Gui'
  182. GuiComponents = <
  183. item
  184. Elements = <
  185. item
  186. TopLeft.Coordinates = {00003041000082420000000000000000}
  187. BottomRight.Coordinates = {000020420000BC420000000000000000}
  188. Align = GLAlCenter
  189. Name = 'center1'
  190. end
  191. item
  192. BottomRight.Coordinates = {000088410000F0410000000000000000}
  193. Align = GLAlTopLeft
  194. Name = 'TopLeft1'
  195. end
  196. item
  197. TopLeft.Coordinates = {00008841000000000000000000000000}
  198. BottomRight.Coordinates = {0000E0420000F0410000000000000000}
  199. Align = GLAlTop
  200. Name = 'Top1'
  201. end
  202. item
  203. TopLeft.Coordinates = {000000000000F8410000000000000000}
  204. BottomRight.Coordinates = {000000410000DA420000000000000000}
  205. Align = GLAlLeft
  206. Name = 'Left1'
  207. end
  208. item
  209. TopLeft.Coordinates = {0000E042000000000000000000000000}
  210. BottomRight.Coordinates = {000000430000F0410000000000000000}
  211. Align = GLAlTopRight
  212. Name = 'TopRight1'
  213. end
  214. item
  215. TopLeft.Coordinates = {0000F0420000F0410000000000000000}
  216. BottomRight.Coordinates = {000000430000DE420000000000000000}
  217. Align = GLAlRight
  218. Name = 'Right1'
  219. end
  220. item
  221. TopLeft.Coordinates = {000000000000E2420000000000000000}
  222. BottomRight.Coordinates = {00007041000000430000000000000000}
  223. Align = GLAlBottomLeft
  224. Name = 'BottomLeft1'
  225. end
  226. item
  227. TopLeft.Coordinates = {000070410000F0420000000000000000}
  228. BottomRight.Coordinates = {0000E242000000430000000000000000}
  229. Align = GLAlBottom
  230. Name = 'Bottom1'
  231. end
  232. item
  233. TopLeft.Coordinates = {0000E2420000E2420000000000000000}
  234. BottomRight.Coordinates = {00000043000000430000000000000000}
  235. Align = GLAlBottomRight
  236. Name = 'BottomRight1'
  237. end>
  238. Name = 'form'
  239. end
  240. item
  241. Elements = <
  242. item
  243. TopLeft.Coordinates = {00003041000082420000000000000000}
  244. BottomRight.Coordinates = {000020420000BC420000000000000000}
  245. Align = GLAlCenter
  246. Name = 'center1'
  247. end
  248. item
  249. TopLeft.Coordinates = {00000041000078420000000000000000}
  250. BottomRight.Coordinates = {00005041000086420000000000000000}
  251. Align = GLAlTopLeft
  252. Name = 'TopLeft1'
  253. end
  254. item
  255. TopLeft.Coordinates = {00003041000078420000000000000000}
  256. BottomRight.Coordinates = {00002042000084420000000000000000}
  257. Align = GLAlTop
  258. Name = 'Top1'
  259. end
  260. item
  261. TopLeft.Coordinates = {00000041000082420000000000000000}
  262. BottomRight.Coordinates = {000040410000BC420000000000000000}
  263. Align = GLAlLeft
  264. Name = 'Left1'
  265. end
  266. item
  267. TopLeft.Coordinates = {00001842000078420000000000000000}
  268. BottomRight.Coordinates = {00002C42000086420000000000000000}
  269. Align = GLAlTopRight
  270. Name = 'TopRight1'
  271. end
  272. item
  273. TopLeft.Coordinates = {00001C42000082420000000000000000}
  274. BottomRight.Coordinates = {00002C420000BC420000000000000000}
  275. Align = GLAlRight
  276. Name = 'Right1'
  277. end
  278. item
  279. TopLeft.Coordinates = {000000410000B8420000000000000000}
  280. BottomRight.Coordinates = {000050410000C2420000000000000000}
  281. Align = GLAlBottomLeft
  282. Name = 'BottomLeft1'
  283. end
  284. item
  285. TopLeft.Coordinates = {000030410000BA420000000000000000}
  286. BottomRight.Coordinates = {000020420000C2420000000000000000}
  287. Align = GLAlBottom
  288. Name = 'Bottom1'
  289. end
  290. item
  291. TopLeft.Coordinates = {000018420000B8420000000000000000}
  292. BottomRight.Coordinates = {00002C420000C2420000000000000000}
  293. Align = GLAlBottomRight
  294. Name = 'BottomRight1'
  295. end>
  296. Name = 'panel'
  297. end
  298. item
  299. Elements = <
  300. item
  301. TopLeft.Coordinates = {000024420000F8410000000000000000}
  302. BottomRight.Coordinates = {00003042000010420000000000000000}
  303. Align = GLAlTopLeft
  304. Name = 'TopLeft1'
  305. end
  306. item
  307. TopLeft.Coordinates = {000030420000F8410000000000000000}
  308. BottomRight.Coordinates = {00005842000010420000000000000000}
  309. Align = GLAlTop
  310. Name = 'Top1'
  311. end
  312. item
  313. TopLeft.Coordinates = {000058420000F8410000000000000000}
  314. BottomRight.Coordinates = {00006442000010420000000000000000}
  315. Align = GLAlTopRight
  316. Name = 'TopRight1'
  317. end
  318. item
  319. TopLeft.Coordinates = {00002442000010420000000000000000}
  320. BottomRight.Coordinates = {00003042000034420000000000000000}
  321. Align = GLAlLeft
  322. Name = 'Left1'
  323. end
  324. item
  325. TopLeft.Coordinates = {00003042000010420000000000000000}
  326. BottomRight.Coordinates = {00005842000030420000000000000000}
  327. Align = GLAlCenter
  328. Name = 'Center1'
  329. end
  330. item
  331. TopLeft.Coordinates = {00005842000010420000000000000000}
  332. BottomRight.Coordinates = {00006442000030420000000000000000}
  333. Align = GLAlRight
  334. Name = 'Right1'
  335. end
  336. item
  337. TopLeft.Coordinates = {00002442000030420000000000000000}
  338. BottomRight.Coordinates = {00003042000044420000000000000000}
  339. Align = GLAlBottomLeft
  340. Name = 'BottomLeft1'
  341. end
  342. item
  343. TopLeft.Coordinates = {00003042000030420000000000000000}
  344. BottomRight.Coordinates = {00005842000044420000000000000000}
  345. Align = GLAlBottom
  346. Name = 'Bottom1'
  347. end
  348. item
  349. TopLeft.Coordinates = {00005842000030420000000000000000}
  350. BottomRight.Coordinates = {00006442000044420000000000000000}
  351. Align = GLAlBottomRight
  352. Name = 'BottomRight1'
  353. end>
  354. Name = 'button_up'
  355. end
  356. item
  357. Elements = <
  358. item
  359. TopLeft.Coordinates = {000068420000F8410000000000000000}
  360. BottomRight.Coordinates = {00007442000010420000000000000000}
  361. Align = GLAlTopLeft
  362. Name = 'TopLeft1'
  363. end
  364. item
  365. TopLeft.Coordinates = {000074420000F8410000000000000000}
  366. BottomRight.Coordinates = {00008E42000010420000000000000000}
  367. Align = GLAlTop
  368. Name = 'Top1'
  369. end
  370. item
  371. TopLeft.Coordinates = {00008E420000F8410000000000000000}
  372. BottomRight.Coordinates = {00009442000010420000000000000000}
  373. Align = GLAlTopRight
  374. Name = 'TopRight1'
  375. end
  376. item
  377. TopLeft.Coordinates = {00006842000010420000000000000000}
  378. BottomRight.Coordinates = {00007442000034420000000000000000}
  379. Align = GLAlLeft
  380. Name = 'Left1'
  381. end
  382. item
  383. TopLeft.Coordinates = {00007442000010420000000000000000}
  384. BottomRight.Coordinates = {00008E42000034420000000000000000}
  385. Align = GLAlCenter
  386. Name = 'Center1'
  387. end
  388. item
  389. TopLeft.Coordinates = {00008E42000010420000000000000000}
  390. BottomRight.Coordinates = {00009442000034420000000000000000}
  391. Align = GLAlRight
  392. Name = 'Right1'
  393. end
  394. item
  395. TopLeft.Coordinates = {00006842000034420000000000000000}
  396. BottomRight.Coordinates = {00007442000044420000000000000000}
  397. Align = GLAlBottomLeft
  398. Name = 'BottomLeft1'
  399. end
  400. item
  401. TopLeft.Coordinates = {00007442000034420000000000000000}
  402. BottomRight.Coordinates = {00008E42000044420000000000000000}
  403. Align = GLAlBottom
  404. Name = 'Bottom1'
  405. end
  406. item
  407. TopLeft.Coordinates = {00008E42000034420000000000000000}
  408. BottomRight.Coordinates = {00009442000044420000000000000000}
  409. Align = GLAlBottomRight
  410. Name = 'BottomRight1'
  411. end>
  412. Name = 'button_down'
  413. end
  414. item
  415. Elements = <
  416. item
  417. TopLeft.Coordinates = {000096420000F8410000000000000000}
  418. BottomRight.Coordinates = {00009A42000004420000000000000000}
  419. Align = GLAlTopLeft
  420. Name = 'TopLeft1'
  421. end
  422. item
  423. TopLeft.Coordinates = {00009A420000F8410000000000000000}
  424. BottomRight.Coordinates = {0000AE42000004420000000000000000}
  425. Align = GLAlTop
  426. Name = 'Top1'
  427. end
  428. item
  429. TopLeft.Coordinates = {0000AE420000F8410000000000000000}
  430. BottomRight.Coordinates = {0000B242000004420000000000000000}
  431. Align = GLAlTopRight
  432. Name = 'TopRight1'
  433. end
  434. item
  435. TopLeft.Coordinates = {00009642000004420000000000000000}
  436. BottomRight.Coordinates = {00009A4200002C420000000000000000}
  437. Align = GLAlLeft
  438. Name = 'Left1'
  439. end
  440. item
  441. TopLeft.Coordinates = {00009A42000004420000000000000000}
  442. BottomRight.Coordinates = {0000AE4200002C420000000000000000}
  443. Align = GLAlCenter
  444. Name = 'Center1'
  445. end
  446. item
  447. TopLeft.Coordinates = {0000AE42000004420000000000000000}
  448. BottomRight.Coordinates = {0000B24200002C420000000000000000}
  449. Align = GLAlRight
  450. Name = 'Right1'
  451. end
  452. item
  453. TopLeft.Coordinates = {0000964200002C420000000000000000}
  454. BottomRight.Coordinates = {00009A42000034420000000000000000}
  455. Align = GLAlBottomLeft
  456. Name = 'BottomLeft1'
  457. end
  458. item
  459. TopLeft.Coordinates = {00009A4200002C420000000000000000}
  460. BottomRight.Coordinates = {0000AE42000034420000000000000000}
  461. Align = GLAlBottom
  462. Name = 'BottomCenter1'
  463. end
  464. item
  465. TopLeft.Coordinates = {0000AE4200002C420000000000000000}
  466. BottomRight.Coordinates = {0000B242000034420000000000000000}
  467. Align = GLAlBottomRight
  468. Name = 'BottomRight1'
  469. end>
  470. Name = 'checkbox_checked'
  471. end
  472. item
  473. Elements = <
  474. item
  475. TopLeft.Coordinates = {0000964200003C420000000000000000}
  476. BottomRight.Coordinates = {00009A42000044420000000000000000}
  477. Align = GLAlTopLeft
  478. Name = 'TopLeft1'
  479. end
  480. item
  481. TopLeft.Coordinates = {00009A4200003C420000000000000000}
  482. BottomRight.Coordinates = {0000AE42000044420000000000000000}
  483. Align = GLAlTop
  484. Name = 'Top1'
  485. end
  486. item
  487. TopLeft.Coordinates = {0000AE4200003C420000000000000000}
  488. BottomRight.Coordinates = {0000B242000044420000000000000000}
  489. Align = GLAlTopRight
  490. Name = 'TopRight1'
  491. end
  492. item
  493. TopLeft.Coordinates = {00009642000044420000000000000000}
  494. BottomRight.Coordinates = {00009A4200006C420000000000000000}
  495. Align = GLAlLeft
  496. Name = 'Left1'
  497. end
  498. item
  499. TopLeft.Coordinates = {00009A42000044420000000000000000}
  500. BottomRight.Coordinates = {0000AE4200006C420000000000000000}
  501. Align = GLAlCenter
  502. Name = 'Center1'
  503. end
  504. item
  505. TopLeft.Coordinates = {0000AE42000044420000000000000000}
  506. BottomRight.Coordinates = {0000B24200006C420000000000000000}
  507. Align = GLAlRight
  508. Name = 'Right1'
  509. end
  510. item
  511. TopLeft.Coordinates = {0000964200006C420000000000000000}
  512. BottomRight.Coordinates = {00009A42000074420000000000000000}
  513. Align = GLAlBottomLeft
  514. Name = 'BottomLeft1'
  515. end
  516. item
  517. TopLeft.Coordinates = {00009A4200006C420000000000000000}
  518. BottomRight.Coordinates = {0000AE42000074420000000000000000}
  519. Align = GLAlBottom
  520. Name = 'BottomCenter1'
  521. end
  522. item
  523. TopLeft.Coordinates = {0000AE4200006C420000000000000000}
  524. BottomRight.Coordinates = {0000B242000074420000000000000000}
  525. Align = GLAlBottomRight
  526. Name = 'BottomRight1'
  527. end>
  528. Name = 'checkbox_unchecked'
  529. end
  530. item
  531. Elements = <
  532. item
  533. TopLeft.Coordinates = {0000B44200003C420000000000000000}
  534. BottomRight.Coordinates = {0000B842000044420000000000000000}
  535. Align = GLAlTopLeft
  536. Name = 'TopLeft1'
  537. end
  538. item
  539. TopLeft.Coordinates = {0000B84200003C420000000000000000}
  540. BottomRight.Coordinates = {0000CC42000044420000000000000000}
  541. Align = GLAlTop
  542. Name = 'Top1'
  543. end
  544. item
  545. TopLeft.Coordinates = {0000CC4200003C420000000000000000}
  546. BottomRight.Coordinates = {0000D042000044420000000000000000}
  547. Align = GLAlTopRight
  548. Name = 'TopRight1'
  549. end
  550. item
  551. TopLeft.Coordinates = {0000B442000044420000000000000000}
  552. BottomRight.Coordinates = {0000B84200006C420000000000000000}
  553. Align = GLAlLeft
  554. Name = 'Left1'
  555. end
  556. item
  557. TopLeft.Coordinates = {0000B842000044420000000000000000}
  558. BottomRight.Coordinates = {0000CC4200006C420000000000000000}
  559. Align = GLAlCenter
  560. Name = 'Center1'
  561. end
  562. item
  563. TopLeft.Coordinates = {0000CC42000044420000000000000000}
  564. BottomRight.Coordinates = {0000D04200006C420000000000000000}
  565. Align = GLAlRight
  566. Name = 'Right1'
  567. end
  568. item
  569. TopLeft.Coordinates = {0000B44200006C420000000000000000}
  570. BottomRight.Coordinates = {0000B842000074420000000000000000}
  571. Align = GLAlBottomLeft
  572. Name = 'BottomLeft1'
  573. end
  574. item
  575. TopLeft.Coordinates = {0000B84200006C420000000000000000}
  576. BottomRight.Coordinates = {0000CC42000074420000000000000000}
  577. Align = GLAlBottom
  578. Name = 'BottomCenter1'
  579. end
  580. item
  581. TopLeft.Coordinates = {0000CC4200006C420000000000000000}
  582. BottomRight.Coordinates = {0000D042000074420000000000000000}
  583. Align = GLAlBottomRight
  584. Name = 'BottomRight1'
  585. end>
  586. Name = 'edit'
  587. end>
  588. FileName = 'Default.layout'
  589. Left = 280
  590. Top = 16
  591. end
  592. object GLMaterialLibrary1: TGLMaterialLibrary
  593. Materials = <
  594. item
  595. Name = 'Gui'
  596. Tag = 0
  597. Material.Texture.ImageClassName = 'TGLPicFileImage'
  598. Material.Texture.Image.PictureFileName = 'DefaultSkin.bmp'
  599. Material.Texture.ImageAlpha = tiaOpaque
  600. Material.Texture.Disabled = False
  601. end>
  602. TexturePaths = '..\\..\\..\\..\\media\\'
  603. Left = 120
  604. Top = 16
  605. end
  606. end