unit1.dfm

《Delphi7编程100例》代码,书配资料

      5357F4D9B2BF419EED2B126D20C18FB1AE4B9BEDB90D3C3FC07DF6DB98D0F2C7
      F1AE8F71AA7F96EFDD449B780F6D0D63E124218F632FEAC208FEA30FED397CE0
      71CFBAC6103B6F707CBE70B4D8FACD6B3606721CCC11DB4A24D4C70EFC47A27E
      C41B7EB36BE37C3C7FC8B97386B457E723EED3DC8F739C308567E7B807183BEF
      63ECBC8B31FF16C6E81BA0EB18578D30165E07A19D1AA1FD17E8AB05DA4281BA
      2BD0F7076C2FDF96E7383B2711EF539C8F9EE17CC4F312D6620BDCDB2D540ECB
      BA47C2787817745BE5A24C9603FC21DAF72ECF9D3AA75386789F6D001B21F669
      1758C38DB8C2CEE1D20EE83DC418B8F3CEF8DC6165533FE23D055EAAA7E907DD
      A49FF9867E09BEA09E68CB3B688BF1475EE2503F8FE76D957F277C5AFA76F831
      31F11E2FFD582EFDE7EDB5FACAF8CED70FEBC8087A1213FD25FE6EC00EFAEC21
      28FA8EF5E1EC250F75344C618DC32C26F512A92EA2FF80770378D761E73512B0
      383E9118070D715EA9E8C9F2D9460C2B6933B7E197DBC024DD02DF2D60DE008E
      1130195E07267CB08B7122FE680F75226EA460B76102F72E30EFB26CF0DA3BEF
      8065EF704388F7CC0DA1F32EC698F8639F603D192EB11DDE5DA4DF03DD07E67D
      601A01E73EE81EF4BC0B02F6E85A82095F581F142EB18DA81FF1400F80F910F4
      08B88FA0C343C8901E94B8A36B47AA7AB2CFD2A7AC5BC30546B439601A1EF21F
      83EF09301F03EF11E41E82EE61ACC67BE576DF1B9FDF3906581B613F132EB149
      D293988F414F80F914984F80F9989890BD8B73448A897984B55DEA2A5CC30606
      EB86BEA4EDB45B7A0AF341C0BC7A187A8ECFEFC587A82FDACFBA621B306CE283
      D87E58DFAC9B07C8A32F1FC96EE0DD87EC6D9C9BF00EBD5DBCF339FE3E801FA8
      2B71595FC4163EDBF90D90BDC71079F740F74B1FD266E215D73167C0397917E7
      4AFE38DE0D30F6F1DA6188F908C741238C5D1CBF8628678839D210731AB641D6
      6F49A50FA91FF1FAEFE35C8536AFF19EE3F3AECDC731E7C1F993E360248C5FBB
      384F9774B8E8E1BC49A2EF7A81A81FF186E15A46E78F383E4787CC16917EC43B
      084C9E33FB5FED16177FBD502CE1FD1BA48B24BC7BE112090B65CB8156F0FCFD
      2A6E1788D6105FC3B99D7407FED2F99D3A138FF294F172E4BD49C2BCE00E09F3
      847511E61DEBA00D479B9C1F85731C7523568A2179C96D62916F1AA91684499D
      4C1FE844BC0D12F4D82439BC2DCC8FEAC863D247B5780926F1A761B24EE86F62
      4EE897E8B9D580C772F4631DD39759BC96364B6F61B2CEE94BC3945E89BD92B1
      1073E2AD94828F85C9F6C7F612EBC3E1556C0D38DB9C6773FE4E625CF8CE7662
      D29786E96CADD485F0849586215F7AB26DB23DFBF6528B87B9FB768E5006FDA1
      1F31E94B8F99DA1C6D05DE0E9E33F6646524986C9BEC675137DF5E5076F45F8A
      F7C1189BB85ECF094CDF4F8829DF794CE225982C5B3FB677D54FA5CD107B1A66
      C095FD11136DB31153B85E4FFAD4E96A985ECF193029EBEBC7E248A37FE44F8E
      771C4F6BF594FDD295BE258627F91BE7749D43383E733C8DF5EEEB487160520F
      516C0B216D9B78DF96D77107713EBA7975B5D8C67397DCCF367A02C235C2348A
      7B59923D2BDBD72E156BC2C31C7E887907AF476CBEC0F547AC1DD91C82F30810
      D765CAEB625E3B07E27534BE65C16BEA1EEA84CF3B6F7D52EA37C4F5FF10EB1F
      46585FB0635CEB0D508611D7E344286F40C21CC3AEC771ADD1075E0FEB403B58
      03E45E0CDBC347FDB0566384759621D62F86C01C62AD8FBA473CE2E2FACFF00C
      13B80E731BD7EA7CC6D33039472216D6562A78C01812437A09876B065C3B2099
      FDD08F7A7A4CFA8FBA45FDE857E2213DC5218627FA11449FEE9C707A5296B6CA
      DEA01FF186EF939C4EC2332CAC63D461B26EE953FA8F784E47E20D612349FA0D
      51D7AC6F4F137A125358191D4BCCD2E621F424668A2BCCA1EA88BAD85C36D1D1
      6C479EE90A2CB4CB21B75C889CAEC4DC853F8939625FE01C993EF5443C8F491E
      62E27A2562066CF3418A495E8FA7B8E1424FFA86BA12D7B0816BD8D08BDF82C1
      3C99DB4D2A7A329F72C2F221D323054CCCBD0D13736FC3046EC4C41E34DA3E02
      A6ADD7D9FA30AE038029AAF67B6062ED94EB92250133E012B37702374281C9B5
      0A5B03844D555C5C43680DDA42E4738C04E608D73E23E08E70AD3132CCF2FD1D
      554CE41926E5522C1D07CC0F69138932C4846E18E7F94E10C3E4FD128E99F087
      954B1DA84BC4D5B14260B5C64459B021E29A7DC0A984D26F5247BD174D7A8E1E
      61BCA3CFD926E81BB6815A120F43D84B9B713EA2DD7CAF480F6D7404DB7778DF
      006B2B7DE0D87BA8517F7DD66120C6C7848D00903702467CE709E64586877B43
      3B572F153C1F11977E9D89B8B6E56884F5A91D9C8F8877F3DA5AB17D1FEF24F8
      7CAB187DB91D69F8C576D19A3E072F68FBDE9D624D78CF368BE15D9CE7F07E8D
      21741EF23C4ABA76B14A7817C61034B8BA540C3E0974E534D6297173F60A8E9F
      6C14DB77F1FE02EA433C8E51E80343EC05B4633CD36965B01C2B8BE58DCB1CA0
      CC01CA1CB00CE0F52FE3FB2B9781FB74CB743619E23D4019F710F2DC474C8F6B
      7801D7F0880972983B1FE0FCF3ACF483D94B2CEA2A3C6C9B89FA5D0796F922E0
      08EB13E8481F504FD8BFEB31C94FAC88277DC658F4A3F95238018B7825E612D6
      6971DE959EC48CB6423FD9197413DE50780167889094C564FDD256F98F98C283
      9D634C6040BF128B73015282F959F0A76102C7D76FC42C6DA68E866798C22BC3
      8A9EC2A4AF64AFC214D3FC19F4B4F9CF187710DAA8F933628297186CEF868990
      C7868BF2D4F6D1D68724628ACCFEB2DDEF7E88B6444CB679F2454C8737811B30
      39AF22395CF625618E2226F4F1B8BE8FE25EE290A4B91FE79509EE00F77D2B98
      F43BED4B31236EC0C43DCA3CEE22FA7CC0C458627AD206C3ACC1C5BD54D3D3F4
      A59F884D19EA0B1F621E4CCC1EFC392226C637F30BED928D5657AC2F12F02205
      3C62624D731213F7513C26EBC9E30A3F86193CAC698EF53C0E3D1D26E7B2F479
      AC03E866ED47E5383CD9ECECE6FC9FF77A768919C6721B63D96EE1578B43E76A
      C87447E4A30F49D087787DCC5D77D19E88B9FD00E70D8CF33DD4FDEE65F819E9
      24E69374DC631D88C81709367F54E20D9F629CC779C8CE47C0F5E7A279E23C9F
      09EF20AE0DB956D9DD8FEBEEC775F7E3DC7DC8786F8AF77D788F06F753BAFB71
      DDFDB8EE7E5C773F2EECB7E9EEC795F72CBBFB71B8E7C3FB3EEEFED9C4BD00B7
      F6AF7B00BAF7A27B28DDFDB8EE7E9CDA440CD16E1AEFF175F7E34AFFBC6AF7E3
      B8B67817CF8FF3FDB278EF6A961E233D47B85E1B38DABABD56AE5512EF21F0B0
      B638C09A557C9F30D66F062961DD6E6084753BAC73F4B19ED5C7BA6CA47B378B
      AD5B7CBE1D65110B6B75910C9BF8203C275EA512B70F6CA36B08897BE5129EAB
      47887555C3A4AC30F15CB3BD6B8069394C3CD8425D239EC3DCFD18EF54162675
      1116C31C9EEC06C68038861574A49EB807D9AB60828FF6E6F0B258CE87F2A761
      C2CF581330DB5917D2CDDB2B3C8641BF013052327F1213FECC62C63A018E3085
      67EBB3CF07937A9B3F4DCFD066A90FF5F376D31F393DEB748DB67BCC809BB3BD
      820DDB33B8F469E9CF2998EA47C2B43060125714EADE301FE01DCCECC7E867D6
      0FB1F63B61BF70A32FC04B7E923083DEBD2B585B1726D6FA623FF76DCAFC4B9F
      38129E0F85C975F187D093635113A6E94EFD1D2EF945C2066E9F98183FEC9DDC
      C8E79A77D4157DAA5CAF0F6BE1C8B335F1C8538F392426DF631D3087D83B9025
      8759625307AD8F023FF896EF65F79803F25036C59D8267FA1826C624D4BFD539
      FD6936B19E48CE0795B8F211CA970AA52742626E636C1EE2BCD1877CEDBBDBC1
      9B7DD73CEB45445C9C2F784FCAD62A89DBF47E70E635BE23BCEC3B01EFD09FF0
      E1B933E7DE3DF9FC1E9DEB7F57142B3786C5A54F86C5D2C783E2F447A00F07C5
      E207251D7F7F50783A76615018BD33288E9E1D140B27FBC5B1777A45EF9BF211
      084ECD576E61DBD003D0C351B1766F68C7CBD787C5F2359473B5A48B28CFE84A
      59EED2E5B2ECE32897F8474EF68A63A7705B326CB9A4DC9D47A362FDF1A8B879
      7F58ACDE062EF44E7169C745609284495B8EBD077D4FF58AC3BFDCD4D583F110
      EB26745DBD1BF0828EA61BFC410CE1D037C4A28EF409F53C7AB6572CFC6A8C49
      5EEA26FD2E118F3A052CC3A07FE957E8448A3EA56FDFE99798BF1E635286769A
      BD53F0847594F513691273113AB03E5427E62FEAE8EADF6CA4DF6827B150DF47
      401197B63B3D89495BAD8E433DC877CC33DFC96F0EEFC829879B605207D5A785
      D4113E8E7E545D043D8F00973A5608F5EEEB886D81184B1FB35EAAEDAFA2A7C7
      04EE02704986CDB6E4EA9D7EA74EEC432585F68772A4ABB56DD87314B847C04F
      5D856921DAFCE15F6EC5F6497FD367860B1CD399781E137E3D069EA3EF0F8B23
      EF812E0C8B857740905D805F0F9FE815AF394CFA9A3E651F278EF95278D07F11
      74DC3087139887CF0E8BC32781F99B7EF1DACFC77ADA18009B4C57E20243443C
      FA34C55C809E86776A58BC06CCD77EDD2B0EFDCC619E409B857FA82B71AD5E80
      A39078E6CF0FC67A0AF335629E1814877E05CCBF1C63526FDACFBAB2BE076CE2
      8B8E214E2AEB073E0CBE3C6C3A0E8B43BF01E62F8939EE9BAFFDAA5F2C50D7B3
      D41763E10552590643EB3BAAEB50DF87A183E947BC5F837E0ECC9F96981CEF8E
      9EDA2D0EFF7AB758F8CD2EC6C1947A36362EA0AD9058BF56C7BF413DD387B499
      3AFE6C07F225266F57F5BE06EEC9ADE2B59F6DD818C87130476C2BAC5B12EBC3
      083EA4CDC4DB050EF15EA547E70683A258BB5D14ABB7706EBA5614CB9F9474E9
      E3A2205D245D0EF451512C7D18E883A238FD7E512C5EC031DA59EF9B91D9CE3A
      22DEC6E3A2D87C5214EB8F8AE2CEFDA2B8790F74B72C6B0D65ADDE2869E57A28
      F72ACABB5296B304EC45B4AFD3EFF5E2398E32C4DBFA14D8C47D58831BB00D17
      98B487762C41F7D318038E9DD88D63087936A09FE1393DE50FEA489F54FC021D
      CD2FF0097D711A63CB31B443FD5650E69D074EBF60B361A1BC65A753D6AF01F3
      38DAB97EB481FE931FA55FF41D6D0CBEBB98D491EA8B7A7A4CF213C7EA843A3A
      BF451D7398AA7FEAF9C1680293ED88B81ECFFC27BB8919DAD4127D487D3D11F3
      ECD876FA8876AABDC88F86C9F64A5CD025FA007491F82A23B4DFA50F89D9933B
      0BFA88F564B8C0961F55D7119BF585322E91C07F9114CA58FAA88A493FB39E3C
      468CB30CB62512FC435A26E1F812F2884FECA5CB55CCD3EF230F36182EF2231E
      F84D6760ACC2D7ABA83FD20A6819C7A44BC01E63E21510E1474CFA94F54F5CF9
      8F7652BF8887F6B68A7E4B5A21111BE55D04DF69E8790C63BA7E8B17CA3AA4AE
      1137609B8FA9277524DE839288B98C322E1113B69D863F8F9D1A631E7F079818
      075857C28DD85E57E9095CC34439B47D09988BA8F70AE659F657E4A1AE886BFD
      4F3A837F59F504FFD15EB39978D411794BF0D922DAE751CCEBF53B76AA1C030D
      17FAAABF197EC066DBB136C4BA0E6475433CE871FC023071AEE28FE3A78D5338
      AF1EC79C82E360391696E9ECC7A76117DB34DB8B8875721A58D4EFF87BB41BF3
      817776E363051C9F17DFE9154771DE24711C8C84F1EB18E66C25E11C8DBA3542
      7DD07F4749D08F781AE70F62EBC84160DAF9FD2BE8FFAB4BC56B7F71714C3FC5
      F14F978BC3A4BF5C09B45A1CFED95AA09B08413F2FE9D849CC13C2759CCD4388
      67B294919CF8EF60FEB01E6803F36B11E60998177B3A76767C1D47FD0EFF25B0
      AC4C60FC9C189C93505E725BB8AE106D239E27B54FC3A44D3F974EE51CA7C4CB
      E0FC067835348169362678BF2266A2530D1ECBD1EFB5BFB854DA6DF63A5B89F7
      AB36789CD395BA474CD431ED2EFD4F4C6235E9478C1C393D59E7863903DE0960
      7A0A65484F6B7FF065A95B9D7E412F8F93C681AB5FC4B4B692F35FA2D3C91DCC
      9D4B5A406844FC0A26DA26DB628AA9FA75FA54E6E698CBE8587E887AA26D5AFD
      F836233CFA296096BA0187589E307649D72A26EA8798112BC4A5A3D99A6061DE
      11B1890B5EFD3816589F99C06CD091784D98E8E7F361E23A47B8A99EC24CED76
      BEA4BFAC3EBC1FBDAEAD30CBB6A1FA61A83A8E3EF4F86C53C19F1C3F399E9AED
      137AB29EC63E2D711D36742BCB29798EBFE7CE71B8FEE2789AAD77628AD40632
      21F10EFA1CB7C577ABE976D59C21E589C373A6E1E196D20E5EA31B09AF21DFAE
      23BC9A7B3BA1AD8FCB347EFE47FA116B1765185D4308DA21F972D2B82F136594
      B8585A0E768E315723AE6136E1F295EAC2A5DED0750B9FF5D22DBF3166838E01
      8338118B98CE0F5BF86C5AC4441EEDCDDADC80E1F1184F31B3B6CE809762B28E
      27EA23C5C371AA577AECF56C85E9FC9662E9B88209FE79F4DC4ACA99C04CED9F
      623BF144D493ED338B1970D45E2A6D86FE2405DD8417C3A47D1A5F062F8B1970
      2396F4ADC1B4BA4AB04D37E278128E42B31BB6BB7EA4314072B5FA0957580A9B
      30C123DCDA903CC26228BCC4F6A867E0CFE229CFE379CCCB93B64FE03A0CD575
      AD7EA6E31893E39D8D53CE061E7BAAD8E7F82CDDF42BF1D83E35DE737CDEC631
      EB6D6E225E18E7E3F963CEF390C64BE947BC837A74AEFFE976B1796BAB58BF0E
      BAB659DCB90AFA64B3B829BA82B8A3B58F370BA3CB083FDA2C563F64B851F41E
      E31188F0E81CF1B6EE95B47977ABD8C0F1C60D10CBB072CAB258DE3ACB0B65DE
      6139C427EE071BC5DA87D88E111E9DA3EC3630B7EF0317982C4398864BAC6BC4
      0501CF706143C484BEAB1F6E142BEFE1166A78248DBCC432BCDB633C8F435F18
      41376151C79BC1FE35C3E4A329E5E363B485BA79FDA493C7320CE1104B04DB89
      B9FABEC3840E66AB7C186CCCE155708825CA61C2A7F45DE9BFD26FB2D5EADCEB
      271C1F0A333C924659B355757C95985BD17FC2F43AAE02AF6C4341D7049332B1
      3ECC6EE0F9F612DA8CB59B502786495C518A09BBEE04DDA89FE9284CD810DB3B
      F8A46BC4CA61E2F124966FF63B5C96215D2B981F6F0177AB5825098F21F45C79
      0FF50E7FF29127F633AB0F8759EA4A9F967413E1CD2BC02326C8300D3760A37F
      5630E123F6ED5237D94E3D03114F98013762067D5784191E9DA38F689FE9249C
      24344CE0AE0953BA7EB455AC903E28F5D4636EAB01937251B7264CE0AE7ACC0F
      3398F0317D6A75E170A59B0F4D4F87693A3660AEB11D92D87E3C214D580CA38E
      F0658909BB31D6B18EF4E8DCDA15F47F8CA96B97411FA754DA10DB25FC445FB1
      1DAD905837F425C7CF8F4A4C3E3AD7FF94ED631D6DEC0E78413E643CD23A3040
      1F2484F188787D8CC77AD48DB8F33C2EE7659EC7A373DDFDB8EE7EDC1AEE39F8
      FB67768F06F75378FFC3EE59609D5FF7197CD8DD8F2BEFA170CD8E7EE9EEC795
      6DC6EEF375F7E3ECBE33FB50773F4EABDA9321D76679CF8CD771FC639C697BF9
      79CCEE7E1CEEF175F7E3CAB5FFEE7E9CBB5751BDE751DEA3E9EEC7C57B49E93D
      A9EE7E5C726F33DCDF72F7B4BAFB71F9B3963F1FF11CA7FB5D5ACB9C27F4EB9F
      DDFD38DC3773F70DB3F70CEBEE59B835777F5F86F722BAFB71EE1E5AF05FBCF7
      E1FCE6EF55F8B8F727D3BBFB71F0415D3B44BAF76D773FAEBB1FB715EE19BE6A
      F7E3F8A54D7B74EEB767DE7BFB4D7E5B981F1BFE7B90AEF2660D77BFDCB5536B
      931C19C8271E7F2E569A0FEBF2674D17662A971E8B2F0D3D9FE2294FEE58BC0C
      73F9699AE7573CE5F1C7E261C8741D8F46A36C79CA17BFB0664D6F929BA71D08
      EFA0C37974ABF38D74ADCB9F35BD0EAF0E47FC0A3D9FE2CA6B0AC5CBB0894F79
      9E5F71E5E542F13064BE8EBB369AF3D6BF1C5AE61DB7BBBDC6BA58BBD7C74AF6
      56E4217F49FD98E6D1C92FAAA4DF457AA04A7A0DBF7824C39069C266289E5C68
      720EFBE6147E61087F1EFE9BF70678027AD0AC57D049F8E427C93EE9A150FAA4
      F64AEEE6836A7975FCC223BF4869ACDF145F790A29B37C6DBBD136F1EE67B8FB
      083B66F0B29126CCDDBB778ADD871B9187FC3DBC48859493337ECA807CBE6476
      13B93A7EC9925FC4B469FC3939C928AF295459A9FE7532915F7A2676A7729E9F
      79E3E3F1CABC9719E757FD69E9193FD7F10B53BED8717AB27E29279E5C48FE9D
      07E37690E33988B4EE5C3FE9559D7B752E9EE4A8A6787EC5AB1CD523F1085FC7
      DDB9BEEA271D756D549E18876A336A43E39C7CCCF32B9EE72C53C5237C1D776D
      34EFB53B37F042A0473B8D63FCF6A3DDE2CE8DF1184FFE92C6D7FA1E9DFCA2BD
      A44B56580C9966C78FCB32C4930B231F7903E5F8D234F1324CF372C79E5FF11C
      9FD2C4237C1D6FD5D483F2C51F719EC0AE404A6358C72F1EC93054DA9D5B78E9
      BC3B56BA0FB79FF48A75F0F9B4E711DFBA7DB3E8E3E5624D65F5EEAF175B376E
      461EF21BE145673939F28B7C7E1FFC229F2E5E863E5D71C93064DA34FE9C9C64
      94D71496E56D40D776F5D1C75C8EBC9E1AF1C91F887C92ABB51FD70C9E5FD892
      63A834C3237F209FAEB8B0182A6D0B3BF8FB8FC7C74AF721F9D95E7CDA2CF13F
      C51AE9D9137F7BEAECA98B27F76DF15427A136A1946DC32B9EBDCA48BE296459