Changeset 77 for trunk/Forms
- Timestamp:
- May 19, 2021, 11:30:41 AM (4 years ago)
- Location:
- trunk/Forms
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Forms/UFormImages.lfm
r76 r77 361 361 Stretch = True 362 362 end 363 object ImagePlay: TImage 364 Left = 168 365 Height = 64 366 Top = 152 367 Width = 80 368 Picture.Data = { 369 1754506F727461626C654E6574776F726B477261706869636214000089504E47 370 0D0A1A0A0000000D4948445200000200000002000803000000C3A624C8000002 371 B2504C5445000000000000000000000000000000000000000000000000000000 372 0000000000000000000000000000000000000000000000000000000000000000 373 0000000000000000000000000000000000000000000000000000000000000000 374 0000000000000000000000000000000000000000000000000000000000000000 375 0000000000000000000000000000000000000000000000000000000000000000 376 0000000000000000000000000000000000000000000000000000000000000000 377 0000000000000000000000000000000000000000000000000000000000000000 378 0000000000000000000000000000000000000000000000000000000000000000 379 0000000000000000000000000000000000000000000000000000000000000000 380 0000000000000000000000000000000000000000000000000000000000000000 381 0000000000000000000000000000000000000000000000000000000000000000 382 0000000000000000000000000000000000000000000000000000000000000000 383 0000000000000000000000000000000000000000000000000000000000000000 384 0000000000000000000000000000000000000000000000000000000000000000 385 0000000000000000000000000000000000000000000000000000000000000000 386 0000000000000000000000000000000000000000000000000000000000000000 387 0000000000000000000000000000000000000000000000000000000000000000 388 0000000000000000000000000000000000000000000000000000000000000000 389 0000000000000000000000000000000000000000000000000000000000000000 390 0000000000000000000000000000000000000000000000000000000000000000 391 0000000000000000000000000000000000000000000000000000000000000000 392 0000000000000000000000000000000000000000000000CD1F3532000000E574 393 524E53000102030405060708090A0B0C0D0E0F101112131415161718191A1B1C 394 1D1E1F202122232425262728292A2B2C2D2E2F3031333435363738393C3D3E3F 395 4041424445464748494A4B4E4F505152535458595A5B5C5D6061626364656667 396 696A6B6C6D6E6F707475767778797A7B7C7E7F8081828384858687898A8B8C8D 397 8E8F9091939495969798999A9B9D9E9FA0A1A2A3A4A5A6A7A8A9AAABACADAEAF 398 B0B1B2B3B4B5B6B9BABBBCBDBEBFC0C2C3C4C5C6C7C8C9CACBCCCDCECFD1D2D3 399 D4D5D6D9DADBDCDDDEE0E1E2E3E4E5E6E7E8E9EAEBECEDEEEFF0F1F2F3F4F5F6 400 F7F8F9FAFBFCFDFE1ECAFC2B0000107A49444154789CEDDDF99FD75515C77137 401 724971435C53DC404BD172CBAD52B45C4BD054304DC152A0722F17D052C43250 402 DB0449914505716111198D45050CD1588A419DC11998E5FC1F219BB3DCEFF7FB 403 59EEE7F3BEE7DCF7F30FE071EFFDBC7E3B67BEECB45331761DB27B41FF32E9B0 404 64D2C1E82310D22259781EFA0C04B450E4B31B77419F8260360720327E7FF431 405 08654B0032FF0CF43908646B0052FF53F44108635B00D23E661FF45108617B00 406 22AFF7479F8500BE0A40D65C853E0C95AF4300B2E9A1BDD1C7A1B2750C40E4A5 407 E3D1E7A192750E40565E863E1095AB4B00D274D71EE8235199BA0620F2C291E8 408 335189BA07204B2F441F8ACAE308401A6FEF813E1695C51580C8042E09C4C21D 409 009704A2512100F9FC262E0944A15200224F1D803E1B95A0720032FF4CF4E1A8 410 78550290FA6BD1A7A3C2550B40DA1FEF893E1F15AC6A00226F9C823E2015AB46 411 005C12B0AE56005C1230AE6600222FF7451F928A9320002E095896240069BA7B 412 4FF439A920890210997C14FAA0548C8401C8B201E89352219206201B867349C0 413 A2C401884C38047D58F22F4500B2E87CF469C9BB340148C3CFB924604DAA00B8 414 24604FCA00E46D2E09D89236002E0918933A00691FCB250143D207C0250153B2 415 04206B06A28F4DBE640A405A467149C0886C017049C08CAC01C8CACBD147271F 416 320720CDF77049C080EC01884CEE833E3DE5962700597611FAF89457AE0064C3 417 88AFA12F40F9E40B40E4392E09E89637002E0928973B0069B87957F42528BBFC 418 01883C7320FA1694998F0064C159E86B50565E0290F5D7A1EF4119F90940DAC7 419 EE8BBE0965E229009137B924A092B70064ED20F45D28037F0148CB28FEAF33FA 420 780C40E4152E09A8E335002E09E8E3370069BE974B02BA780E40E4C53EE82B51 421 1ADE0390E55C12D0C47F005C1250A58000B824A0492101C8E2EFA1EF45091513 422 8034DEC25F12D0A1A000449EE985BE1A2551580052C725010D8A0B40D60F465F 423 8E6A2B30009127F6435F8F6A293400997D2AFA7E5443B101704920780507202D 424 A3B92410B4A2031099D10F7D47AAA2F800E4E32BD097A4CA4A0840367249205C 425 65042032A50FFA9E54413901C8F28BD11725B79202902F467249204865052032 426 E950F45DC9A1BC006409970402546200D23894BF24109C320310F9CB41E8FB52 427 17E5062075DF455F983A2B3900593F047D63EAA4EC00B8241098F20390395C12 428 08082000597B35FAD6B4032200697D984B02A180042032F304F4C5692B50005C 429 1208052A00D978DF5EE8BBD34EC00044A61D8DBE3C410390E53F44DF9EA00148 430 D3AFB82480060D40E49F87A11F2076E000E4BDEFA35F2072E800A47118970490 431 E0017049002B8000E41D2E09E08410807CCA250198200210F9E3FEE887885520 432 01C89C6FA35F2252A104206BAF413F459C8209405A1FE9897E8C188513009704 433 20420A403EB912FD1CF1092A00D9F45B2E09942CAC0044A61F837E91C8841680 434 7CC825815205178034FF9A4B02250A2F0091E70F47BF4A44420C804B02250A32 435 00D9702B97044A126600227FED8D7E9948841A80BCCB258152041B807CFA33F4 436 DB4421DC0044FEC42581E2851C80CCE59240E1820E40FECB2581A2851D80B4FD 437 9E4B02C50A3C00915927A29FC8B6E003904F7E8C7E23D3C20F405A7EC72581E2 438 28084064FAB1E867B24B4500F2E18FD0EF64968E00A479780FF44B19A5240091 439 89FCEF060AA12600597C1EFAAD4CD2138034DCBC0BFAB50C521480C853BDD0CF 440 658FAA0064C119E8F732475700527F3DFAC1AC511680C818FE77035EA90B4066 441 F747BF9929FA02903503D18F6689C200A4F521FE7703DE680C40E495BEE87733 442 436700B2F272F4C359A13400D974CF9EE8A7B3416B002253FAA0DFCE04BD01C8 443 B201E8C7B3407100D234824B02B9690E406422FFBB81BC7407C02581DC940720 444 8D43B924908BF600449EE67F379087FE00A48E4B0239180840EA07A35F51310B 445 01883CCE5F12C8CA46005C12C8CC48005C12C8CA4A00D23A8A4B025998094064 446 463FF4636A6428002E096461290069E192406AA60210997A34FA41B531160097 447 04D2B21680348DE07F379086B900449EE392400A06039025E7A35F55118B0148 448 03970412331900970492331A80D49D897E5925AC0620EB87A09F5607B301888C 449 E592400286039039A7A05F5701CB01C89A41E8E70D9FE900A46D3497046AB01D 450 80C84C2E0954673D00F9F80AF41387CD7C00D2722F9704AAB01F80C8342E0954 451 164300B2EC22F433872B8A00A4994B0295C41180C8A4C3D12F1DA85802E09240 452 05D104208DC3B824E0104F00224FF746BF7680620A40DEE19240375105C02581 453 EEE20A804B02DDC416009704BA882E002E0974165F005C12E824C200445E3D01 454 FDECE188320059C92581EDE20C405AB924B04DA401884C3F06FDF46188360059 455 7E31FAED83106F00D23C924B0251072032E908F4F3E3451D80BCC72581B803E0 456 9240EC01883C7330FA1360451F80BC7316FA1B403180C8970418C0664F1C80FE 457 0C380CE04B73E35D1260005BACBD1AFD215018C056EDB12E093080ED66C5B924 458 C00076F8F84AF4C74060005F89724980017434FD58F4F7281D03E824BE250106 459 D059F3C81EE84F522E06D055644B020CA09BB896041840778DB746B424C0005C 460 225A1260004EEF46F34B020CC06DFD0DE82F5312065049244B020CA0A279512C 461 093080CAA25812600055B43FDC13FD7D0AC700AA9A7522FA03158D0154677E49 462 8001D4607D498001D4647B498001D4667A4980012460794980012432E91BE80F 463 551406908CD92501069090D52501069098CD25010690DCBB167F498001A46071 464 498001A4626F498001A433EF54F417F38C01A4B4F61AF427F38B01A4F6B0A95F 465 126000E9995A12600019585A12600059B4DEB717FAC3F9C200B231B324C00032 466 B2B224C000B232F2DF0D3080EC4C2C0930801C2C2C0930803C0C2C0930807CD4 467 2F0930809CB42F093080BC942F093080FC542F0930000F342F0930001F142F09 468 30003F466BFD250106E0C96BDF447FCA6C18802F4A9704188037ADF769FC2501 469 06E091C6250106E0D30A7D4B020CC0A74F2E417FCFD4188047AFF5437FCEF418 470 803F0F6AFC830106E0CB6A9DBF2BCA003C79AB3FFA5366C300FC786C7FF497CC 471 8801F850AF772780017850773AFA3366C700F21BDF1BFD1573600079350EDB19 472 FD11F36000392D3907FD09F36100F94CD4FED7410C208F8D2377437FC0BC1840 473 0ECB06A03F5F7E0C20BB690AC7FFDD3080AC5AEEDA03FDF17C600019ADB80CFD 474 E9FC6000D9681CFD3B31804C548EFE9D1840064A47FF4E0C20BDB74E467F358F 475 18406A6A47FF4E0C20A5FA21E84FE617034847F3E8DF8901A4A27AF4EFC40052 476 503EFA776200C92D563EFA77620089A91FFD3B3180849AF58FFE9D184032CB2E 477 447FA982308044A65A18FD3B3180048C8CFE9D18406D2B2E457FA50231809ACC 478 8CFE9D18402D7646FF4E0CA03A4BA37F270650D53C4BA37F270650CD1853A37F 479 270650D93ABD7FF59F1C03A868C169E88F53060650C9F883D0DFA6140CC0CDE2 480 E8DF8901382D3E17FD61CAC2005C6C8EFE9D184077CD236C8EFE9D1840374BAD 481 8EFE9D1840577647FF4E0CA033CBA37F2706D08995BFFA4F8E0174F45A5FF4F7 482 281D03E8C0F8E8DF8901EC607EF4EFC400B69B7712FA5B4030806D6CFDD57F72 483 0C600B6B7FF59F1C03F8521CA37F2706B0D9B83846FF4E0C209ED1BF130330F9 484 57FFC9451FC08423D09F002BF200A21AFD3BC51D405CA37FA7A803987A0CFAF9 485 F1220E20BAD1BF53BC01C437FA778A368059F18DFE9D220DA0FDC1BDD12F1F88 486 3803583D08FDEEC1883280B9E6FFEA3FB918038875F4EF145F00EB06A3DF3C28 487 D10510F1E8DF29B600621EFD3BC5154043D4A37FA7A802887CF4EF145300B18F 488 FE9DE209A07978ECA37FA76802E0E8DF2D9600A61E8D7EE940C511C0A63B39FA 489 AF208A004CFFE07F4E3104F0EAF1E8570E98FD0038FAAFCA7C00AB38FAAFCA7A 490 0073E2FCABFFE48C07C0D17F2DA603E0E8BF36CB0170F49F80E10038FA4FC26C 491 000D4339FA4FC26A008BCE46BFAC12460378F670F4C36A613280268EFE13B318 492 C0071CFD27673080291CFDA7602E008EFED3B1160047FF29190B602647FF2999 493 0AA0ED018EFED3B214C0AA81E8D754C85000B339FACFC04E008FEE877E4B95AC 494 04B0EE7AF44B2A652480B739FACFC84600E37AA1DF512D0B0134DCC2D17F6606 495 02E0E83F0FFD0170F49F8BF6009A6EE7E83F17E5017C7001FA01B5D31DC08B7D 496 D0EFA79EE60036DDC1D17F6E8A03E0E8DF07BD01CC380EFD7626680DA0ED7E8E 497 FEBD501AC0AAABD00F6785CE00DEFC16FADDCC50190047FFFE280C80A37F9FF4 498 0530FF3BE83733455D004F72F4EF95B20038FAF74D57000B39FAF74D5500FF38 499 0CFD5CF6280AA0E9368EFEFDD3130047FF855013C0E4A3D04F659392005A7EB3 500 3BFAA58CD211C04757A0DFC92C1501CCEA877E26BB1404D0367A1FF42B19167E 501 006BAE41BF9169C10730F714F413D9167A0063F983FFC50A3B80F537A0DFC7BC 502 A003A83B13FD3CF6851CC0D3BDD1AF1381700368BC7517F4E3C420D800969C8F 503 7E9A38841AC07347A05F26126106D03CB207FA6162116400CB2E423F4B3C420C 504 601A7FF0BF3CE105B0E96EFED57F89820BE0A3CBD14F1297D0027895A3FF7285 505 1540DB288EFE4B165400ABAF463F477C420A604E7FF46B4428A0001EE7E81F20 506 9800EA87A09F224EA104507706FA25221548004F71F40F1244000DC338FA4709 507 2180C5E7A15F2162010430913FF80F040FA0690447FF48E8009672F48F050E60 508 6A1FF0FDA3070D80A37F3C64002B38FAC7030630B32FFAF2040CA0F521FEE07F 509 085001AC1E84BE396D010A603647FF81C004C0D17F301001D40F46DF9A760004 510 B080A3FF80941FC0F883D077A60ECA0E80A3FFC0941CC0E273D117A6CECA0D60 511 027FF03F346506F0C5708EFE835362004B07A02F4BDD9517C014FEE07F88CA0A 512 60E35D1CFD07A9A400565C86BE28B99513C00C8EFE43554600AD0F72F41FAC12 513 02583D107D49AAACF800DE3C197D47AAA2E800DAC7EC87BE2255537000F5D7A3 514 2F48D5151BC0DBA7A3EF4735141AC0F85EE8EB512D0506D0307467F4EDA8A6E2 515 02E0E85F85C2027896A37F150A0AE08BDB7743DF8C122926008EFED528248017 516 39FA57A3800036DEC9D1BF1EFE03E0E85F15EF01BC723CFA4A9486E70038FAD7 517 C66F00AB38FAD7C66B006F70F4AF8EC700DA1FE3E85F1F7F01ACE3E85F236F01 518 70F4AF93AF00C671F4AF939F003EBF85A37FA5BC04B088A37FB57C04F0ECA1E8 519 5B5066F903D8701BFFEA5FB1DC017C7021FA0A9447DE00261F89BE01E5922F80 520 668EFEB5CB15C08A4BD1C7A7BCF204F03247FFFA650FA0E5018EFE0DC81CC0AA 521 ABD047271FB206F0C649E8939317D902687F6C5FF4C1C98F4C01ACBB0E7D6CF2 522 254B00F34F439F9ABCC910C0B803D187267F5207F0F9CD1CFD5B92368085E7A0 523 4F4C5EA50CE0EF87A00F4C7EA50A60C32FF957FFD6A409E07D8EFEED4911C00B 524 FCAB7F831207D07C0747FF16250D80A37FA31206C0D1BF5589026879E0EBE873 525 52419204B0EA27E85352611204F03A47FF86D50CA0ED518EFE2DAB15C0FFAE45 526 9F900A5523008EFEADAB1EC09F39FAB7AE5A009FDDC4D1BF795502587836FA70 527 54BCCA0170F41F854A013472F41F870A01BC7F01FA60540E7700CFF3AFFE63E1 528 0AA0E98EDDD1C7A2B23802F8F725E8435179BA07F0D271E8335189BA06B0E97E 529 8EFEA3D22580FF70F41F99CE0170F41F9D8E01B4FDA127FA3854B60E01ACE3E8 530 3F425F05F01647FF31DA11C09307A08F4208DB02F8F4468EFEE3B435807F71F4 531 1FAB2D01FCED60F431086573008DBFE0E83F5E0BE5FD1FA0CF40404BA672F41F 532 B3DD86EE893E0225F17F480E00F1A20F60070000000049454E44AE426082 533 } 534 Proportional = True 535 Stretch = True 536 end 537 object ImagePause: TImage 538 Left = 168 539 Height = 62 540 Top = 232 541 Width = 74 542 Picture.Data = { 543 1754506F727461626C654E6574776F726B477261706869632401000089504E47 544 0D0A1A0A0000000D4948445200000080000000800803000000F4E091F9000000 545 27504C5445000000000000000000000000000000000000000000000000000000 546 000000000000000000000000DD12F9B50000000C74524E53000F1F2F3F4F5F6F 547 7F8FDFEF00B0AFC6000000A049444154789CEDDA410E8320144551454554F6BF 548 DE762C900E684BD29E3B7E919338FDD324499224492F0A7BBA15E7D6768EF7ED 549 1E7ADF3F72D915EBDB7855C6C7FBDF7FB6D5B65B7DDB2508F56FE6B3363E1BE3 550 9EBF901ADFCC4BB95D5ADBF409C05A6E57000000000000000000000000000000 551 00000000000000000000000000000000000080FF027CEB8C67F821D3F053AEF1 552 C76CE3CFF924499224FD7E0F0EE7B7CD3A119A340000000049454E44AE426082 553 } 554 Proportional = True 555 Stretch = True 556 end 557 object ImageFastForward: TImage 558 Left = 163 559 Height = 95 560 Top = 312 561 Width = 81 562 Picture.Data = { 563 1754506F727461626C654E6574776F726B47726170686963F30A000089504E47 564 0D0A1A0A0000000D49484452000001000000010008060000005C72A86600000A 565 BA4944415478DAEDDD4B8CDD6519C7F127B60AC15602DE8A513AD504148C4E97 566 82B0305A12224160AB25EA462E2ED448594B31F592D8B25283256165CB454C6C 567 8D46E9E092AA78A99AA86567698C344630B6E552DF7F3AA76927E79C3933732E 568 FFFFF37EBEC96FC786F7ED7CDB39CFEF794F0400000000000000000000000000 569 0000000000000000000000000000000000000000000000000000000000000000 570 000018855D256F730C29D958F2C5924B1C050671A6E470C9758E221D9796BC5C 571 F2B3920F380E0C124093FF947CA964BD2349C35B4A5E5CBCDFE3259F75241824 572 805EF697BCDBB1A413402F8F965CE1683048004DFE5AF249479352004DFE5C72 573 B3E3C12001343959B2B36483234A2780DEFDEE72BF38B34C7E51728D634A2780 574 5E0E95CC3B2A021896174AB63BAA940238B3F8DFDC55B2CE9111C0A0BC56F2BD 575 D019C828805E7E5872A563238061F975E80C64154093A325B73B3A0218169D81 576 BC026872BA6477C9658E900086E5B1D019C828805E9E2DB9DE3112C0B0E80CE4 577 154093974A76945CEC3809605867E0813053CE28805E7E5272952325009D813A 578 05D0E45818071340E80CD42A8026AF97EC2DD9E47809605867E0BBA133905100 579 BD1C29D9E688094067A04E0134F95FD817218058FE53649D819C02B04F400023 580 E7F192F738EE94026872A2E4EEB04F400043F2B7D019C82A805EF6956C76F404 581 3028A7426720B3009A3C1FF609086099FCB2E45AC79F52004D5E29D95372B96B 582 20009D81FA04609F800056F4CEC0DB5D454A0134699E26B74F40003A03950AA0 583 97032557BB1602D019A85300F6090860E4CE80A7A9720AA0B74FF048D8272080 584 D019A85100E7EF13DCE49A0860586740D73CAF007CFF04018CDC19F0CE404E01 585 F4B250B2D5951180CE409D02B04F4000237D78A433905700E73F363BE7FA0840 586 67A04E01D827208091BE9BE0CBA133905500BD7D8287C23E01010CC913A13390 587 5500F6090840678000CEED13DC1FF6090820067F9D9579725E01F47230EC1310 588 40E80CD42A00FB0404305267E04E579B5600BD34FB0457B86602D019A85300F6 589 090860D9FC26EAED0CD42080DECEC883251BFD3813C0A077069ACEC03A02489D 590 85F0FD040410DE19A855006716FF7FEF09FB040410833B03B71040FAD8272080 591 EA3B03350BC03E01012C9BA7237767A076013479357C3F0101449DEF0C10807D 592 0202887A3B0304D07F9FE0223FF604504367800006EF13BCDF8F3E01647F6780 593 003C314700AB4CF3CEC06602489FBD51F93E813F0479DF192080D1F709B61180 594 0C7A96AAE9996F2080F4FB0455BE27E1F2F376060860E579262AFB7E02973E7A 595 8E47B7DE192080D5EF1354F3FD042E3C6F678000D696FD51C13E818BCEDB1920 596 80B5E76824DF2770C96B7F67603D01D82720009D0102B04F400095E6EFD1BECE 597 0001D827208029A66D9D0102B04F40003348D319B89600D227C5F713B8C8BC9D 598 0102B04F400033CEF763769D0102B04F40002DC86F67F4E93101D82720801675 599 06BE32E5CE0001CC6E9F609E00645067608E00EC131040DDEF0CDC4200D5EC13 600 6C2100E9D719F8FA847F5F2480F6EC13DC4600D22F874A3E4800E9F35AB4749F 601 C0E5E4ED0C1040FB72385AB645EA52F2760608A0BD13A11DD1927D021792B733 602 4000F60908A0A37F438CE39D0102687FFE51F21902907E79728D9D0102E84E7E 603 1033DA2770F879DF192080EEED137C8200645C9D0102B04F400089B2B0C2CE00 604 0174FBAEE70940D6D2192080EEEF13DC1513DE2770D0DDCC28DF4D400079F609 605 E6084056DA192000FB04045071678000F2ED13EC8E31EF1338D83CEF0C6C2180 606 2AD27C3FC1750420CB75060820F7BFFCEE8B31EC1338CC9C9D81372FFEE12080 607 DC39106BDC27708839D37C37C1474AFEE92CAAD827F83401C8D29C2839ED1CAA 608 C9C3ABD92770702279F2C7928F138048BD3959F2C0A8FB040E4C24EF3EC15602 609 10A937FF2AF942C91B0840A4DEEC1BB44FE07044EA298A7D8A0044EADE27F84E 610 C9650420526F9E2BF918018810808854F42BC0EE386FA5D8A188D4F321E06D3E 611 041431062400910AF2A22290489D79461558A4CE65A0AF590612A9731D789B75 612 6069F2EFF020484D59D5178C3AB89CF955C90DE149B01AE24930B9A0E8F1ADC5 613 DFFF3C0A9A3F07C3A3A0B298E7976C7B79163C6F3C0B2E17E4C725EF5B72B704 614 9033BE1844CEE5E5921D256FEC73B70490EFD7BB3DE1ABC164317F28B971C8DD 615 1240AE1EFFED31011C6E77473E9B96B95B02C8115F0F2EE7D28CF53E3FE2DD12 616 40F77BFC7797AC8B09E2A0BB35DB9F5FC1DD1240B7EF7A6B4C0187DD9DD9FEC6 617 15DE2D01742FA74A76AEE2AE09A092D93E01E4CD9195F6F80920FF6CFFBD6BB8 618 5B02E84EF6AEA6C74F00F5CDF60920578E956C8F19E212BA35DB27803CF969AC 619 B1C74F00F966FBEF1CE3DD1240BBFF857751B40017D2ADD93E01743B87638C3D 620 7E02E87E9A77DB3E3CA1BB2580F6F5F8DF1A2DC3E5CC26AFAE72B64F00DDCBD1 621 98508F9F00BA3BDBBF750A774B00B3CF63255BA2C5B8A46ECDF609A01B391153 622 E8F113407DB37D02C8B7B34100C9F3FB31CEF609408F9F002A9EED13407B7BFC 623 3745077179939BED7F6EC6774B00C97BFC04D0DED9FE875A70B70490BCC74F00 624 ED9BED7FB345BF031240F21E3F01B4ABEC716BCBEE96002633CDB93F5AD2E327 625 8076E4A996963D0860FC3DFEEB23192E766D7F1BDC37E5D93E01CCA6C7FF50B4 626 B0C74F00F5CDF60960FABFDADD118971C9DD9AED13C0747BFC73911C173DFBBD 627 7D02685F8FFF9EE8408F9F00A6978568C76C9F0026DFE1D81A15E1D287E79568 628 D76C9F0026D7E37FB0A3F74C0013CAB4F6F609408F9F005A96A7627A7BFB0430 629 BB3C121DEEF113407DB37D02184F5E28B933E00F43746BB64F007AFC04308174 630 65B64F00ABCF7FE36C8FFF623FF604D0A6BD7D02984E8FFFA37EDC09A0EBB37D 631 0258F98A76DA1E3F01AC7EB6FF8DC83FF3AD5D00CD18F70E3FE2049069B64F00 632 A3E5F1A8A0C74F0039F6F60960BC3DFE7BA3921E3F01D437DB2780E13DFE793F 633 D204707E7E577243A5775B8B00AAEDF113407DB37D02B8307F8A8A7BFC0450DF 634 6C9F00CEE6F5D0E32780A86FB64F007AFC0410F5CEF66B1740D3E3BFDAD51240 635 DBDFE427003D7E0288E9CCF6E75C636A01E8F113C0C0D9FE9B5C615A01E8F113 636 C0C0D9FE8DAE2EB500F4F809A0EFE8E7E1A87BB65F83009A1EFF66D7470066FB 637 7509A0AAF7F80960F41C0AB3FDEC02A8EE3D7E02583EA7C36C3FBB004E96EC74 638 C70460B65F9F00F4F809A06F7E1466FB9905D07C98BB37F4F80920ECEDD72680 639 6325DB5D0D01D8DBAF4F0007438F9F00A2FF6CFF1DAE22AD009A7FD9E9F11380 640 D97E85027836F4F80920CCF66B1340B39EBDA7E472D740004B67FBBBC2DC37B3 641 009A11AE1E3F0154FD267FAD02D81F7AFC041066FBB509408F9F00067E02FCD5 642 B0B79F59000BE13D7E0208B3FDDA04A0C74F0066FB950AE048E8F1134098EDD7 643 26805E8F7F93E32500B3FDBA04D0F4F8BDC74F0066FB150AE040C9558E9400EC 644 EDD72580974A76841E3F01F4C99361B69F59007AFC0460B65FA100F4F8096060 645 9E0BB3FDCC02D0E32700B3FD4A05B0AFE44AC7460066FB7509A0D7E35FEFC808 646 60699E0EB3FDCC0258083D7E02E89353E14DFECC02687AFC4D7763836322007B 647 FB7509E02F25373B1EF413C01361B69F59008F96BCCBD160A9009AC65733DBF7 648 267F4E011C0F1FE4628000CCF67372699C2D6DFDBCE41AC7817E7C3BCCF6B3D2 649 7C807B6FC9258E02000000000000000000000000000000000000000000000000 650 00000000000000000000000000000000000000000000006075FC1F4FD4830F12 651 A78CC60000000049454E44AE426082 652 } 653 Proportional = True 654 Stretch = True 655 end 363 656 end -
trunk/Forms/UFormImages.pas
r76 r77 13 13 14 14 TFormImages = class(TForm) 15 ImageFastForward: TImage; 16 ImagePause: TImage; 17 ImagePlay: TImage; 15 18 ImageLeftArrow: TImage; 16 19 ImageLocomotive: TImage; -
trunk/Forms/UFormMain.pas
r76 r77 46 46 procedure LoadGraphicAssets; 47 47 procedure DarkModeChange(Sender: TObject); 48 procedure CopyImage(DestBmp: TBitmap; SourceBmp: TBitmap; Grayed: Boolean = False); 48 49 public 49 50 FullScreen: Boolean; … … 85 86 begin 86 87 SaveConfig; 87 Engine.Free;88 FreeAndNil(Engine); 88 89 end; 89 90 … … 216 217 procedure TFormMain.LoadGraphicAssets; 217 218 begin 218 Engine.ImagePassenger.Picture.Assign(FormImages.ImagePassenger.Picture); 219 Engine.ImageLocomotive.Picture.Assign(FormImages.ImageLocomotive.Picture); 220 Engine.ButtonBack.Bitmap.Assign(FormImages.ImageLeftArrow.Picture.Bitmap); 219 CopyImage(Engine.ImagePassenger.Bitmap, FormImages.ImagePassenger.Picture.Bitmap); 220 CopyImage(Engine.ImagePassenger.BitmapDisabled, FormImages.ImagePassenger.Picture.Bitmap, True); 221 CopyImage(Engine.ImageLocomotive.Bitmap, FormImages.ImageLocomotive.Picture.Bitmap); 222 CopyImage(Engine.ImageLocomotive.BitmapDisabled, FormImages.ImageLocomotive.Picture.Bitmap, True); 223 CopyImage(Engine.ButtonBack.Bitmap, FormImages.ImageLeftArrow.Picture.Bitmap); 224 CopyImage(Engine.ButtonBack.BitmapDisabled, FormImages.ImageLeftArrow.Picture.Bitmap, True); 225 CopyImage(Engine.ImagePlay.Bitmap, FormImages.ImagePlay.Picture.Bitmap); 226 CopyImage(Engine.ImagePlay.BitmapDisabled, FormImages.ImagePlay.Picture.Bitmap, True); 227 CopyImage(Engine.ImagePause.Bitmap, FormImages.ImagePause.Picture.Bitmap); 228 CopyImage(Engine.ImagePause.BitmapDisabled, FormImages.ImagePause.Picture.Bitmap, True); 229 CopyImage(Engine.ImageFastForward.Bitmap, FormImages.ImageFastForward.Picture.Bitmap); 230 CopyImage(Engine.ImageFastForward.BitmapDisabled, FormImages.ImageFastForward.Picture.Bitmap, True); 221 231 if Engine.DarkMode then begin 222 BitmapInvert(Engine.ImagePassenger.Picture.Bitmap); 223 BitmapInvert(Engine.ImageLocomotive.Picture.Bitmap); 232 BitmapInvert(Engine.ImagePassenger.Bitmap); 233 BitmapInvert(Engine.ImagePassenger.BitmapDisabled); 234 BitmapInvert(Engine.ImageLocomotive.Bitmap); 235 BitmapInvert(Engine.ImageLocomotive.BitmapDisabled); 224 236 BitmapInvert(Engine.ButtonBack.Bitmap); 237 BitmapInvert(Engine.ButtonBack.BitmapDisabled); 238 BitmapInvert(Engine.ImagePlay.Bitmap); 239 BitmapInvert(Engine.ImagePlay.BitmapDisabled); 240 BitmapInvert(Engine.ImagePause.Bitmap); 241 BitmapInvert(Engine.ImagePause.BitmapDisabled); 242 BitmapInvert(Engine.ImageFastForward.Bitmap); 243 BitmapInvert(Engine.ImageFastForward.BitmapDisabled); 225 244 end; 226 245 end; … … 231 250 end; 232 251 252 procedure TFormMain.CopyImage(DestBmp: TBitmap; SourceBmp: TBitmap; 253 Grayed: Boolean); 254 begin 255 DestBmp.PixelFormat := SourceBmp.PixelFormat; 256 DestBmp.SetSize(0, 0); 257 DestBmp.SetSize(SourceBmp.Width, SourceBmp.Height); 258 BitmapCopyRect(DestBmp, Bounds(0, 0, DestBmp.Width, DestBmp.Height), SourceBmp, 259 Point(0, 0)); 260 if Grayed then BitmapBlendColor(DestBmp, $ffffffff); 261 end; 262 233 263 234 264 end.
Note:
See TracChangeset
for help on using the changeset viewer.