fShaderLabD.dfm 81 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276
  1. object FormShaderLab: TFormShaderLab
  2. Left = 0
  3. Top = 0
  4. Margins.Left = 5
  5. Margins.Top = 5
  6. Margins.Right = 5
  7. Margins.Bottom = 5
  8. Caption = 'Shader Lab'
  9. ClientHeight = 914
  10. ClientWidth = 1701
  11. Color = clBtnFace
  12. Font.Charset = DEFAULT_CHARSET
  13. Font.Color = clWindowText
  14. Font.Height = -19
  15. Font.Name = 'Tahoma'
  16. Font.Style = []
  17. Position = poScreenCenter
  18. OnCreate = FormCreate
  19. OnDestroy = FormDestroy
  20. OnResize = FormResize
  21. PixelsPerInch = 168
  22. TextHeight = 23
  23. object Panel1: TPanel
  24. Left = 0
  25. Top = 0
  26. Width = 651
  27. Height = 914
  28. Margins.Left = 5
  29. Margins.Top = 5
  30. Margins.Right = 5
  31. Margins.Bottom = 5
  32. Align = alLeft
  33. TabOrder = 0
  34. object Label54: TLabel
  35. Left = 259
  36. Top = 763
  37. Width = 54
  38. Height = 23
  39. Margins.Left = 5
  40. Margins.Top = 5
  41. Margins.Right = 5
  42. Margins.Bottom = 5
  43. Caption = 'Object'
  44. end
  45. object PageControl: TPageControl
  46. Left = 1
  47. Top = 1
  48. Width = 649
  49. Height = 751
  50. Margins.Left = 5
  51. Margins.Top = 5
  52. Margins.Right = 5
  53. Margins.Bottom = 5
  54. ActivePage = TabSheet3
  55. Align = alTop
  56. MultiLine = True
  57. TabOrder = 0
  58. object TabSheet1: TTabSheet
  59. Margins.Left = 5
  60. Margins.Top = 5
  61. Margins.Right = 5
  62. Margins.Bottom = 5
  63. Caption = 'Fur'
  64. object lblFurDistance: TLabel
  65. Left = 5
  66. Top = 93
  67. Width = 98
  68. Height = 23
  69. Margins.Left = 5
  70. Margins.Top = 5
  71. Margins.Right = 5
  72. Margins.Bottom = 5
  73. Caption = 'Fur Length '
  74. end
  75. object Label10: TLabel
  76. Left = 5
  77. Top = 359
  78. Width = 90
  79. Height = 23
  80. Margins.Left = 5
  81. Margins.Top = 5
  82. Margins.Right = 5
  83. Margins.Bottom = 5
  84. Caption = 'Blend Dest'
  85. end
  86. object Label11: TLabel
  87. Left = 5
  88. Top = 313
  89. Width = 80
  90. Height = 23
  91. Margins.Left = 5
  92. Margins.Top = 5
  93. Margins.Right = 5
  94. Margins.Bottom = 5
  95. Caption = 'Blend Src'
  96. end
  97. object lblFurPassCount1: TLabel
  98. Left = 5
  99. Top = 49
  100. Width = 97
  101. Height = 23
  102. Margins.Left = 5
  103. Margins.Top = 5
  104. Margins.Right = 5
  105. Margins.Bottom = 5
  106. Caption = 'Pass Count '
  107. end
  108. object lblFurLength: TLabel
  109. Left = 502
  110. Top = 93
  111. Width = 26
  112. Height = 23
  113. Margins.Left = 5
  114. Margins.Top = 5
  115. Margins.Right = 5
  116. Margins.Bottom = 5
  117. Caption = '0.3'
  118. end
  119. object Label7: TLabel
  120. Left = 5
  121. Top = 131
  122. Width = 104
  123. Height = 23
  124. Margins.Left = 5
  125. Margins.Top = 5
  126. Margins.Right = 5
  127. Margins.Bottom = 5
  128. Caption = 'Max Length '
  129. end
  130. object lblFurMaxLength: TLabel
  131. Left = 502
  132. Top = 133
  133. Width = 26
  134. Height = 23
  135. Margins.Left = 5
  136. Margins.Top = 5
  137. Margins.Right = 5
  138. Margins.Bottom = 5
  139. Caption = '3.0'
  140. end
  141. object lblFurPassCount: TLabel
  142. Left = 502
  143. Top = 49
  144. Width = 20
  145. Height = 23
  146. Margins.Left = 5
  147. Margins.Top = 5
  148. Margins.Right = 5
  149. Margins.Bottom = 5
  150. Caption = '16'
  151. end
  152. object Label12: TLabel
  153. Left = 5
  154. Top = 170
  155. Width = 61
  156. Height = 23
  157. Margins.Left = 5
  158. Margins.Top = 5
  159. Margins.Right = 5
  160. Margins.Bottom = 5
  161. Caption = 'Density'
  162. end
  163. object lblFurDensity: TLabel
  164. Left = 502
  165. Top = 170
  166. Width = 26
  167. Height = 23
  168. Margins.Left = 5
  169. Margins.Top = 5
  170. Margins.Right = 5
  171. Margins.Bottom = 5
  172. Caption = '1.0'
  173. end
  174. object Label6: TLabel
  175. Left = 5
  176. Top = 408
  177. Width = 98
  178. Height = 23
  179. Margins.Left = 5
  180. Margins.Top = 5
  181. Margins.Right = 5
  182. Margins.Bottom = 5
  183. Caption = 'Light Power'
  184. end
  185. object lblFurLightPower: TLabel
  186. Left = 502
  187. Top = 408
  188. Width = 26
  189. Height = 23
  190. Margins.Left = 5
  191. Margins.Top = 5
  192. Margins.Right = 5
  193. Margins.Bottom = 5
  194. Caption = '2.5'
  195. end
  196. object Label8: TLabel
  197. Left = 5
  198. Top = 460
  199. Width = 98
  200. Height = 23
  201. Margins.Left = 5
  202. Margins.Top = 5
  203. Margins.Right = 5
  204. Margins.Bottom = 5
  205. Caption = 'Color Scale '
  206. end
  207. object Label9: TLabel
  208. Left = 5
  209. Top = 499
  210. Width = 117
  211. Height = 23
  212. Margins.Left = 5
  213. Margins.Top = 5
  214. Margins.Right = 5
  215. Margins.Bottom = 5
  216. Caption = 'Ambient Color'
  217. end
  218. object Shape1: TShape
  219. Left = 145
  220. Top = 459
  221. Width = 112
  222. Height = 26
  223. Margins.Left = 5
  224. Margins.Top = 5
  225. Margins.Right = 5
  226. Margins.Bottom = 5
  227. Pen.Width = 2
  228. OnMouseDown = Shape1MouseDown
  229. end
  230. object Shape2: TShape
  231. Left = 145
  232. Top = 495
  233. Width = 112
  234. Height = 27
  235. Margins.Left = 5
  236. Margins.Top = 5
  237. Margins.Right = 5
  238. Margins.Bottom = 5
  239. Pen.Width = 2
  240. OnMouseDown = Shape2MouseDown
  241. end
  242. object Label63: TLabel
  243. Left = 4
  244. Top = 226
  245. Width = 103
  246. Height = 23
  247. Margins.Left = 5
  248. Margins.Top = 5
  249. Margins.Right = 5
  250. Margins.Bottom = 5
  251. Caption = 'Gravity XYZ '
  252. end
  253. object chkFurShader: TCheckBox
  254. Left = 5
  255. Top = 5
  256. Width = 170
  257. Height = 30
  258. Margins.Left = 5
  259. Margins.Top = 5
  260. Margins.Right = 5
  261. Margins.Bottom = 5
  262. Caption = 'Enabled'
  263. TabOrder = 0
  264. OnClick = chkFurShaderClick
  265. end
  266. object tbFurLength: TTrackBar
  267. Left = 114
  268. Top = 86
  269. Width = 378
  270. Height = 45
  271. Margins.Left = 5
  272. Margins.Top = 5
  273. Margins.Right = 5
  274. Margins.Bottom = 5
  275. Max = 100
  276. Min = 1
  277. PageSize = 10
  278. Frequency = 10
  279. Position = 30
  280. TabOrder = 1
  281. ThumbLength = 35
  282. TickStyle = tsNone
  283. OnChange = tbFurLengthChange
  284. end
  285. object cbxFurBlendSrc: TComboBox
  286. Left = 126
  287. Top = 308
  288. Width = 221
  289. Height = 31
  290. Margins.Left = 5
  291. Margins.Top = 5
  292. Margins.Right = 5
  293. Margins.Bottom = 5
  294. Style = csDropDownList
  295. ItemIndex = 3
  296. TabOrder = 2
  297. Text = 'ONE MINUS SRC COLOR'
  298. OnChange = cbxFurBlendSrcChange
  299. Items.Strings = (
  300. 'ZERO'
  301. 'ONE'
  302. 'SRC COLOR'
  303. 'ONE MINUS SRC COLOR'
  304. 'DST COLOR'
  305. 'ONE MINUS DST COLOR'
  306. 'SRC ALPHA'
  307. 'MINUS SRC ALPHA'
  308. 'DST ALPHA'
  309. 'MINUS DST ALPHA'
  310. 'SRC ALPHA SATURATE'
  311. 'CONSTANT COLOR'
  312. 'ONE MINUS CONSTANT COLOR'
  313. 'CONSTANT ALPHA'
  314. 'ONE MINUS CONSTATNT ALPHA')
  315. end
  316. object cbxFurBlendDest: TComboBox
  317. Left = 126
  318. Top = 355
  319. Width = 221
  320. Height = 31
  321. Margins.Left = 5
  322. Margins.Top = 5
  323. Margins.Right = 5
  324. Margins.Bottom = 5
  325. Style = csDropDownList
  326. ItemIndex = 7
  327. TabOrder = 3
  328. Text = 'MINUS SRC ALPHA'
  329. OnChange = cbxFurBlendDestChange
  330. Items.Strings = (
  331. 'ZERO'
  332. 'ONE'
  333. 'SRC COLOR'
  334. 'ONE MINUS SRC COLOR'
  335. 'DST COLOR'
  336. 'ONE MINUS DST COLOR'
  337. 'SRC ALPHA'
  338. 'MINUS SRC ALPHA'
  339. 'DST ALPHA'
  340. 'MINUS DST ALPHA'
  341. 'SRC ALPHA SATURATE'
  342. 'CONSTANT COLOR'
  343. 'ONE MINUS CONSTANT COLOR'
  344. 'CONSTANT ALPHA'
  345. 'ONE MINUS CONSTATNT ALPHA')
  346. end
  347. object tbFurPassCount: TTrackBar
  348. Left = 114
  349. Top = 42
  350. Width = 378
  351. Height = 40
  352. Margins.Left = 5
  353. Margins.Top = 5
  354. Margins.Right = 5
  355. Margins.Bottom = 5
  356. Max = 200
  357. Min = 1
  358. PageSize = 10
  359. Frequency = 8
  360. Position = 16
  361. TabOrder = 4
  362. ThumbLength = 35
  363. TickStyle = tsNone
  364. OnChange = tbFurPassCountChange
  365. end
  366. object tbFurMaxLength: TTrackBar
  367. Left = 114
  368. Top = 126
  369. Width = 378
  370. Height = 46
  371. Margins.Left = 5
  372. Margins.Top = 5
  373. Margins.Right = 5
  374. Margins.Bottom = 5
  375. Max = 500
  376. Min = 1
  377. PageSize = 10
  378. Frequency = 10
  379. Position = 300
  380. TabOrder = 5
  381. ThumbLength = 35
  382. TickStyle = tsNone
  383. OnChange = tbFurMaxLengthChange
  384. end
  385. object chkFurRandomLength: TCheckBox
  386. Left = 228
  387. Top = 5
  388. Width = 253
  389. Height = 30
  390. Margins.Left = 5
  391. Margins.Top = 5
  392. Margins.Right = 5
  393. Margins.Bottom = 5
  394. Caption = 'Random Fur Length'
  395. TabOrder = 6
  396. OnClick = chkFurRandomLengthClick
  397. end
  398. object tbFurDensity: TTrackBar
  399. Left = 114
  400. Top = 165
  401. Width = 378
  402. Height = 45
  403. Margins.Left = 5
  404. Margins.Top = 5
  405. Margins.Right = 5
  406. Margins.Bottom = 5
  407. Max = 200
  408. Min = 1
  409. PageSize = 10
  410. Frequency = 10
  411. Position = 100
  412. TabOrder = 7
  413. ThumbLength = 35
  414. TickStyle = tsNone
  415. OnChange = tbFurDensityChange
  416. end
  417. object tbFurLightPower: TTrackBar
  418. Left = 114
  419. Top = 403
  420. Width = 378
  421. Height = 45
  422. Margins.Left = 5
  423. Margins.Top = 5
  424. Margins.Right = 5
  425. Margins.Bottom = 5
  426. Max = 1000
  427. Min = 1
  428. PageSize = 10
  429. Frequency = 10
  430. Position = 250
  431. TabOrder = 8
  432. ThumbLength = 35
  433. TickStyle = tsNone
  434. OnChange = tbFurLightPowerChange
  435. end
  436. object Button8: TButton
  437. Left = 5
  438. Top = 551
  439. Width = 219
  440. Height = 44
  441. Margins.Left = 5
  442. Margins.Top = 5
  443. Margins.Right = 5
  444. Margins.Bottom = 5
  445. Caption = 'Load Main Texture'
  446. TabOrder = 9
  447. OnClick = Button8Click
  448. end
  449. object Button9: TButton
  450. Left = 312
  451. Top = 551
  452. Width = 218
  453. Height = 44
  454. Margins.Left = 5
  455. Margins.Top = 5
  456. Margins.Right = 5
  457. Margins.Bottom = 5
  458. Caption = 'Load Noise Texture'
  459. TabOrder = 10
  460. OnClick = Button9Click
  461. end
  462. object edtFurGravityX: TEdit
  463. Left = 124
  464. Top = 217
  465. Width = 100
  466. Height = 31
  467. Margins.Left = 5
  468. Margins.Top = 5
  469. Margins.Right = 5
  470. Margins.Bottom = 5
  471. TabOrder = 11
  472. Text = '0.0'
  473. OnChange = edtFurGravityXChange
  474. OnKeyPress = EditFloatKeyPress
  475. end
  476. object edtFurGravityY: TEdit
  477. Left = 247
  478. Top = 217
  479. Width = 100
  480. Height = 31
  481. Margins.Left = 5
  482. Margins.Top = 5
  483. Margins.Right = 5
  484. Margins.Bottom = 5
  485. TabOrder = 12
  486. Text = '-2.0'
  487. OnChange = edtFurGravityYChange
  488. OnKeyPress = EditFloatKeyPress
  489. end
  490. object edtFurGravityZ: TEdit
  491. Left = 378
  492. Top = 217
  493. Width = 100
  494. Height = 31
  495. Margins.Left = 5
  496. Margins.Top = 5
  497. Margins.Right = 5
  498. Margins.Bottom = 5
  499. TabOrder = 13
  500. Text = '0.0'
  501. OnChange = edtFurGravityZChange
  502. OnKeyPress = EditFloatKeyPress
  503. end
  504. end
  505. object TabSheet2: TTabSheet
  506. Margins.Left = 5
  507. Margins.Top = 5
  508. Margins.Right = 5
  509. Margins.Bottom = 5
  510. Caption = 'Lattice'
  511. ImageIndex = 1
  512. object lblLatticeScaleX: TLabel
  513. Left = 509
  514. Top = 72
  515. Width = 20
  516. Height = 23
  517. Margins.Left = 5
  518. Margins.Top = 5
  519. Margins.Right = 5
  520. Margins.Bottom = 5
  521. Caption = '10'
  522. end
  523. object lblLatticeThresholdX: TLabel
  524. Left = 506
  525. Top = 163
  526. Width = 36
  527. Height = 23
  528. Margins.Left = 5
  529. Margins.Top = 5
  530. Margins.Right = 5
  531. Margins.Bottom = 5
  532. Caption = '0.15'
  533. end
  534. object lblLatticeScaleY: TLabel
  535. Left = 508
  536. Top = 117
  537. Width = 20
  538. Height = 23
  539. Margins.Left = 5
  540. Margins.Top = 5
  541. Margins.Right = 5
  542. Margins.Bottom = 5
  543. Caption = '40'
  544. end
  545. object Label4: TLabel
  546. Left = 28
  547. Top = 257
  548. Width = 130
  549. Height = 23
  550. Margins.Left = 5
  551. Margins.Top = 5
  552. Margins.Right = 5
  553. Margins.Bottom = 5
  554. Caption = 'Specular Power'
  555. end
  556. object Label5: TLabel
  557. Left = 28
  558. Top = 301
  559. Width = 98
  560. Height = 23
  561. Margins.Left = 5
  562. Margins.Top = 5
  563. Margins.Right = 5
  564. Margins.Bottom = 5
  565. Caption = 'Light Power'
  566. end
  567. object lblLatticeThresholdY: TLabel
  568. Left = 508
  569. Top = 207
  570. Width = 36
  571. Height = 23
  572. Margins.Left = 5
  573. Margins.Top = 5
  574. Margins.Right = 5
  575. Margins.Bottom = 5
  576. Caption = '0.30'
  577. end
  578. object lblLatticeSpecularPower: TLabel
  579. Left = 508
  580. Top = 257
  581. Width = 26
  582. Height = 23
  583. Margins.Left = 5
  584. Margins.Top = 5
  585. Margins.Right = 5
  586. Margins.Bottom = 5
  587. Caption = '8.0'
  588. end
  589. object lblLatticeLightPower: TLabel
  590. Left = 508
  591. Top = 303
  592. Width = 26
  593. Height = 23
  594. Margins.Left = 5
  595. Margins.Top = 5
  596. Margins.Right = 5
  597. Margins.Bottom = 5
  598. Caption = '1.0'
  599. end
  600. object Label23: TLabel
  601. Left = 18
  602. Top = 72
  603. Width = 61
  604. Height = 23
  605. Margins.Left = 5
  606. Margins.Top = 5
  607. Margins.Right = 5
  608. Margins.Bottom = 5
  609. Caption = 'Scale X'
  610. end
  611. object Label29: TLabel
  612. Left = 18
  613. Top = 117
  614. Width = 61
  615. Height = 23
  616. Margins.Left = 5
  617. Margins.Top = 5
  618. Margins.Right = 5
  619. Margins.Bottom = 5
  620. Caption = 'Scale Y'
  621. end
  622. object Label31: TLabel
  623. Left = 18
  624. Top = 163
  625. Width = 100
  626. Height = 23
  627. Margins.Left = 5
  628. Margins.Top = 5
  629. Margins.Right = 5
  630. Margins.Bottom = 5
  631. Caption = 'Threshold X'
  632. end
  633. object Label33: TLabel
  634. Left = 18
  635. Top = 214
  636. Width = 100
  637. Height = 23
  638. Margins.Left = 5
  639. Margins.Top = 5
  640. Margins.Right = 5
  641. Margins.Bottom = 5
  642. Caption = 'Threshold Y'
  643. end
  644. object Label35: TLabel
  645. Left = 18
  646. Top = 350
  647. Width = 106
  648. Height = 23
  649. Margins.Left = 5
  650. Margins.Top = 5
  651. Margins.Right = 5
  652. Margins.Bottom = 5
  653. Caption = 'Diffuse Color'
  654. end
  655. object Shape10: TShape
  656. Left = 158
  657. Top = 347
  658. Width = 112
  659. Height = 26
  660. Margins.Left = 5
  661. Margins.Top = 5
  662. Margins.Right = 5
  663. Margins.Bottom = 5
  664. Pen.Width = 2
  665. OnMouseDown = Shape10MouseDown
  666. end
  667. object Label38: TLabel
  668. Left = 18
  669. Top = 390
  670. Width = 117
  671. Height = 23
  672. Margins.Left = 5
  673. Margins.Top = 5
  674. Margins.Right = 5
  675. Margins.Bottom = 5
  676. Caption = 'Ambient Color'
  677. end
  678. object Shape11: TShape
  679. Left = 158
  680. Top = 389
  681. Width = 112
  682. Height = 26
  683. Margins.Left = 5
  684. Margins.Top = 5
  685. Margins.Right = 5
  686. Margins.Bottom = 5
  687. Brush.Color = 1381653
  688. Pen.Width = 2
  689. OnMouseDown = Shape11MouseDown
  690. end
  691. object Label39: TLabel
  692. Left = 18
  693. Top = 427
  694. Width = 121
  695. Height = 23
  696. Margins.Left = 5
  697. Margins.Top = 5
  698. Margins.Right = 5
  699. Margins.Bottom = 5
  700. Caption = 'Specular Color'
  701. end
  702. object Shape12: TShape
  703. Left = 158
  704. Top = 427
  705. Width = 112
  706. Height = 26
  707. Margins.Left = 5
  708. Margins.Top = 5
  709. Margins.Right = 5
  710. Margins.Bottom = 5
  711. Pen.Width = 2
  712. OnMouseDown = Shape12MouseDown
  713. end
  714. object tbLatticeScaleX: TTrackBar
  715. Left = 128
  716. Top = 65
  717. Width = 376
  718. Height = 52
  719. Margins.Left = 5
  720. Margins.Top = 5
  721. Margins.Right = 5
  722. Margins.Bottom = 5
  723. Max = 100
  724. Min = 1
  725. PageSize = 10
  726. Frequency = 10
  727. Position = 10
  728. TabOrder = 0
  729. ThumbLength = 35
  730. TickStyle = tsNone
  731. OnChange = tbLatticeScaleXChange
  732. end
  733. object tbLatticeThresholdX: TTrackBar
  734. Left = 128
  735. Top = 156
  736. Width = 376
  737. Height = 47
  738. Margins.Left = 5
  739. Margins.Top = 5
  740. Margins.Right = 5
  741. Margins.Bottom = 5
  742. Max = 100
  743. Min = 1
  744. PageSize = 10
  745. Frequency = 10
  746. Position = 15
  747. TabOrder = 1
  748. ThumbLength = 35
  749. TickStyle = tsNone
  750. OnChange = tbLatticeThresholdXChange
  751. end
  752. object chkLatticeShader: TCheckBox
  753. Left = 28
  754. Top = 21
  755. Width = 170
  756. Height = 30
  757. Margins.Left = 5
  758. Margins.Top = 5
  759. Margins.Right = 5
  760. Margins.Bottom = 5
  761. Caption = 'Enabled'
  762. TabOrder = 2
  763. OnClick = chkLatticeShaderClick
  764. end
  765. object tbLatticeScaleY: TTrackBar
  766. Left = 128
  767. Top = 110
  768. Width = 376
  769. Height = 56
  770. Margins.Left = 5
  771. Margins.Top = 5
  772. Margins.Right = 5
  773. Margins.Bottom = 5
  774. Max = 100
  775. Min = 1
  776. PageSize = 10
  777. Frequency = 10
  778. Position = 40
  779. TabOrder = 3
  780. ThumbLength = 35
  781. TickStyle = tsNone
  782. OnChange = tbLatticeScaleYChange
  783. end
  784. object tbLatticeThresholdY: TTrackBar
  785. Left = 128
  786. Top = 200
  787. Width = 369
  788. Height = 47
  789. Margins.Left = 5
  790. Margins.Top = 5
  791. Margins.Right = 5
  792. Margins.Bottom = 5
  793. Max = 100
  794. Min = 1
  795. PageSize = 10
  796. Frequency = 10
  797. Position = 30
  798. TabOrder = 4
  799. ThumbLength = 35
  800. TickStyle = tsNone
  801. OnChange = tbLatticeThresholdYChange
  802. end
  803. object tbLatticeSpecularPower: TTrackBar
  804. Left = 168
  805. Top = 250
  806. Width = 329
  807. Height = 56
  808. Margins.Left = 5
  809. Margins.Top = 5
  810. Margins.Right = 5
  811. Margins.Bottom = 5
  812. Max = 1000
  813. PageSize = 10
  814. Frequency = 10
  815. Position = 800
  816. TabOrder = 5
  817. ThumbLength = 35
  818. TickStyle = tsNone
  819. OnChange = tbLatticeSpecularPowerChange
  820. end
  821. object tbLatticeLightPower: TTrackBar
  822. Left = 168
  823. Top = 291
  824. Width = 329
  825. Height = 56
  826. Margins.Left = 5
  827. Margins.Top = 5
  828. Margins.Right = 5
  829. Margins.Bottom = 5
  830. Max = 500
  831. PageSize = 10
  832. Frequency = 10
  833. Position = 100
  834. TabOrder = 6
  835. ThumbLength = 35
  836. TickStyle = tsNone
  837. OnChange = tbLatticeLightPowerChange
  838. end
  839. object Button7: TButton
  840. Left = 28
  841. Top = 481
  842. Width = 322
  843. Height = 44
  844. Margins.Left = 5
  845. Margins.Top = 5
  846. Margins.Right = 5
  847. Margins.Bottom = 5
  848. Caption = 'Load Main Texture'
  849. TabOrder = 7
  850. OnClick = Button3Click
  851. end
  852. end
  853. object TabSheet3: TTabSheet
  854. Margins.Left = 5
  855. Margins.Top = 5
  856. Margins.Right = 5
  857. Margins.Bottom = 5
  858. Caption = 'Erosion'
  859. ImageIndex = 2
  860. object Label1: TLabel
  861. Left = 14
  862. Top = 81
  863. Width = 115
  864. Height = 23
  865. Margins.Left = 5
  866. Margins.Top = 5
  867. Margins.Right = 5
  868. Margins.Bottom = 5
  869. Caption = 'Erosion factor'
  870. end
  871. object lblErosionFactor: TLabel
  872. Left = 516
  873. Top = 82
  874. Width = 36
  875. Height = 23
  876. Margins.Left = 5
  877. Margins.Top = 5
  878. Margins.Right = 5
  879. Margins.Bottom = 5
  880. Caption = '0.35'
  881. end
  882. object Label3: TLabel
  883. Left = 14
  884. Top = 138
  885. Width = 111
  886. Height = 23
  887. Margins.Left = 5
  888. Margins.Top = 5
  889. Margins.Right = 5
  890. Margins.Bottom = 5
  891. Caption = 'Erosion Scale'
  892. end
  893. object lblErosionScale: TLabel
  894. Left = 516
  895. Top = 138
  896. Width = 36
  897. Height = 23
  898. Margins.Left = 5
  899. Margins.Top = 5
  900. Margins.Right = 5
  901. Margins.Bottom = 5
  902. Caption = '0.03'
  903. end
  904. object Label25: TLabel
  905. Left = 14
  906. Top = 194
  907. Width = 142
  908. Height = 23
  909. Margins.Left = 5
  910. Margins.Top = 5
  911. Margins.Right = 5
  912. Margins.Bottom = 5
  913. Caption = 'Intensity factor 1'
  914. end
  915. object lblErosionIFactor1: TLabel
  916. Left = 516
  917. Top = 194
  918. Width = 36
  919. Height = 23
  920. Margins.Left = 5
  921. Margins.Top = 5
  922. Margins.Right = 5
  923. Margins.Bottom = 5
  924. Caption = '0.75'
  925. end
  926. object Label28: TLabel
  927. Left = 14
  928. Top = 249
  929. Width = 146
  930. Height = 23
  931. Margins.Left = 5
  932. Margins.Top = 5
  933. Margins.Right = 5
  934. Margins.Bottom = 5
  935. Caption = 'Intensity Factor 2'
  936. end
  937. object lblerosionIFactor2: TLabel
  938. Left = 516
  939. Top = 250
  940. Width = 36
  941. Height = 23
  942. Margins.Left = 5
  943. Margins.Top = 5
  944. Margins.Right = 5
  945. Margins.Bottom = 5
  946. Caption = '1.95'
  947. end
  948. object Label2: TLabel
  949. Left = 14
  950. Top = 350
  951. Width = 123
  952. Height = 23
  953. Margins.Left = 5
  954. Margins.Top = 5
  955. Margins.Right = 5
  956. Margins.Bottom = 5
  957. Caption = 'Ambient factor'
  958. end
  959. object lblErosionAmbientF: TLabel
  960. Left = 516
  961. Top = 350
  962. Width = 36
  963. Height = 23
  964. Margins.Left = 5
  965. Margins.Top = 5
  966. Margins.Right = 5
  967. Margins.Bottom = 5
  968. Caption = '0.80'
  969. end
  970. object Label27: TLabel
  971. Left = 14
  972. Top = 301
  973. Width = 112
  974. Height = 23
  975. Margins.Left = 5
  976. Margins.Top = 5
  977. Margins.Right = 5
  978. Margins.Bottom = 5
  979. Caption = 'Diffuse factor'
  980. end
  981. object lblErosionDiffuseF: TLabel
  982. Left = 516
  983. Top = 303
  984. Width = 36
  985. Height = 23
  986. Margins.Left = 5
  987. Margins.Top = 5
  988. Margins.Right = 5
  989. Margins.Bottom = 5
  990. Caption = '0.90'
  991. end
  992. object Label30: TLabel
  993. Left = 14
  994. Top = 399
  995. Width = 127
  996. Height = 23
  997. Margins.Left = 5
  998. Margins.Top = 5
  999. Margins.Right = 5
  1000. Margins.Bottom = 5
  1001. Caption = 'Specular factor'
  1002. end
  1003. object lblErosionSpecularF: TLabel
  1004. Left = 516
  1005. Top = 399
  1006. Width = 36
  1007. Height = 23
  1008. Margins.Left = 5
  1009. Margins.Top = 5
  1010. Margins.Right = 5
  1011. Margins.Bottom = 5
  1012. Caption = '0.90'
  1013. end
  1014. object Label32: TLabel
  1015. Left = 14
  1016. Top = 455
  1017. Width = 171
  1018. Height = 23
  1019. Margins.Left = 5
  1020. Margins.Top = 5
  1021. Margins.Right = 5
  1022. Margins.Bottom = 5
  1023. Caption = 'Specular Roughness'
  1024. end
  1025. object lblErosionSpecularR: TLabel
  1026. Left = 520
  1027. Top = 455
  1028. Width = 36
  1029. Height = 23
  1030. Margins.Left = 5
  1031. Margins.Top = 5
  1032. Margins.Right = 5
  1033. Margins.Bottom = 5
  1034. Caption = '0.45'
  1035. end
  1036. object Label34: TLabel
  1037. Left = 14
  1038. Top = 511
  1039. Width = 189
  1040. Height = 23
  1041. Margins.Left = 5
  1042. Margins.Top = 5
  1043. Margins.Right = 5
  1044. Margins.Bottom = 5
  1045. Caption = 'Anisotropic Roughness'
  1046. end
  1047. object lblErosionAnisoR: TLabel
  1048. Left = 520
  1049. Top = 511
  1050. Width = 36
  1051. Height = 23
  1052. Margins.Left = 5
  1053. Margins.Top = 5
  1054. Margins.Right = 5
  1055. Margins.Bottom = 5
  1056. Caption = '0.35'
  1057. end
  1058. object Label36: TLabel
  1059. Left = 11
  1060. Top = 572
  1061. Width = 117
  1062. Height = 23
  1063. Margins.Left = 5
  1064. Margins.Top = 5
  1065. Margins.Right = 5
  1066. Margins.Bottom = 5
  1067. Caption = 'Ambient Color'
  1068. end
  1069. object shAmbientErosion: TShape
  1070. Left = 151
  1071. Top = 569
  1072. Width = 112
  1073. Height = 26
  1074. Margins.Left = 5
  1075. Margins.Top = 5
  1076. Margins.Right = 5
  1077. Margins.Bottom = 5
  1078. Brush.Color = 2105376
  1079. Pen.Width = 2
  1080. OnMouseDown = shAmbientErosionMouseDown
  1081. end
  1082. object shSpecularErosion: TShape
  1083. Left = 151
  1084. Top = 606
  1085. Width = 112
  1086. Height = 26
  1087. Margins.Left = 5
  1088. Margins.Top = 5
  1089. Margins.Right = 5
  1090. Margins.Bottom = 5
  1091. Brush.Color = 14540253
  1092. Pen.Width = 2
  1093. OnMouseDown = shSpecularErosionMouseDown
  1094. end
  1095. object Label37: TLabel
  1096. Left = 11
  1097. Top = 606
  1098. Width = 121
  1099. Height = 23
  1100. Margins.Left = 5
  1101. Margins.Top = 5
  1102. Margins.Right = 5
  1103. Margins.Bottom = 5
  1104. Caption = 'Specular Color'
  1105. end
  1106. object chkErosionShader: TCheckBox
  1107. Left = 42
  1108. Top = 35
  1109. Width = 170
  1110. Height = 30
  1111. Margins.Left = 5
  1112. Margins.Top = 5
  1113. Margins.Right = 5
  1114. Margins.Bottom = 5
  1115. Caption = 'Enabled'
  1116. TabOrder = 0
  1117. OnClick = chkErosionShaderClick
  1118. end
  1119. object tbErosionFactor: TTrackBar
  1120. Left = 172
  1121. Top = 75
  1122. Width = 334
  1123. Height = 46
  1124. Margins.Left = 5
  1125. Margins.Top = 5
  1126. Margins.Right = 5
  1127. Margins.Bottom = 5
  1128. Max = 100
  1129. Min = 1
  1130. PageSize = 10
  1131. Frequency = 10
  1132. Position = 35
  1133. TabOrder = 1
  1134. ThumbLength = 35
  1135. TickStyle = tsNone
  1136. OnChange = tbErosionFactorChange
  1137. end
  1138. object tberosionScale: TTrackBar
  1139. Left = 172
  1140. Top = 131
  1141. Width = 334
  1142. Height = 46
  1143. Margins.Left = 5
  1144. Margins.Top = 5
  1145. Margins.Right = 5
  1146. Margins.Bottom = 5
  1147. Max = 100
  1148. Min = 1
  1149. PageSize = 10
  1150. Frequency = 10
  1151. Position = 3
  1152. TabOrder = 2
  1153. ThumbLength = 35
  1154. TickStyle = tsNone
  1155. OnChange = tberosionScaleChange
  1156. end
  1157. object tbErosionIFactor1: TTrackBar
  1158. Left = 172
  1159. Top = 187
  1160. Width = 334
  1161. Height = 46
  1162. Margins.Left = 5
  1163. Margins.Top = 5
  1164. Margins.Right = 5
  1165. Margins.Bottom = 5
  1166. Max = 200
  1167. Min = 1
  1168. PageSize = 10
  1169. Frequency = 10
  1170. Position = 75
  1171. TabOrder = 3
  1172. ThumbLength = 35
  1173. TickStyle = tsNone
  1174. OnChange = tbErosionIFactor1Change
  1175. end
  1176. object tbErosionIFactor2: TTrackBar
  1177. Left = 175
  1178. Top = 243
  1179. Width = 331
  1180. Height = 46
  1181. Margins.Left = 5
  1182. Margins.Top = 5
  1183. Margins.Right = 5
  1184. Margins.Bottom = 5
  1185. Max = 200
  1186. Min = 1
  1187. PageSize = 10
  1188. Frequency = 10
  1189. Position = 195
  1190. TabOrder = 4
  1191. ThumbLength = 35
  1192. TickStyle = tsNone
  1193. OnChange = tbErosionIFactor2Change
  1194. end
  1195. object tbErosionAmbientF: TTrackBar
  1196. Left = 172
  1197. Top = 340
  1198. Width = 334
  1199. Height = 49
  1200. Margins.Left = 5
  1201. Margins.Top = 5
  1202. Margins.Right = 5
  1203. Margins.Bottom = 5
  1204. Max = 100
  1205. PageSize = 10
  1206. Frequency = 10
  1207. Position = 80
  1208. TabOrder = 5
  1209. ThumbLength = 35
  1210. TickStyle = tsNone
  1211. OnChange = tbErosionAmbientFChange
  1212. end
  1213. object tbErosionDiffuseF: TTrackBar
  1214. Left = 173
  1215. Top = 296
  1216. Width = 333
  1217. Height = 45
  1218. Margins.Left = 5
  1219. Margins.Top = 5
  1220. Margins.Right = 5
  1221. Margins.Bottom = 5
  1222. Max = 100
  1223. PageSize = 10
  1224. Frequency = 10
  1225. Position = 90
  1226. TabOrder = 6
  1227. ThumbLength = 35
  1228. TickStyle = tsNone
  1229. OnChange = tbErosionDiffuseFChange
  1230. end
  1231. object tbErosionSpecularF: TTrackBar
  1232. Left = 172
  1233. Top = 392
  1234. Width = 334
  1235. Height = 46
  1236. Margins.Left = 5
  1237. Margins.Top = 5
  1238. Margins.Right = 5
  1239. Margins.Bottom = 5
  1240. Max = 100
  1241. PageSize = 10
  1242. Frequency = 10
  1243. Position = 90
  1244. TabOrder = 7
  1245. ThumbLength = 35
  1246. TickStyle = tsNone
  1247. OnChange = tbErosionSpecularFChange
  1248. end
  1249. object tbErosionSpecularR: TTrackBar
  1250. Left = 194
  1251. Top = 448
  1252. Width = 315
  1253. Height = 46
  1254. Margins.Left = 5
  1255. Margins.Top = 5
  1256. Margins.Right = 5
  1257. Margins.Bottom = 5
  1258. Max = 500
  1259. PageSize = 10
  1260. Frequency = 10
  1261. Position = 45
  1262. TabOrder = 8
  1263. ThumbLength = 35
  1264. TickStyle = tsNone
  1265. OnChange = tbErosionSpecularRChange
  1266. end
  1267. object tbErosionAnisoR: TTrackBar
  1268. Left = 215
  1269. Top = 504
  1270. Width = 291
  1271. Height = 46
  1272. Margins.Left = 5
  1273. Margins.Top = 5
  1274. Margins.Right = 5
  1275. Margins.Bottom = 5
  1276. Max = 500
  1277. PageSize = 10
  1278. Frequency = 10
  1279. Position = 35
  1280. TabOrder = 9
  1281. ThumbLength = 35
  1282. TickStyle = tsNone
  1283. OnChange = tbErosionAnisoRChange
  1284. end
  1285. object Button5: TButton
  1286. Left = 275
  1287. Top = 606
  1288. Width = 299
  1289. Height = 33
  1290. Margins.Left = 5
  1291. Margins.Top = 5
  1292. Margins.Right = 5
  1293. Margins.Bottom = 5
  1294. Caption = 'Load Main Texture'
  1295. TabOrder = 10
  1296. OnClick = Button5Click
  1297. end
  1298. object Button6: TButton
  1299. Left = 5
  1300. Top = 697
  1301. Width = 322
  1302. Height = 43
  1303. Margins.Left = 5
  1304. Margins.Top = 5
  1305. Margins.Right = 5
  1306. Margins.Bottom = 5
  1307. Caption = 'Load Erosion Texture'
  1308. TabOrder = 11
  1309. OnClick = Button6Click
  1310. end
  1311. end
  1312. object TabSheet4: TTabSheet
  1313. Margins.Left = 5
  1314. Margins.Top = 5
  1315. Margins.Right = 5
  1316. Margins.Bottom = 5
  1317. Caption = 'Ivory'
  1318. ImageIndex = 3
  1319. object chkIvoryShader: TCheckBox
  1320. Left = 28
  1321. Top = 28
  1322. Width = 170
  1323. Height = 30
  1324. Margins.Left = 5
  1325. Margins.Top = 5
  1326. Margins.Right = 5
  1327. Margins.Bottom = 5
  1328. Caption = 'Enabled'
  1329. TabOrder = 0
  1330. OnClick = chkIvoryShaderClick
  1331. end
  1332. end
  1333. object TabSheet5: TTabSheet
  1334. Margins.Left = 5
  1335. Margins.Top = 5
  1336. Margins.Right = 5
  1337. Margins.Bottom = 5
  1338. Caption = 'Gootch'
  1339. ImageIndex = 4
  1340. object Label13: TLabel
  1341. Left = 28
  1342. Top = 82
  1343. Width = 106
  1344. Height = 23
  1345. Margins.Left = 5
  1346. Margins.Top = 5
  1347. Margins.Right = 5
  1348. Margins.Bottom = 5
  1349. Caption = 'Diffuse Color'
  1350. end
  1351. object Shape3: TShape
  1352. Left = 168
  1353. Top = 81
  1354. Width = 112
  1355. Height = 26
  1356. Margins.Left = 5
  1357. Margins.Top = 5
  1358. Margins.Right = 5
  1359. Margins.Bottom = 5
  1360. Brush.Color = clSilver
  1361. Pen.Width = 2
  1362. OnMouseDown = Shape3MouseDown
  1363. end
  1364. object Label14: TLabel
  1365. Left = 28
  1366. Top = 117
  1367. Width = 98
  1368. Height = 23
  1369. Margins.Left = 5
  1370. Margins.Top = 5
  1371. Margins.Right = 5
  1372. Margins.Bottom = 5
  1373. Caption = 'Warm Color'
  1374. end
  1375. object Shape4: TShape
  1376. Left = 168
  1377. Top = 117
  1378. Width = 112
  1379. Height = 27
  1380. Margins.Left = 5
  1381. Margins.Top = 5
  1382. Margins.Right = 5
  1383. Margins.Bottom = 5
  1384. Brush.Color = clFuchsia
  1385. Pen.Width = 2
  1386. OnMouseDown = Shape4MouseDown
  1387. end
  1388. object Label15: TLabel
  1389. Left = 28
  1390. Top = 154
  1391. Width = 83
  1392. Height = 23
  1393. Margins.Left = 5
  1394. Margins.Top = 5
  1395. Margins.Right = 5
  1396. Margins.Bottom = 5
  1397. Caption = 'Cool Color'
  1398. end
  1399. object Shape5: TShape
  1400. Left = 168
  1401. Top = 154
  1402. Width = 112
  1403. Height = 26
  1404. Margins.Left = 5
  1405. Margins.Top = 5
  1406. Margins.Right = 5
  1407. Margins.Bottom = 5
  1408. Brush.Color = 1145343
  1409. Pen.Width = 2
  1410. OnMouseDown = Shape5MouseDown
  1411. end
  1412. object Label16: TLabel
  1413. Left = 28
  1414. Top = 193
  1415. Width = 117
  1416. Height = 23
  1417. Margins.Left = 5
  1418. Margins.Top = 5
  1419. Margins.Right = 5
  1420. Margins.Bottom = 5
  1421. Caption = 'Ambient Color'
  1422. end
  1423. object Shape6: TShape
  1424. Left = 168
  1425. Top = 191
  1426. Width = 112
  1427. Height = 26
  1428. Margins.Left = 5
  1429. Margins.Top = 5
  1430. Margins.Right = 5
  1431. Margins.Bottom = 5
  1432. Brush.Color = 3158064
  1433. Pen.Width = 2
  1434. OnMouseDown = Shape6MouseDown
  1435. end
  1436. object Label17: TLabel
  1437. Left = 28
  1438. Top = 229
  1439. Width = 121
  1440. Height = 23
  1441. Margins.Left = 5
  1442. Margins.Top = 5
  1443. Margins.Right = 5
  1444. Margins.Bottom = 5
  1445. Caption = 'Specular Color'
  1446. end
  1447. object Shape7: TShape
  1448. Left = 168
  1449. Top = 228
  1450. Width = 112
  1451. Height = 26
  1452. Margins.Left = 5
  1453. Margins.Top = 5
  1454. Margins.Right = 5
  1455. Margins.Bottom = 5
  1456. Pen.Width = 2
  1457. OnMouseDown = Shape7MouseDown
  1458. end
  1459. object Label18: TLabel
  1460. Left = 28
  1461. Top = 285
  1462. Width = 112
  1463. Height = 23
  1464. Margins.Left = 5
  1465. Margins.Top = 5
  1466. Margins.Right = 5
  1467. Margins.Bottom = 5
  1468. Caption = 'Diffuse factor'
  1469. end
  1470. object lblGoochDFactor: TLabel
  1471. Left = 530
  1472. Top = 287
  1473. Width = 36
  1474. Height = 23
  1475. Margins.Left = 5
  1476. Margins.Top = 5
  1477. Margins.Right = 5
  1478. Margins.Bottom = 5
  1479. Caption = '0.80'
  1480. end
  1481. object Label20: TLabel
  1482. Left = 28
  1483. Top = 341
  1484. Width = 104
  1485. Height = 23
  1486. Margins.Left = 5
  1487. Margins.Top = 5
  1488. Margins.Right = 5
  1489. Margins.Bottom = 5
  1490. Caption = 'Warm factor'
  1491. end
  1492. object lblGoochWFactor: TLabel
  1493. Left = 530
  1494. Top = 343
  1495. Width = 36
  1496. Height = 23
  1497. Margins.Left = 5
  1498. Margins.Top = 5
  1499. Margins.Right = 5
  1500. Margins.Bottom = 5
  1501. Caption = '0.55'
  1502. end
  1503. object Label22: TLabel
  1504. Left = 28
  1505. Top = 397
  1506. Width = 89
  1507. Height = 23
  1508. Margins.Left = 5
  1509. Margins.Top = 5
  1510. Margins.Right = 5
  1511. Margins.Bottom = 5
  1512. Caption = 'Cool factor'
  1513. end
  1514. object lblGoochCFactor: TLabel
  1515. Left = 530
  1516. Top = 399
  1517. Width = 36
  1518. Height = 23
  1519. Margins.Left = 5
  1520. Margins.Top = 5
  1521. Margins.Right = 5
  1522. Margins.Bottom = 5
  1523. Caption = '0.30'
  1524. end
  1525. object Label24: TLabel
  1526. Left = 28
  1527. Top = 453
  1528. Width = 123
  1529. Height = 23
  1530. Margins.Left = 5
  1531. Margins.Top = 5
  1532. Margins.Right = 5
  1533. Margins.Bottom = 5
  1534. Caption = 'Ambient factor'
  1535. end
  1536. object lblGoochAFactor: TLabel
  1537. Left = 530
  1538. Top = 455
  1539. Width = 26
  1540. Height = 23
  1541. Margins.Left = 5
  1542. Margins.Top = 5
  1543. Margins.Right = 5
  1544. Margins.Bottom = 5
  1545. Caption = '1.0'
  1546. end
  1547. object Label26: TLabel
  1548. Left = 28
  1549. Top = 511
  1550. Width = 127
  1551. Height = 23
  1552. Margins.Left = 5
  1553. Margins.Top = 5
  1554. Margins.Right = 5
  1555. Margins.Bottom = 5
  1556. Caption = 'Specular factor'
  1557. end
  1558. object lblGoochSFactor: TLabel
  1559. Left = 530
  1560. Top = 511
  1561. Width = 36
  1562. Height = 23
  1563. Margins.Left = 5
  1564. Margins.Top = 5
  1565. Margins.Right = 5
  1566. Margins.Bottom = 5
  1567. Caption = '0.90'
  1568. end
  1569. object Label40: TLabel
  1570. Left = 28
  1571. Top = 565
  1572. Width = 99
  1573. Height = 23
  1574. Margins.Left = 5
  1575. Margins.Top = 5
  1576. Margins.Right = 5
  1577. Margins.Bottom = 5
  1578. Caption = 'Blend Mode'
  1579. end
  1580. object Label41: TLabel
  1581. Left = 287
  1582. Top = 82
  1583. Width = 47
  1584. Height = 23
  1585. Margins.Left = 5
  1586. Margins.Top = 5
  1587. Margins.Right = 5
  1588. Margins.Bottom = 5
  1589. Caption = 'Alpha'
  1590. end
  1591. object lblGoochAlpha: TLabel
  1592. Left = 541
  1593. Top = 82
  1594. Width = 26
  1595. Height = 23
  1596. Margins.Left = 5
  1597. Margins.Top = 5
  1598. Margins.Right = 5
  1599. Margins.Bottom = 5
  1600. Caption = '1.0'
  1601. end
  1602. object chkGoochShader: TCheckBox
  1603. Left = 28
  1604. Top = 28
  1605. Width = 170
  1606. Height = 30
  1607. Margins.Left = 5
  1608. Margins.Top = 5
  1609. Margins.Right = 5
  1610. Margins.Bottom = 5
  1611. Caption = 'Enabled'
  1612. TabOrder = 0
  1613. OnClick = chkGoochShaderClick
  1614. end
  1615. object tbGoochDFactor: TTrackBar
  1616. Left = 168
  1617. Top = 280
  1618. Width = 352
  1619. Height = 46
  1620. Margins.Left = 5
  1621. Margins.Top = 5
  1622. Margins.Right = 5
  1623. Margins.Bottom = 5
  1624. Max = 500
  1625. Min = 1
  1626. PageSize = 10
  1627. Frequency = 10
  1628. Position = 80
  1629. TabOrder = 1
  1630. ThumbLength = 35
  1631. TickStyle = tsNone
  1632. OnChange = tbGoochDFactorChange
  1633. end
  1634. object tbGoochWFactor: TTrackBar
  1635. Left = 168
  1636. Top = 336
  1637. Width = 352
  1638. Height = 46
  1639. Margins.Left = 5
  1640. Margins.Top = 5
  1641. Margins.Right = 5
  1642. Margins.Bottom = 5
  1643. Max = 500
  1644. Min = 1
  1645. PageSize = 10
  1646. Frequency = 10
  1647. Position = 55
  1648. TabOrder = 2
  1649. ThumbLength = 35
  1650. TickStyle = tsNone
  1651. OnChange = tbGoochWFactorChange
  1652. end
  1653. object tbGoochCFactor: TTrackBar
  1654. Left = 168
  1655. Top = 392
  1656. Width = 352
  1657. Height = 46
  1658. Margins.Left = 5
  1659. Margins.Top = 5
  1660. Margins.Right = 5
  1661. Margins.Bottom = 5
  1662. Max = 500
  1663. Min = 1
  1664. PageSize = 10
  1665. Frequency = 10
  1666. Position = 30
  1667. TabOrder = 3
  1668. ThumbLength = 35
  1669. TickStyle = tsNone
  1670. OnChange = tbGoochCFactorChange
  1671. end
  1672. object tbGoochAFactor: TTrackBar
  1673. Left = 168
  1674. Top = 448
  1675. Width = 352
  1676. Height = 46
  1677. Margins.Left = 5
  1678. Margins.Top = 5
  1679. Margins.Right = 5
  1680. Margins.Bottom = 5
  1681. Max = 500
  1682. Min = 1
  1683. PageSize = 10
  1684. Frequency = 10
  1685. Position = 100
  1686. TabOrder = 4
  1687. ThumbLength = 35
  1688. TickStyle = tsNone
  1689. OnChange = tbGoochAFactorChange
  1690. end
  1691. object tbGoochSFactor: TTrackBar
  1692. Left = 168
  1693. Top = 504
  1694. Width = 352
  1695. Height = 46
  1696. Margins.Left = 5
  1697. Margins.Top = 5
  1698. Margins.Right = 5
  1699. Margins.Bottom = 5
  1700. Max = 500
  1701. Min = 1
  1702. PageSize = 10
  1703. Frequency = 10
  1704. Position = 90
  1705. TabOrder = 5
  1706. ThumbLength = 35
  1707. TickStyle = tsNone
  1708. OnChange = tbGoochSFactorChange
  1709. end
  1710. object cbxGootchBlendMode: TComboBox
  1711. Left = 182
  1712. Top = 560
  1713. Width = 338
  1714. Height = 31
  1715. Margins.Left = 5
  1716. Margins.Top = 5
  1717. Margins.Right = 5
  1718. Margins.Bottom = 5
  1719. Style = csDropDownList
  1720. ItemIndex = 0
  1721. TabOrder = 6
  1722. Text = 'Opaque'
  1723. OnChange = cbxGootchBlendModeChange
  1724. Items.Strings = (
  1725. 'Opaque'
  1726. 'Transparency'
  1727. 'Additive'
  1728. 'AlphaTest50'
  1729. 'AlphaTest100'
  1730. 'Modulate'
  1731. 'DestColorOne'
  1732. 'DestAlphaOne')
  1733. end
  1734. object tbGoochAlpha: TTrackBar
  1735. Left = 343
  1736. Top = 77
  1737. Width = 200
  1738. Height = 46
  1739. Margins.Left = 5
  1740. Margins.Top = 5
  1741. Margins.Right = 5
  1742. Margins.Bottom = 5
  1743. Max = 100
  1744. PageSize = 10
  1745. Frequency = 10
  1746. Position = 100
  1747. TabOrder = 7
  1748. ThumbLength = 35
  1749. TickStyle = tsNone
  1750. OnChange = tbGoochAlphaChange
  1751. end
  1752. end
  1753. object TabSheet6: TTabSheet
  1754. Margins.Left = 5
  1755. Margins.Top = 5
  1756. Margins.Right = 5
  1757. Margins.Bottom = 5
  1758. Caption = 'S.E.M'
  1759. ImageIndex = 5
  1760. object Label19: TLabel
  1761. Left = 28
  1762. Top = 77
  1763. Width = 112
  1764. Height = 23
  1765. Margins.Left = 5
  1766. Margins.Top = 5
  1767. Margins.Right = 5
  1768. Margins.Bottom = 5
  1769. Caption = 'Diffuse factor'
  1770. end
  1771. object lblSemDiffuseF: TLabel
  1772. Left = 530
  1773. Top = 79
  1774. Width = 36
  1775. Height = 23
  1776. Margins.Left = 5
  1777. Margins.Top = 5
  1778. Margins.Right = 5
  1779. Margins.Bottom = 5
  1780. Caption = '0.90'
  1781. end
  1782. object Label42: TLabel
  1783. Left = 28
  1784. Top = 126
  1785. Width = 123
  1786. Height = 23
  1787. Margins.Left = 5
  1788. Margins.Top = 5
  1789. Margins.Right = 5
  1790. Margins.Bottom = 5
  1791. Caption = 'Ambient factor'
  1792. end
  1793. object lblSemAmbientF: TLabel
  1794. Left = 530
  1795. Top = 124
  1796. Width = 36
  1797. Height = 23
  1798. Margins.Left = 5
  1799. Margins.Top = 5
  1800. Margins.Right = 5
  1801. Margins.Bottom = 5
  1802. Caption = '0.80'
  1803. end
  1804. object Label44: TLabel
  1805. Left = 28
  1806. Top = 175
  1807. Width = 127
  1808. Height = 23
  1809. Margins.Left = 5
  1810. Margins.Top = 5
  1811. Margins.Right = 5
  1812. Margins.Bottom = 5
  1813. Caption = 'Specular factor'
  1814. end
  1815. object lblSemSpecularF: TLabel
  1816. Left = 530
  1817. Top = 175
  1818. Width = 36
  1819. Height = 23
  1820. Margins.Left = 5
  1821. Margins.Top = 5
  1822. Margins.Right = 5
  1823. Margins.Bottom = 5
  1824. Caption = '0.90'
  1825. end
  1826. object Label46: TLabel
  1827. Left = 25
  1828. Top = 228
  1829. Width = 117
  1830. Height = 23
  1831. Margins.Left = 5
  1832. Margins.Top = 5
  1833. Margins.Right = 5
  1834. Margins.Bottom = 5
  1835. Caption = 'Ambient Color'
  1836. end
  1837. object Shape13: TShape
  1838. Left = 165
  1839. Top = 224
  1840. Width = 112
  1841. Height = 26
  1842. Margins.Left = 5
  1843. Margins.Top = 5
  1844. Margins.Right = 5
  1845. Margins.Bottom = 5
  1846. Brush.Color = 2105376
  1847. Pen.Width = 2
  1848. OnMouseDown = Shape13MouseDown
  1849. end
  1850. object Label47: TLabel
  1851. Left = 25
  1852. Top = 261
  1853. Width = 121
  1854. Height = 23
  1855. Margins.Left = 5
  1856. Margins.Top = 5
  1857. Margins.Right = 5
  1858. Margins.Bottom = 5
  1859. Caption = 'Specular Color'
  1860. end
  1861. object Shape14: TShape
  1862. Left = 165
  1863. Top = 261
  1864. Width = 112
  1865. Height = 26
  1866. Margins.Left = 5
  1867. Margins.Top = 5
  1868. Margins.Right = 5
  1869. Margins.Bottom = 5
  1870. Brush.Color = 14540253
  1871. Pen.Width = 2
  1872. OnMouseDown = Shape14MouseDown
  1873. end
  1874. object tbSemDiffuseF: TTrackBar
  1875. Left = 187
  1876. Top = 68
  1877. Width = 333
  1878. Height = 46
  1879. Margins.Left = 5
  1880. Margins.Top = 5
  1881. Margins.Right = 5
  1882. Margins.Bottom = 5
  1883. Max = 100
  1884. PageSize = 10
  1885. Frequency = 10
  1886. Position = 90
  1887. TabOrder = 0
  1888. ThumbLength = 35
  1889. TickStyle = tsNone
  1890. OnChange = tbSemDiffuseFChange
  1891. end
  1892. object tbSemAmbientF: TTrackBar
  1893. Left = 186
  1894. Top = 116
  1895. Width = 334
  1896. Height = 49
  1897. Margins.Left = 5
  1898. Margins.Top = 5
  1899. Margins.Right = 5
  1900. Margins.Bottom = 5
  1901. Max = 100
  1902. PageSize = 10
  1903. Frequency = 10
  1904. Position = 80
  1905. TabOrder = 1
  1906. ThumbLength = 35
  1907. TickStyle = tsNone
  1908. OnChange = tbSemAmbientFChange
  1909. end
  1910. object tbSemSpecularF: TTrackBar
  1911. Left = 186
  1912. Top = 168
  1913. Width = 334
  1914. Height = 46
  1915. Margins.Left = 5
  1916. Margins.Top = 5
  1917. Margins.Right = 5
  1918. Margins.Bottom = 5
  1919. Max = 100
  1920. PageSize = 10
  1921. Frequency = 10
  1922. Position = 90
  1923. TabOrder = 2
  1924. ThumbLength = 35
  1925. TickStyle = tsNone
  1926. OnChange = tbSemSpecularFChange
  1927. end
  1928. object chkSEMShader: TCheckBox
  1929. Left = 42
  1930. Top = 28
  1931. Width = 170
  1932. Height = 30
  1933. Margins.Left = 5
  1934. Margins.Top = 5
  1935. Margins.Right = 5
  1936. Margins.Bottom = 5
  1937. Caption = 'Enabled'
  1938. TabOrder = 3
  1939. OnClick = chkSEMShaderClick
  1940. end
  1941. object Button4: TButton
  1942. Left = 28
  1943. Top = 313
  1944. Width = 322
  1945. Height = 44
  1946. Margins.Left = 5
  1947. Margins.Top = 5
  1948. Margins.Right = 5
  1949. Margins.Bottom = 5
  1950. Caption = 'Load MatCap Texture'
  1951. TabOrder = 4
  1952. OnClick = Button4Click
  1953. end
  1954. end
  1955. object Displacement: TTabSheet
  1956. Margins.Left = 5
  1957. Margins.Top = 5
  1958. Margins.Right = 5
  1959. Margins.Bottom = 5
  1960. Caption = 'Displacement'
  1961. ImageIndex = 6
  1962. object Label21: TLabel
  1963. Left = 42
  1964. Top = 91
  1965. Width = 112
  1966. Height = 23
  1967. Margins.Left = 5
  1968. Margins.Top = 5
  1969. Margins.Right = 5
  1970. Margins.Bottom = 5
  1971. Caption = 'Diffuse factor'
  1972. end
  1973. object Label43: TLabel
  1974. Left = 42
  1975. Top = 140
  1976. Width = 123
  1977. Height = 23
  1978. Margins.Left = 5
  1979. Margins.Top = 5
  1980. Margins.Right = 5
  1981. Margins.Bottom = 5
  1982. Caption = 'Ambient factor'
  1983. end
  1984. object Label45: TLabel
  1985. Left = 42
  1986. Top = 189
  1987. Width = 127
  1988. Height = 23
  1989. Margins.Left = 5
  1990. Margins.Top = 5
  1991. Margins.Right = 5
  1992. Margins.Bottom = 5
  1993. Caption = 'Specular factor'
  1994. end
  1995. object lblVDSpecularF: TLabel
  1996. Left = 544
  1997. Top = 189
  1998. Width = 36
  1999. Height = 23
  2000. Margins.Left = 5
  2001. Margins.Top = 5
  2002. Margins.Right = 5
  2003. Margins.Bottom = 5
  2004. Caption = '0.90'
  2005. end
  2006. object lblVDAmbientF: TLabel
  2007. Left = 544
  2008. Top = 138
  2009. Width = 36
  2010. Height = 23
  2011. Margins.Left = 5
  2012. Margins.Top = 5
  2013. Margins.Right = 5
  2014. Margins.Bottom = 5
  2015. Caption = '0.80'
  2016. end
  2017. object lblVDDiffuseF: TLabel
  2018. Left = 544
  2019. Top = 93
  2020. Width = 36
  2021. Height = 23
  2022. Margins.Left = 5
  2023. Margins.Top = 5
  2024. Margins.Right = 5
  2025. Margins.Bottom = 5
  2026. Caption = '0.90'
  2027. end
  2028. object Label51: TLabel
  2029. Left = 39
  2030. Top = 242
  2031. Width = 117
  2032. Height = 23
  2033. Margins.Left = 5
  2034. Margins.Top = 5
  2035. Margins.Right = 5
  2036. Margins.Bottom = 5
  2037. Caption = 'Ambient Color'
  2038. end
  2039. object Shape15: TShape
  2040. Left = 179
  2041. Top = 238
  2042. Width = 112
  2043. Height = 26
  2044. Margins.Left = 5
  2045. Margins.Top = 5
  2046. Margins.Right = 5
  2047. Margins.Bottom = 5
  2048. Brush.Color = 2105376
  2049. Pen.Width = 2
  2050. OnMouseDown = Shape13MouseDown
  2051. end
  2052. object Label52: TLabel
  2053. Left = 39
  2054. Top = 275
  2055. Width = 121
  2056. Height = 23
  2057. Margins.Left = 5
  2058. Margins.Top = 5
  2059. Margins.Right = 5
  2060. Margins.Bottom = 5
  2061. Caption = 'Specular Color'
  2062. end
  2063. object Shape16: TShape
  2064. Left = 179
  2065. Top = 275
  2066. Width = 112
  2067. Height = 26
  2068. Margins.Left = 5
  2069. Margins.Top = 5
  2070. Margins.Right = 5
  2071. Margins.Bottom = 5
  2072. Brush.Color = 14540253
  2073. Pen.Width = 2
  2074. OnMouseDown = Shape14MouseDown
  2075. end
  2076. object Label48: TLabel
  2077. Left = 39
  2078. Top = 329
  2079. Width = 45
  2080. Height = 23
  2081. Margins.Left = 5
  2082. Margins.Top = 5
  2083. Margins.Right = 5
  2084. Margins.Bottom = 5
  2085. Caption = 'Noise'
  2086. end
  2087. object lblVDNoise: TLabel
  2088. Left = 544
  2089. Top = 329
  2090. Width = 36
  2091. Height = 23
  2092. Margins.Left = 5
  2093. Margins.Top = 5
  2094. Margins.Right = 5
  2095. Margins.Bottom = 5
  2096. Caption = '10.0'
  2097. end
  2098. object Label49: TLabel
  2099. Left = 39
  2100. Top = 369
  2101. Width = 52
  2102. Height = 23
  2103. Margins.Left = 5
  2104. Margins.Top = 5
  2105. Margins.Right = 5
  2106. Margins.Bottom = 5
  2107. Caption = 'Period'
  2108. end
  2109. object lblVDPeriod: TLabel
  2110. Left = 544
  2111. Top = 369
  2112. Width = 26
  2113. Height = 23
  2114. Margins.Left = 5
  2115. Margins.Top = 5
  2116. Margins.Right = 5
  2117. Margins.Bottom = 5
  2118. Caption = '5.0'
  2119. end
  2120. object Label53: TLabel
  2121. Left = 39
  2122. Top = 413
  2123. Width = 95
  2124. Height = 23
  2125. Margins.Left = 5
  2126. Margins.Top = 5
  2127. Margins.Right = 5
  2128. Margins.Bottom = 5
  2129. Caption = 'Noise Scale'
  2130. end
  2131. object lblVDNScale: TLabel
  2132. Left = 544
  2133. Top = 415
  2134. Width = 36
  2135. Height = 23
  2136. Margins.Left = 5
  2137. Margins.Top = 5
  2138. Margins.Right = 5
  2139. Margins.Bottom = 5
  2140. Caption = '0.05'
  2141. end
  2142. object Label55: TLabel
  2143. Left = 39
  2144. Top = 455
  2145. Width = 95
  2146. Height = 23
  2147. Margins.Left = 5
  2148. Margins.Top = 5
  2149. Margins.Right = 5
  2150. Margins.Bottom = 5
  2151. Caption = 'Turbulence'
  2152. end
  2153. object lblVDTurb: TLabel
  2154. Left = 544
  2155. Top = 457
  2156. Width = 26
  2157. Height = 23
  2158. Margins.Left = 5
  2159. Margins.Top = 5
  2160. Margins.Right = 5
  2161. Margins.Bottom = 5
  2162. Caption = '0.5'
  2163. end
  2164. object Label57: TLabel
  2165. Left = 39
  2166. Top = 497
  2167. Width = 162
  2168. Height = 23
  2169. Margins.Left = 5
  2170. Margins.Top = 5
  2171. Margins.Right = 5
  2172. Margins.Bottom = 5
  2173. Caption = 'Displacement Scale'
  2174. end
  2175. object lblVDDispScale: TLabel
  2176. Left = 544
  2177. Top = 497
  2178. Width = 26
  2179. Height = 23
  2180. Margins.Left = 5
  2181. Margins.Top = 5
  2182. Margins.Right = 5
  2183. Margins.Bottom = 5
  2184. Caption = '1.0'
  2185. end
  2186. object Label50: TLabel
  2187. Left = 39
  2188. Top = 537
  2189. Width = 99
  2190. Height = 23
  2191. Margins.Left = 5
  2192. Margins.Top = 5
  2193. Margins.Right = 5
  2194. Margins.Bottom = 5
  2195. Caption = 'Time Factor'
  2196. end
  2197. object lblVDTimeF: TLabel
  2198. Left = 544
  2199. Top = 537
  2200. Width = 36
  2201. Height = 23
  2202. Margins.Left = 5
  2203. Margins.Top = 5
  2204. Margins.Right = 5
  2205. Margins.Bottom = 5
  2206. Caption = '0.05'
  2207. end
  2208. object chkVDShader: TCheckBox
  2209. Left = 56
  2210. Top = 42
  2211. Width = 170
  2212. Height = 30
  2213. Margins.Left = 5
  2214. Margins.Top = 5
  2215. Margins.Right = 5
  2216. Margins.Bottom = 5
  2217. Caption = 'Enabled'
  2218. TabOrder = 0
  2219. OnClick = chkVDShaderClick
  2220. end
  2221. object tbVDDiffuseF: TTrackBar
  2222. Left = 201
  2223. Top = 82
  2224. Width = 333
  2225. Height = 46
  2226. Margins.Left = 5
  2227. Margins.Top = 5
  2228. Margins.Right = 5
  2229. Margins.Bottom = 5
  2230. Max = 100
  2231. PageSize = 10
  2232. Frequency = 10
  2233. Position = 90
  2234. TabOrder = 1
  2235. ThumbLength = 35
  2236. TickStyle = tsNone
  2237. OnChange = tbVDDiffuseFChange
  2238. end
  2239. object tbVDAmbientF: TTrackBar
  2240. Left = 200
  2241. Top = 130
  2242. Width = 334
  2243. Height = 49
  2244. Margins.Left = 5
  2245. Margins.Top = 5
  2246. Margins.Right = 5
  2247. Margins.Bottom = 5
  2248. Max = 100
  2249. PageSize = 10
  2250. Frequency = 10
  2251. Position = 80
  2252. TabOrder = 2
  2253. ThumbLength = 35
  2254. TickStyle = tsNone
  2255. OnChange = tbVDAmbientFChange
  2256. end
  2257. object tbVDSpecularF: TTrackBar
  2258. Left = 200
  2259. Top = 182
  2260. Width = 334
  2261. Height = 46
  2262. Margins.Left = 5
  2263. Margins.Top = 5
  2264. Margins.Right = 5
  2265. Margins.Bottom = 5
  2266. Max = 100
  2267. PageSize = 10
  2268. Frequency = 10
  2269. Position = 90
  2270. TabOrder = 3
  2271. ThumbLength = 35
  2272. TickStyle = tsNone
  2273. OnChange = tbVDSpecularFChange
  2274. end
  2275. object chkVDAnimate: TCheckBox
  2276. Left = 224
  2277. Top = 42
  2278. Width = 170
  2279. Height = 30
  2280. Margins.Left = 5
  2281. Margins.Top = 5
  2282. Margins.Right = 5
  2283. Margins.Bottom = 5
  2284. Caption = 'Animate'
  2285. TabOrder = 4
  2286. end
  2287. object tbVDNoise: TTrackBar
  2288. Left = 200
  2289. Top = 322
  2290. Width = 334
  2291. Height = 46
  2292. Margins.Left = 5
  2293. Margins.Top = 5
  2294. Margins.Right = 5
  2295. Margins.Bottom = 5
  2296. Max = 5000
  2297. PageSize = 10
  2298. Frequency = 10
  2299. Position = 1000
  2300. TabOrder = 5
  2301. ThumbLength = 35
  2302. TickStyle = tsNone
  2303. OnChange = tbVDNoiseChange
  2304. end
  2305. object tbVDPeriod: TTrackBar
  2306. Left = 200
  2307. Top = 362
  2308. Width = 334
  2309. Height = 46
  2310. Margins.Left = 5
  2311. Margins.Top = 5
  2312. Margins.Right = 5
  2313. Margins.Bottom = 5
  2314. Max = 500
  2315. PageSize = 10
  2316. Frequency = 10
  2317. Position = 500
  2318. TabOrder = 6
  2319. ThumbLength = 35
  2320. TickStyle = tsNone
  2321. OnChange = tbVDPeriodChange
  2322. end
  2323. object tbVDNScale: TTrackBar
  2324. Left = 200
  2325. Top = 403
  2326. Width = 334
  2327. Height = 45
  2328. Margins.Left = 5
  2329. Margins.Top = 5
  2330. Margins.Right = 5
  2331. Margins.Bottom = 5
  2332. Max = 100
  2333. PageSize = 10
  2334. Frequency = 10
  2335. Position = 5
  2336. TabOrder = 7
  2337. ThumbLength = 35
  2338. TickStyle = tsNone
  2339. OnChange = tbVDNScaleChange
  2340. end
  2341. object tbVDTurb: TTrackBar
  2342. Left = 200
  2343. Top = 448
  2344. Width = 334
  2345. Height = 46
  2346. Margins.Left = 5
  2347. Margins.Top = 5
  2348. Margins.Right = 5
  2349. Margins.Bottom = 5
  2350. Max = 200
  2351. PageSize = 10
  2352. Frequency = 10
  2353. Position = 50
  2354. TabOrder = 8
  2355. ThumbLength = 35
  2356. TickStyle = tsNone
  2357. OnChange = tbVDTurbChange
  2358. end
  2359. object tbVDDispScale: TTrackBar
  2360. Left = 200
  2361. Top = 490
  2362. Width = 334
  2363. Height = 46
  2364. Margins.Left = 5
  2365. Margins.Top = 5
  2366. Margins.Right = 5
  2367. Margins.Bottom = 5
  2368. Max = 1000
  2369. PageSize = 10
  2370. Frequency = 10
  2371. Position = 100
  2372. TabOrder = 9
  2373. ThumbLength = 35
  2374. TickStyle = tsNone
  2375. OnChange = tbVDDispScaleChange
  2376. end
  2377. object tbVDTimeF: TTrackBar
  2378. Left = 200
  2379. Top = 530
  2380. Width = 334
  2381. Height = 46
  2382. Margins.Left = 5
  2383. Margins.Top = 5
  2384. Margins.Right = 5
  2385. Margins.Bottom = 5
  2386. Max = 1000
  2387. PageSize = 10
  2388. Frequency = 10
  2389. Position = 5
  2390. TabOrder = 10
  2391. ThumbLength = 35
  2392. TickStyle = tsNone
  2393. OnChange = tbVDTimeFChange
  2394. end
  2395. object Button3: TButton
  2396. Left = 28
  2397. Top = 602
  2398. Width = 198
  2399. Height = 44
  2400. Margins.Left = 5
  2401. Margins.Top = 5
  2402. Margins.Right = 5
  2403. Margins.Bottom = 5
  2404. Caption = 'Reset Time'
  2405. TabOrder = 11
  2406. OnClick = Button3Click
  2407. end
  2408. object Button1: TButton
  2409. Left = 28
  2410. Top = 656
  2411. Width = 322
  2412. Height = 44
  2413. Margins.Left = 5
  2414. Margins.Top = 5
  2415. Margins.Right = 5
  2416. Margins.Bottom = 5
  2417. Caption = 'Load Main Texture'
  2418. TabOrder = 12
  2419. OnClick = Button1Click
  2420. end
  2421. end
  2422. object TabSheet7: TTabSheet
  2423. Margins.Left = 5
  2424. Margins.Top = 5
  2425. Margins.Right = 5
  2426. Margins.Bottom = 5
  2427. Caption = 'Glass'
  2428. ImageIndex = 7
  2429. object Label56: TLabel
  2430. Left = 19
  2431. Top = 63
  2432. Width = 51
  2433. Height = 23
  2434. Margins.Left = 5
  2435. Margins.Top = 5
  2436. Margins.Right = 5
  2437. Margins.Bottom = 5
  2438. Caption = 'Depth'
  2439. end
  2440. object Label58: TLabel
  2441. Left = 42
  2442. Top = 116
  2443. Width = 28
  2444. Height = 23
  2445. Margins.Left = 5
  2446. Margins.Top = 5
  2447. Margins.Right = 5
  2448. Margins.Bottom = 5
  2449. Caption = 'Mix'
  2450. end
  2451. object Label59: TLabel
  2452. Left = 25
  2453. Top = 256
  2454. Width = 106
  2455. Height = 23
  2456. Margins.Left = 5
  2457. Margins.Top = 5
  2458. Margins.Right = 5
  2459. Margins.Bottom = 5
  2460. Caption = 'Diffuse Color'
  2461. end
  2462. object Shape17: TShape
  2463. Left = 152
  2464. Top = 254
  2465. Width = 112
  2466. Height = 26
  2467. Margins.Left = 5
  2468. Margins.Top = 5
  2469. Margins.Right = 5
  2470. Margins.Bottom = 5
  2471. Brush.Color = 2105376
  2472. Pen.Width = 2
  2473. OnMouseDown = Shape17MouseDown
  2474. end
  2475. object lblGlassDepth: TLabel
  2476. Left = 499
  2477. Top = 63
  2478. Width = 26
  2479. Height = 23
  2480. Margins.Left = 5
  2481. Margins.Top = 5
  2482. Margins.Right = 5
  2483. Margins.Bottom = 5
  2484. Caption = '0.1'
  2485. end
  2486. object lblGlassMix: TLabel
  2487. Left = 495
  2488. Top = 116
  2489. Width = 26
  2490. Height = 23
  2491. Margins.Left = 5
  2492. Margins.Top = 5
  2493. Margins.Right = 5
  2494. Margins.Bottom = 5
  2495. Caption = '1.0'
  2496. end
  2497. object Label60: TLabel
  2498. Left = 18
  2499. Top = 173
  2500. Width = 47
  2501. Height = 23
  2502. Margins.Left = 5
  2503. Margins.Top = 5
  2504. Margins.Right = 5
  2505. Margins.Bottom = 5
  2506. Caption = 'Alpha'
  2507. end
  2508. object lblGlassAlpha: TLabel
  2509. Left = 494
  2510. Top = 173
  2511. Width = 26
  2512. Height = 23
  2513. Margins.Left = 5
  2514. Margins.Top = 5
  2515. Margins.Right = 5
  2516. Margins.Bottom = 5
  2517. Caption = '1.0'
  2518. end
  2519. object Label61: TLabel
  2520. Left = 32
  2521. Top = 313
  2522. Width = 80
  2523. Height = 23
  2524. Margins.Left = 5
  2525. Margins.Top = 5
  2526. Margins.Right = 5
  2527. Margins.Bottom = 5
  2528. Caption = 'Blend Src'
  2529. end
  2530. object Label62: TLabel
  2531. Left = 32
  2532. Top = 359
  2533. Width = 90
  2534. Height = 23
  2535. Margins.Left = 5
  2536. Margins.Top = 5
  2537. Margins.Right = 5
  2538. Margins.Bottom = 5
  2539. Caption = 'Blend Dest'
  2540. end
  2541. object tbGlassDepth: TTrackBar
  2542. Left = 81
  2543. Top = 58
  2544. Width = 411
  2545. Height = 45
  2546. Margins.Left = 5
  2547. Margins.Top = 5
  2548. Margins.Right = 5
  2549. Margins.Bottom = 5
  2550. Max = 100
  2551. PageSize = 10
  2552. Frequency = 10
  2553. Position = 10
  2554. TabOrder = 0
  2555. ThumbLength = 35
  2556. TickStyle = tsNone
  2557. OnChange = tbGlassDepthChange
  2558. end
  2559. object tbGlassMix: TTrackBar
  2560. Left = 79
  2561. Top = 109
  2562. Width = 413
  2563. Height = 49
  2564. Margins.Left = 5
  2565. Margins.Top = 5
  2566. Margins.Right = 5
  2567. Margins.Bottom = 5
  2568. Max = 200
  2569. PageSize = 10
  2570. Frequency = 10
  2571. Position = 100
  2572. TabOrder = 1
  2573. ThumbLength = 35
  2574. TickStyle = tsNone
  2575. OnChange = tbGlassMixChange
  2576. end
  2577. object Button10: TButton
  2578. Left = 5
  2579. Top = 445
  2580. Width = 322
  2581. Height = 43
  2582. Margins.Left = 5
  2583. Margins.Top = 5
  2584. Margins.Right = 5
  2585. Margins.Bottom = 5
  2586. Caption = 'Load Refraction Texture'
  2587. TabOrder = 2
  2588. OnClick = Button10Click
  2589. end
  2590. object chkGlassShader: TCheckBox
  2591. Left = 42
  2592. Top = 14
  2593. Width = 170
  2594. Height = 30
  2595. Margins.Left = 5
  2596. Margins.Top = 5
  2597. Margins.Right = 5
  2598. Margins.Bottom = 5
  2599. Caption = 'Enabled'
  2600. TabOrder = 3
  2601. OnClick = chkGlassShaderClick
  2602. end
  2603. object tbGlassAlpha: TTrackBar
  2604. Left = 79
  2605. Top = 168
  2606. Width = 411
  2607. Height = 46
  2608. Margins.Left = 5
  2609. Margins.Top = 5
  2610. Margins.Right = 5
  2611. Margins.Bottom = 5
  2612. Max = 100
  2613. PageSize = 10
  2614. Frequency = 10
  2615. Position = 100
  2616. TabOrder = 4
  2617. ThumbLength = 35
  2618. TickStyle = tsNone
  2619. OnChange = tbGlassAlphaChange
  2620. end
  2621. object cbxGlassBlendSrc: TComboBox
  2622. Left = 152
  2623. Top = 308
  2624. Width = 254
  2625. Height = 31
  2626. Margins.Left = 5
  2627. Margins.Top = 5
  2628. Margins.Right = 5
  2629. Margins.Bottom = 5
  2630. Style = csDropDownList
  2631. ItemIndex = 6
  2632. TabOrder = 5
  2633. Text = 'SRC ALPHA'
  2634. OnChange = cbxGlassBlendSrcChange
  2635. Items.Strings = (
  2636. 'ZERO'
  2637. 'ONE'
  2638. 'SRC COLOR'
  2639. 'ONE MINUS SRC COLOR'
  2640. 'DST COLOR'
  2641. 'ONE MINUS DST COLOR'
  2642. 'SRC ALPHA'
  2643. 'MINUS SRC ALPHA'
  2644. 'DST ALPHA'
  2645. 'MINUS DST ALPHA'
  2646. 'SRC ALPHA SATURATE'
  2647. 'CONSTANT COLOR'
  2648. 'ONE MINUS CONSTANT COLOR'
  2649. 'CONSTANT ALPHA'
  2650. 'ONE MINUS CONSTATNT ALPHA')
  2651. end
  2652. object cbxGlassBlendDst: TComboBox
  2653. Left = 152
  2654. Top = 355
  2655. Width = 254
  2656. Height = 31
  2657. Margins.Left = 5
  2658. Margins.Top = 5
  2659. Margins.Right = 5
  2660. Margins.Bottom = 5
  2661. Style = csDropDownList
  2662. ItemIndex = 8
  2663. TabOrder = 6
  2664. Text = 'DST ALPHA'
  2665. OnChange = cbxGlassBlendDstChange
  2666. Items.Strings = (
  2667. 'ZERO'
  2668. 'ONE'
  2669. 'SRC COLOR'
  2670. 'ONE MINUS SRC COLOR'
  2671. 'DST COLOR'
  2672. 'ONE MINUS DST COLOR'
  2673. 'SRC ALPHA'
  2674. 'MINUS SRC ALPHA'
  2675. 'DST ALPHA'
  2676. 'MINUS DST ALPHA'
  2677. 'SRC ALPHA SATURATE'
  2678. 'CONSTANT COLOR'
  2679. 'ONE MINUS CONSTANT COLOR'
  2680. 'CONSTANT ALPHA'
  2681. 'ONE MINUS CONSTATNT ALPHA')
  2682. end
  2683. end
  2684. object TabSheet8: TTabSheet
  2685. Margins.Left = 5
  2686. Margins.Top = 5
  2687. Margins.Right = 5
  2688. Margins.Bottom = 5
  2689. Caption = 'Toon'
  2690. ImageIndex = 8
  2691. object Label64: TLabel
  2692. Left = 12
  2693. Top = 89
  2694. Width = 119
  2695. Height = 23
  2696. Margins.Left = 5
  2697. Margins.Top = 5
  2698. Margins.Right = 5
  2699. Margins.Bottom = 5
  2700. Caption = 'HighLight Size'
  2701. end
  2702. object lblToonHighlightSize: TLabel
  2703. Left = 508
  2704. Top = 89
  2705. Width = 36
  2706. Height = 23
  2707. Margins.Left = 5
  2708. Margins.Top = 5
  2709. Margins.Right = 5
  2710. Margins.Bottom = 5
  2711. Caption = '0.95'
  2712. end
  2713. object Label66: TLabel
  2714. Left = 12
  2715. Top = 128
  2716. Width = 69
  2717. Height = 23
  2718. Margins.Left = 5
  2719. Margins.Top = 5
  2720. Margins.Right = 5
  2721. Margins.Bottom = 5
  2722. Caption = 'Mid Size'
  2723. end
  2724. object lblToonMidSize: TLabel
  2725. Left = 508
  2726. Top = 128
  2727. Width = 26
  2728. Height = 23
  2729. Margins.Left = 5
  2730. Margins.Top = 5
  2731. Margins.Right = 5
  2732. Margins.Bottom = 5
  2733. Caption = '0.5'
  2734. end
  2735. object Label68: TLabel
  2736. Left = 12
  2737. Top = 166
  2738. Width = 106
  2739. Height = 23
  2740. Margins.Left = 5
  2741. Margins.Top = 5
  2742. Margins.Right = 5
  2743. Margins.Bottom = 5
  2744. Caption = 'Shadow Size'
  2745. end
  2746. object lblToonShadowSize: TLabel
  2747. Left = 508
  2748. Top = 166
  2749. Width = 36
  2750. Height = 23
  2751. Margins.Left = 5
  2752. Margins.Top = 5
  2753. Margins.Right = 5
  2754. Margins.Bottom = 5
  2755. Caption = '0.25'
  2756. end
  2757. object Label70: TLabel
  2758. Left = 12
  2759. Top = 205
  2760. Width = 114
  2761. Height = 23
  2762. Margins.Left = 5
  2763. Margins.Top = 5
  2764. Margins.Right = 5
  2765. Margins.Bottom = 5
  2766. Caption = 'Outline Width'
  2767. end
  2768. object lblToonOutlineWidth: TLabel
  2769. Left = 508
  2770. Top = 205
  2771. Width = 36
  2772. Height = 23
  2773. Margins.Left = 5
  2774. Margins.Top = 5
  2775. Margins.Right = 5
  2776. Margins.Bottom = 5
  2777. Caption = '0.25'
  2778. end
  2779. object Label72: TLabel
  2780. Left = 14
  2781. Top = 256
  2782. Width = 123
  2783. Height = 23
  2784. Margins.Left = 5
  2785. Margins.Top = 5
  2786. Margins.Right = 5
  2787. Margins.Bottom = 5
  2788. Caption = 'Highlight Color'
  2789. end
  2790. object Shape18: TShape
  2791. Left = 207
  2792. Top = 256
  2793. Width = 112
  2794. Height = 26
  2795. Margins.Left = 5
  2796. Margins.Top = 5
  2797. Margins.Right = 5
  2798. Margins.Bottom = 5
  2799. Brush.Color = 15658734
  2800. Pen.Width = 2
  2801. OnMouseDown = Shape18MouseDown
  2802. end
  2803. object Label73: TLabel
  2804. Left = 14
  2805. Top = 292
  2806. Width = 78
  2807. Height = 23
  2808. Margins.Left = 5
  2809. Margins.Top = 5
  2810. Margins.Right = 5
  2811. Margins.Bottom = 5
  2812. Caption = 'Mid Color'
  2813. end
  2814. object Shape19: TShape
  2815. Left = 207
  2816. Top = 292
  2817. Width = 112
  2818. Height = 27
  2819. Margins.Left = 5
  2820. Margins.Top = 5
  2821. Margins.Right = 5
  2822. Margins.Bottom = 5
  2823. Brush.Color = 13421772
  2824. Pen.Width = 2
  2825. OnMouseDown = Shape19MouseDown
  2826. end
  2827. object Label74: TLabel
  2828. Left = 14
  2829. Top = 329
  2830. Width = 183
  2831. Height = 23
  2832. Margins.Left = 5
  2833. Margins.Top = 5
  2834. Margins.Right = 5
  2835. Margins.Bottom = 5
  2836. Caption = 'Lighten Shadow Color'
  2837. end
  2838. object Shape20: TShape
  2839. Left = 207
  2840. Top = 329
  2841. Width = 112
  2842. Height = 26
  2843. Margins.Left = 5
  2844. Margins.Top = 5
  2845. Margins.Right = 5
  2846. Margins.Bottom = 5
  2847. Brush.Color = clGray
  2848. Pen.Width = 2
  2849. OnMouseDown = Shape20MouseDown
  2850. end
  2851. object Label75: TLabel
  2852. Left = 14
  2853. Top = 366
  2854. Width = 181
  2855. Height = 23
  2856. Margins.Left = 5
  2857. Margins.Top = 5
  2858. Margins.Right = 5
  2859. Margins.Bottom = 5
  2860. Caption = 'Darken Shadow Color'
  2861. end
  2862. object Shape21: TShape
  2863. Left = 207
  2864. Top = 366
  2865. Width = 112
  2866. Height = 26
  2867. Margins.Left = 5
  2868. Margins.Top = 5
  2869. Margins.Right = 5
  2870. Margins.Bottom = 5
  2871. Brush.Color = 3158064
  2872. Pen.Width = 2
  2873. OnMouseDown = Shape21MouseDown
  2874. end
  2875. object Label76: TLabel
  2876. Left = 12
  2877. Top = 403
  2878. Width = 107
  2879. Height = 23
  2880. Margins.Left = 5
  2881. Margins.Top = 5
  2882. Margins.Right = 5
  2883. Margins.Bottom = 5
  2884. Caption = 'Outline Color'
  2885. end
  2886. object Shape22: TShape
  2887. Left = 207
  2888. Top = 403
  2889. Width = 112
  2890. Height = 26
  2891. Margins.Left = 5
  2892. Margins.Top = 5
  2893. Margins.Right = 5
  2894. Margins.Bottom = 5
  2895. Brush.Color = clBlack
  2896. Pen.Width = 2
  2897. OnMouseDown = Shape22MouseDown
  2898. end
  2899. object chkToonShader: TCheckBox
  2900. Left = 14
  2901. Top = 28
  2902. Width = 170
  2903. Height = 30
  2904. Margins.Left = 5
  2905. Margins.Top = 5
  2906. Margins.Right = 5
  2907. Margins.Bottom = 5
  2908. Caption = 'Enabled'
  2909. TabOrder = 0
  2910. OnClick = chkToonShaderClick
  2911. end
  2912. object tbToonHighlightSize: TTrackBar
  2913. Left = 131
  2914. Top = 84
  2915. Width = 373
  2916. Height = 46
  2917. Margins.Left = 5
  2918. Margins.Top = 5
  2919. Margins.Right = 5
  2920. Margins.Bottom = 5
  2921. Max = 100
  2922. PageSize = 10
  2923. Frequency = 10
  2924. Position = 95
  2925. TabOrder = 1
  2926. ThumbLength = 35
  2927. TickStyle = tsNone
  2928. OnChange = tbToonHighlightSizeChange
  2929. end
  2930. object tbToonMidSize: TTrackBar
  2931. Left = 131
  2932. Top = 123
  2933. Width = 373
  2934. Height = 45
  2935. Margins.Left = 5
  2936. Margins.Top = 5
  2937. Margins.Right = 5
  2938. Margins.Bottom = 5
  2939. Max = 100
  2940. PageSize = 10
  2941. Frequency = 10
  2942. Position = 50
  2943. TabOrder = 2
  2944. ThumbLength = 35
  2945. TickStyle = tsNone
  2946. OnChange = tbToonMidSizeChange
  2947. end
  2948. object tbToonShadowSize: TTrackBar
  2949. Left = 131
  2950. Top = 161
  2951. Width = 373
  2952. Height = 46
  2953. Margins.Left = 5
  2954. Margins.Top = 5
  2955. Margins.Right = 5
  2956. Margins.Bottom = 5
  2957. Max = 100
  2958. PageSize = 10
  2959. Frequency = 10
  2960. Position = 25
  2961. TabOrder = 3
  2962. ThumbLength = 35
  2963. TickStyle = tsNone
  2964. OnChange = tbToonShadowSizeChange
  2965. end
  2966. object tbToonOutlineWidth: TTrackBar
  2967. Left = 131
  2968. Top = 200
  2969. Width = 373
  2970. Height = 45
  2971. Margins.Left = 5
  2972. Margins.Top = 5
  2973. Margins.Right = 5
  2974. Margins.Bottom = 5
  2975. Max = 100
  2976. PageSize = 10
  2977. Frequency = 10
  2978. Position = 25
  2979. TabOrder = 4
  2980. ThumbLength = 35
  2981. TickStyle = tsNone
  2982. OnChange = tbToonOutlineWidthChange
  2983. end
  2984. end
  2985. end
  2986. object chkAnimScene: TCheckBox
  2987. Left = 25
  2988. Top = 796
  2989. Width = 169
  2990. Height = 30
  2991. Margins.Left = 5
  2992. Margins.Top = 5
  2993. Margins.Right = 5
  2994. Margins.Bottom = 5
  2995. Caption = 'Animate Scene'
  2996. TabOrder = 1
  2997. end
  2998. object chkLightmoving: TCheckBox
  2999. Left = 23
  3000. Top = 837
  3001. Width = 170
  3002. Height = 29
  3003. Margins.Left = 5
  3004. Margins.Top = 5
  3005. Margins.Right = 5
  3006. Margins.Bottom = 5
  3007. Caption = 'Light moving'
  3008. TabOrder = 2
  3009. end
  3010. object cbxObjects: TComboBox
  3011. Left = 327
  3012. Top = 758
  3013. Width = 254
  3014. Height = 31
  3015. Margins.Left = 5
  3016. Margins.Top = 5
  3017. Margins.Right = 5
  3018. Margins.Bottom = 5
  3019. Style = csDropDownList
  3020. ItemIndex = 0
  3021. TabOrder = 3
  3022. Text = 'Suzanne'
  3023. OnChange = cbxObjectsChange
  3024. Items.Strings = (
  3025. 'Suzanne'
  3026. 'Knot'
  3027. 'Spoutnik'
  3028. 'Rectangle Spirale'
  3029. 'Geode'
  3030. 'Syamil'
  3031. 'GLTorus'
  3032. 'GLSphere')
  3033. end
  3034. object Button2: TButton
  3035. Left = 261
  3036. Top = 803
  3037. Width = 322
  3038. Height = 49
  3039. Margins.Left = 5
  3040. Margins.Top = 5
  3041. Margins.Right = 5
  3042. Margins.Bottom = 5
  3043. Caption = 'Choose Background Color'
  3044. TabOrder = 4
  3045. OnClick = Button2Click
  3046. end
  3047. object chkBackgroundImg: TCheckBox
  3048. Left = 224
  3049. Top = 872
  3050. Width = 25
  3051. Height = 28
  3052. Hint = 'Show Background Texture'
  3053. Margins.Left = 5
  3054. Margins.Top = 5
  3055. Margins.Right = 5
  3056. Margins.Bottom = 5
  3057. TabOrder = 5
  3058. OnClick = chkBackgroundImgClick
  3059. end
  3060. object Button11: TButton
  3061. Left = 261
  3062. Top = 858
  3063. Width = 322
  3064. Height = 42
  3065. Margins.Left = 5
  3066. Margins.Top = 5
  3067. Margins.Right = 5
  3068. Margins.Bottom = 5
  3069. Caption = 'Load Background Texture'
  3070. Enabled = False
  3071. TabOrder = 6
  3072. OnClick = Button11Click
  3073. end
  3074. end
  3075. object Viewer: TGLSceneViewer
  3076. Left = 651
  3077. Top = 0
  3078. Width = 1050
  3079. Height = 914
  3080. Margins.Left = 5
  3081. Margins.Top = 5
  3082. Margins.Right = 5
  3083. Margins.Bottom = 5
  3084. Camera = Camera
  3085. Buffer.BackgroundColor = clBlack
  3086. Buffer.AntiAliasing = aa2x
  3087. FieldOfView = 167.512298583984400000
  3088. PenAsTouch = False
  3089. Align = alClient
  3090. TabOrder = 1
  3091. end
  3092. object MaterialLibrary: TGLMaterialLibrary
  3093. Materials = <
  3094. item
  3095. Name = 'MainTexture'
  3096. Tag = 0
  3097. Material.BackProperties.Shininess = 10
  3098. Material.FrontProperties.Shininess = 10
  3099. Material.FrontProperties.Specular.Color = {9998983E9998983E9998983E0000803F}
  3100. Material.BlendingMode = bmTransparency
  3101. Material.Texture.TextureMode = tmModulate
  3102. Material.Texture.Disabled = False
  3103. end
  3104. item
  3105. Name = 'NoiseTexture'
  3106. Tag = 0
  3107. Material.Texture.Disabled = False
  3108. end
  3109. item
  3110. Name = 'ShaderMaterial'
  3111. Tag = 0
  3112. Material.FrontProperties.Emission.Color = {77BE9F3D7368913D2506813D0000803F}
  3113. Material.FrontProperties.Specular.Color = {B6F35D3F6DE75B3F6DE75B3F0000803F}
  3114. Material.Texture.TextureMode = tmModulate
  3115. Material.Texture.Disabled = False
  3116. Material.Texture.KeepImageAfterTransfer = True
  3117. end
  3118. item
  3119. Name = 'ErosionNoiseTexture'
  3120. Tag = 0
  3121. Material.Texture.Disabled = False
  3122. end
  3123. item
  3124. Name = 'ErosionMainTexture'
  3125. Tag = 0
  3126. Material.BlendingMode = bmModulate
  3127. Material.Texture.Disabled = False
  3128. end
  3129. item
  3130. Name = 'ErosionTexture'
  3131. Tag = 0
  3132. Material.BlendingMode = bmModulate
  3133. Material.Texture.Disabled = False
  3134. end
  3135. item
  3136. Name = 'MatCapTexture'
  3137. Tag = 0
  3138. Material.Texture.Disabled = False
  3139. end
  3140. item
  3141. Name = 'ExplosionTexture'
  3142. Tag = 0
  3143. Material.Texture.Disabled = False
  3144. end
  3145. item
  3146. Name = 'EnvMap'
  3147. Tag = 0
  3148. Material.Texture.ImageClassName = 'TGLBlankImage'
  3149. Material.Texture.Image.ColorFormat = 6408
  3150. Material.Texture.Disabled = False
  3151. end
  3152. item
  3153. Name = 'RefractMap'
  3154. Tag = 0
  3155. Material.Texture.Disabled = False
  3156. end
  3157. item
  3158. Name = 'BackgroundTex'
  3159. Tag = 0
  3160. Material.Texture.Disabled = False
  3161. end
  3162. item
  3163. Name = 'LibMaterial'
  3164. Tag = 0
  3165. end>
  3166. Left = 768
  3167. Top = 32
  3168. end
  3169. object GLScene1: TGLScene
  3170. Left = 504
  3171. Top = 32
  3172. object Camera: TGLCamera
  3173. DepthOfView = 100.000000000000000000
  3174. FocalLength = 50.000000000000000000
  3175. NearPlaneBias = 0.001000000047497451
  3176. TargetObject = World
  3177. CameraStyle = csInfinitePerspective
  3178. Position.Coordinates = {0000A0400000A0410000C8420000803F}
  3179. end
  3180. object LightCube1: TGLDummyCube
  3181. Position.Coordinates = {000096C30000A040000096430000803F}
  3182. OnProgress = LightCube1Progress
  3183. CubeSize = 1.000000000000000000
  3184. object LightSource1: TGLLightSource
  3185. ConstAttenuation = 1.000000000000000000
  3186. LightStyle = lsOmni
  3187. SpotCutOff = 180.000000000000000000
  3188. end
  3189. end
  3190. object LightCube2: TGLDummyCube
  3191. Position.Coordinates = {000096430000C842000096430000803F}
  3192. OnProgress = LightCube2Progress
  3193. CubeSize = 1.000000000000000000
  3194. object LightSource2: TGLLightSource
  3195. Ambient.Color = {CDCCCC3DCDCCCC3DCDCCCC3D0000803F}
  3196. ConstAttenuation = 1.000000000000000000
  3197. Diffuse.Color = {EAEA6A3FEAEA6A3FA7AD2D3F0000803F}
  3198. LightStyle = lsParallel
  3199. Specular.Color = {0000803F0000003F0000003F0000803F}
  3200. SpotCutOff = 180.000000000000000000
  3201. end
  3202. end
  3203. object World: TGLDummyCube
  3204. CubeSize = 1.000000000000000000
  3205. object ScreenBackGround: TGLHUDSprite
  3206. Material.MaterialLibrary = MaterialLibrary
  3207. Material.LibMaterialName = 'BackgroundTex'
  3208. Visible = False
  3209. Width = 256.000000000000000000
  3210. Height = 256.000000000000000000
  3211. Rotation = 0.000000000000000000
  3212. end
  3213. object Objects: TGLDummyCube
  3214. CubeSize = 1.000000000000000000
  3215. object Sphere: TGLSphere
  3216. Material.MaterialLibrary = MaterialLibrary
  3217. Material.LibMaterialName = 'ShaderMaterial'
  3218. Visible = False
  3219. Radius = 45.000000000000000000
  3220. Slices = 64
  3221. Stacks = 64
  3222. end
  3223. object FreeForm: TGLFreeForm
  3224. AutoCentering = [macCenterX, macCenterY, macCenterZ, macUseBarycenter]
  3225. AutoScaling.Coordinates = {0000484200004842000048420000803F}
  3226. end
  3227. object Torus: TGLTorus
  3228. Visible = False
  3229. MajorRadius = 40.000000000000000000
  3230. MinorRadius = 15.000000000000000000
  3231. Rings = 64
  3232. Sides = 64
  3233. StopAngle = 360.000000000000000000
  3234. Parts = [toSides, toStartDisk, toStopDisk]
  3235. end
  3236. end
  3237. end
  3238. end
  3239. object Cadencer: TGLCadencer
  3240. Scene = GLScene1
  3241. MaxDeltaTime = 0.020000000000000000
  3242. OnProgress = CadencerProgress
  3243. Left = 632
  3244. Top = 32
  3245. end
  3246. object ColorDialog: TColorDialog
  3247. Left = 509
  3248. Top = 137
  3249. end
  3250. object GLSimpleNavigation1: TGLSimpleNavigation
  3251. Form = Owner
  3252. GLSceneViewer = Viewer
  3253. ZoomSpeed = 1.100000023841858000
  3254. RotateTargetSpeed = 0.500000000000000000
  3255. FormCaption = 'Shaders Lab - %FPS'
  3256. KeyCombinations = <
  3257. item
  3258. ShiftState = [ssLeft, ssRight]
  3259. Action = snaZoom
  3260. end
  3261. item
  3262. ShiftState = [ssLeft]
  3263. Action = snaMoveAroundTarget
  3264. end
  3265. item
  3266. ShiftState = [ssRight]
  3267. Action = snaMoveAroundTarget
  3268. end>
  3269. Left = 896
  3270. Top = 32
  3271. end
  3272. object OpenPictureDialog: TOpenPictureDialog
  3273. Left = 632
  3274. Top = 136
  3275. end
  3276. end