unit1.dfm

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

      CAF771A5E542CFE7E3395EA5793E1F577E2EF47C3E9EE3559AE7F371E5E742CF
      E7E3395EA5793EC6DBFE24FFBCC2B67A914F3A3D4F1995D914A6BA35F12AAF93
      29176DBD3FDAD6AB649E57D87FB08A13583B924E6DF9C9B75719C9378569394D
      BCCAEB643801D95BFDC897071D0EEEDFC45B95DB917469CB4FBEBDCA48BE294C
      CB69E2555E27F32F87521FF0B80DC987CF2B6C3BBEA7E7C6B672B2A32D7F5A8E
      E49BC24E66F2BCDDE42FE5A57E6B5B47927F5E615BBDF66ACFBCE5B4F143AA5B
      2733BE7668F245EAB7B675D48479107983277805404B52F96DF9C9B75719C937
      8569394DBCCAEB6470AEDF63FDC897071DDA173EF8E59016245DDAF08A67AF32
      926F0A5996F27D5C69B9D0F3F9788E57699ECFC7959F0B3D9F8FE77895E6F97C
      5CF9B9D0F3F9788E57699E8FF1B624F959C3C3583C5D3AF9EEF9734BFBB776EA
      75683A0F783E1F9F47C6CBFBB83F2F31BD0DF67EC9783D14F7D83E2EDDC4E743
      F131E42F97E7D3184FF97C7E5D5E5DBAF0989FFB79EC57319EB3496975F6283F
      17D6C9D4A513C3E7E5309526BEFD92119E0F3DB68F93273D969CD219F2A7F436
      329E57F114635ABACAB1C233FF24FFAA865C4BABA33A9BEAF8FDBA5C9D6C9A9E
      CAB4C1DE2F9954171E7B6C1F4FF3BCACF8182AAEFCF4785A7A9B7284E143959D
      0B3DDFAB186F5A37ABB3671E99262C9FD7069B3CFB21E33114F7D83ECEFCF438
      95617ECA931EA7323AF6E1BC322A3F0D3DF6AB18CF9C1A62529D3D912113A993
      A94B2784CFCB40C624F1ED978CF07CE8B17D9C3CE9B1E494CE903FA5B791F1BC
      8AA718D3D2558E159EF927F95735CC981493EA6C8A0C99489D4C5D3A217C5E06
      3226896FBF6484E7438FEDE3E4498F25A77486FC29BD8D8CE7553CC59896AE72
      ACF0CC3FC9BFAA21D7D2EAA8CEA63A7EBF2E57279BA6A7326DB0F74B26D585C7
      1EDBC7D33C2F2B3E868A2B3F3D9E96DEA61C61F85065E742CFF72AC69BD6CEEA
      EC9947A609CBE7B5C126CF7EC8780CC53DB68F333F3D4E65989FF2A4C7A98C8E
      7D38AF8CCA4F438FFDBCE3B6F1F4D45BFBBBF1F4791BD195379B0732E7F29854
      8714193291FD94A9C3EAD27F5C1EC834B39854E789C89089ECA74C1D5697FEE3
      F2406E015469759E507E2EDC4F993AAC2EFDC7E58174F1D31FD779C2F3A4F1FD
      94A9C3EAD27F5C1EC89CAE63529D27224326B29F3275585DFA8FCB0399661693
      EA3C11193291FD94A9C3EAD27F5C1EC82D802AADCE13CACF85FB295387D5A5FF
      B83C902E7EFAE33A4F789E34BE9F32755875E93FC1C6D3BF3E75F2CC1BE72E9C
      3F73EAAD938B672E9CE45B4FF91ED47F035AB9B656D4D11DBC99A08E2893FB31
      9D3283EF8713C4F41F83DC1CFE3CC47A3AFBC6A9D74FBC7DFED4B9B7162F9C3F
      7FEE2DBD9DF657C81BFE7E9473776D9AF8477F280ABEE167480286A7018E0743
      D2B0E8F3635BE107D6A2942B4AB944B6941B16BB5F8FBF31447CCA593981DFF8
      621965391519EA43DE5AFE069960CBD886B12DB467F7EBBECCA9D84CFBA35E3E
      9EC8D02FDE57B9387976BF199763BE0C7AE5F8AD6CC8F42A32E827AC03AF4B82
      9196D357DF82CEB4754C018778B4E7AB71FDB07E7770CC3423D41DEB82FA1BC1
      5F4C976ED475969FEC9D5586FCD6D6AC9DB2FDB836A4B681D0FC03BBF58B3294
      AB91A58CAF1F2FD3548E97219FE44A99AA7E83A09BFC46FDCA362D5B74ECDABA
      64BE1DB79DD80FCCFE544658683BDF8EFBE9A44CC9277D1952E7FE776319FA64
      2C57C6A14EB451B27E3CC8C978BF6465C0607586F24CDE952B7EEAD1733EE039
      C3B749FA94F9D49FFA30A4FDB2E779B6D1759CBB56716E5BC39B946EE2CD8EEB
      789BCEFA237CDFF509BE198B6FF16EE13BB224DF0E56AFAF59FED667782BD817
      BB65FF637F834DB4A3477B02A95DAFDDBA6938DB785BF80EFB6486D764DC787D
      F31EDE54067CEBC7096E0F7C9E540EEDB1F180F8D223E1955C9481BD2C23E5B7
      BA19E01C82FAEB3374BA6DE2BB9366832BC3F8C9EBC9CBC09FD13F4127C30DFC
      6C272A4BBA99EF5D19D47DAA0CEA65D296442F96059BF4B336C972825E0A531F
      70CCE66F9E366A73A7CAB8EEC7F84C1C3A8ECF01499C798EE4F35A7E5FAE9783
      BD8D328E775C3F0D32097F56863CD227C32FBBE8FB0ADF3C322AABB19C16FAA8
      6C86C062DB916EF4BD74AE845364629DD5C8977D61EC031D976D328C9DEA0F16
      2A2DE8465CAFC3B4F8F7C343F61D85374FBEFE378BE7FEF6D87FFDC5DF5DFE1D
      BFA3B00E5A7B67A1988738D28BFA88DBA88F9E3660ED42C321B432C29944F86D
      F94789CC347CF273D6AC72DAF25764A03B6DC8E92F7CF217384BC7725AF27B99
      36F8E4E74FE5A4FE4CF511BF97F1FE6FE29F90A12F833F65AFC7273F7FD28D23
      661B7E2F23D9830E777F5F143B38196C7F5F149B9854AD7F5B1437BF81EE5F17
      C5EA5745B1025AFE125FD5FC626C4F5BFE8B9F8F65846F75CBF69F21F22F7D36
      96913E395EA591FFB49391FECACF85E43FFD6C5C8EECCDF12A8DFC8B9F8E65E4
      1FE5E742F21F7732F2678E5769E43FFE745C8EFCAFFC5C48FE634E46F5257FCA
      5EE9237E2FC3FA6DC37FECC958B7836E9BC2E78C54B4C9D92966605B9CA17216
      FAF94EB1C39925AF0271F597CA4CE3E7ECCFCBB4E1DFC5582E99B6FC9C954599
      06FDCB196F9891A28F48A6CEDE949F67CA2893F14F8EDFCBA4FEACE3EFE3DCA5
      72BCFF9BF8FB98414699505FD3F8BD4CBC92D20C1FFEB199016CA63EE415A99C
      59435E75CC431CBBDBFE84DF969F7C9DCC0FD707AADBB6E1AC6D5AFC9A7F2A8C
      E792642ECAB94A4EA689BF769EC8F37C827FE4C1119B8BA63275F8E497CCC43C
      11F8CCF37339F133B479999B8F5A19D0473C9C9B29EEF9D9E7E403E9EFF91417
      3EF9F993CC347D4AEEF27F45C6CD15537DB2328EBF692E4A5995D3762EEA6524
      7BD061DD7C9473B43BA46F6107E6A6CB53E6A3E2DFFCAE28B630AFDD801CE75F
      D29FF351127D5621B415D6297D4FD9B54486735FE6DB8A1F651DBF647C392C9B
      32AACB945F322B98634B3796BB03DD982739C5754C5FF839F90664688FE7535C
      FA927FD1CD7B89C1B2646FCA4FBF90DFCF47CD36F8DFDB217CF951F34BD9C3F9
      28EB8BB2EBA14CE92F7CCE4573F351CE49E91B92F417BEC9FC88E7A30BD717C2
      0A69BBF928F9176E4026CC9F543F9A4F2F7CB250994F8B7FE1D642B9AA98998F
      2E5C05E6B5059B7FE7F8FDDC52F375F21B6FD0C7E36B3E27DDFC7CB40EDF641A
      E6A3397CCD17558EAE1FBAF928C683163FCD55A6B1924FBF3632294FEE58780C
      95CF503FA5E58E95E7F9C9A7F45446E9297F4EC6A7E5F87DBECA5158C7DF2423
      D95C28BD73797569929935541F9A35D43C5461DDFC6FBFE6A3CB9F2E17CBCF44
      2BC5CA33D06725E9DC251BA813F5A9E3A71C6578EE938CF42F65AAF82A87FC13
      32988F2E5317A78FF8199A0CC46239613E5DC7BFF23964C24F329A8F7ADC1807
      7FAD0CE697912FF88ABCA289727E24F351ADFF697DCECFC5F6B23EAA39582ED4
      FA9CEA54EBA3395EA5D5AD8F2A3F176ABD50E5687D34C7ABB4BAF551E5E742AD
      47AA1CCE0FE9CF1CAFD2EAD647959F0B355F5439DDFAE842EBF554CE87E437DB
      1980F5D7C357168C385FD4FC4FF339CD9F24A3F551CAE4F8A7CD47537CF2FBF9
      9CCAD1FA681DBFC9603C6F3B1F25FFC2ED85B8BEA872341F95BDD247FC512633
      1FF5F357CFBF7017E584F54B95D3CD47C7F3399D639A42CD59C4A3E35C98F2A4
      C79D4C7E0D3CF5938EDB84F2691B5EF14866C6F0D07FC63DFB775F5F3A77E6CC
      BB6F9EF8EBF36F9E5B3A75F1DC5BE74F9CE1F653BE7BE10DD04CDB03D03973FC
      5C3CFCC11026B3E936BA598F35897EE12126D9B640F782434DF67F10A17A6517
      9A0772E3C18B48FBC18C3F1C4BBB3168DFC7AD1FC4D813164DBAA1A7EA81FD18
      6F76B06966AF645B9BB94DFB451316EDE2F6E739E3B6C5DAB67C6343C9BC2116
      E8742363DE703FEAD61EC3E1630B7BA07D39BF74E37A755C4737C6D2F10F82F6
      3A76507E3FDAFABEB4D397E57AAEEB2FD5FEB20FD771DD3CA83A77F8211DEDC3
      F87188DF332A178D4E2C2D9DFBEFEF6AADE8F0BF2AD78AF6E22FE9671843EC08
      FAB65714DFEC16A3AF764AFA72BB1891BE206D95F439C2CF378B62D037B1C177
      7D1B27ED80F2DF038779DF214E0A98C435FA7AA728805F045CCAF5BFDE1D6390
      CFE48151274BF9AFB64B0CE0180674A43DFC8D5886CA57B90C518EE458BE8836
      F2D7FB6C2B62181FCBFF567A0779623859C523C6A79B11C3D27CF98A57E4B722
      DE18038FF5CB16D8157D2779B39F3EA4ACA7B2AECC96A71E033CD45B2479AB07
      2F5FC659DF790C9449DFA6C4BAB0FA1863B1BD9418EB635BD076ACEE53793B06
      86B725B4B7098CCFD0F6AC3CE841FD2B58D48365500FF07DB1696D368BC13A88
      388A7B798741BDF1EB3D75B6500FDA58A94BC8DB31D341CC371DA047C418D74B
      81BEC3F4B27FA99F290CFD8D7E200F09FCA607CAB6BE4BDBE7F80DD07FD5F747
      BFC71A32F0FA786777FFE1CDA2F770ADE8E17B32BDFB8E782C423E794D2EAC3F
      CFA14214E1FC486D7D88F63D849DC367D0EF53F8896DF8097C4E7A8CF735931E
      91F02D11E83AFCB2B4DF363884FE42F9F2C7992CC6833F8046189348BF87FF48
      43D0F71C9F30EE008F3F3F06B1FC380B96BC64BFA76C901F048CC7EB2506EA4A
      B650FF58FEEF93B22937407F14518F80D17B366E1FB4BBA23BF5165116729E22
      06FD15FC611856BED381B604FB4B79F83160450CFA5A188847DF453FC006C3A0
      AC27674B8A21DDE57FCA1BD10E8FB163754DA7F63C06EB2AFA5FF5106CF91E18
      2487C3F6328971B32C33A7CB10F203E821FA0EE794D03E2A7AA0ED15ACC3A87F
      880F1112E37B6090205F7C4B0CF0E357C1788034FA7C02C7C9538F80C1BE9962
      F41FE0D530DF92073213C47410CA37FA66DBFA778A31401FEA3F44DFA79F45B0
      D98E1196FDADEC73D461A07303FB27DAC79063E81CBF01DA79ECFBB8AE187CBA
      0E3D30F6DC5B297A77978BDEED4B25DD4248D23143E493B7F843799F4BED740E
      354C84F2C2E87F063F3DDEC0F7B4A0CF3DF8E1EECDA27F1B631EE956A01BF8DE
      16E9FA4AD17FCAB102D5E8E641941FDD5A2E46D073047B46184B47F7D78A11EA
      6B88EF20892CED2ED2834FFD18C4F24DFE3EE41F421EF69286684B43D49711EA
      C742606AEED00756B405FA8FEEB27C87C1B11BF53C143D5A076689230C3F0FA2
      FDA3BB2C5F043D0C03FA619C197A024EC470F320FACEFB80E58F093818FB868E
      C618E3B190BE970FE94723E1B05CD213B4A940F269CFCD830C03FD6E24923CCA
      8EFA807F041A32545BF718A8F7281F70C83B649C3224D84EE27924370F62DB19
      A10E8D28C7FA64487D280F9F5A08F95A8C6B2B653B821C658DD42EA80F89F23C
      9F720EC1B9087E7E0ED31706E5D806D816580FF461D07F8839F110739A21E61A
      E339CCF8FC123128CFB6C07225EBCAA7FC10F3E931C6B86EBB7910C60F3706F1
      3EB5C6464BC7BA2D1FF6896BB6DC30E488BCFCE9F50C8C334DF7BB19CF522893
      6550963F3EE8AFF183612D06F2B879D3F40BA130B8D9CA6364CB0EF33E2FCFB8
      30B8D128627063698D0DA9BCC7E0AB5DA66154E4E967DA425F077F780CFA3FD5
      23CA5336A12C06703D46940FE5B6C600BF36CF2AACC3AAD383FC924DEBB2AD1E
      9532698327E70F6BBB399F22AD225323AF3AC9D9C27B2B515FC9BBB24D16C794
      35023F7FBE6E5927315F7C7521E4C9CF9FDA297598E7A7BE6275014C3E4C4CBD
      B6F0E0C0161E22DFAC21E691B6D14FD847E5C37974904C05A35B0FEAD683C27A
      4C6E1E64F389CADA0BAE35746CEB2A5C0BC19C23624CCE3F6C2E30B186239CAA
      3CD75272739851B71E8476DAAD0775EB41936B00712D07F3728EEDFC75EB41C9
      3A0CD766B88ED3AD0795EDA35B0FAACCA5BAF520F417775FAC5B0FE21ACA78ED
      C2D672B876E3A85B0FC27A54B71E64E3E9BCFFFCB558B71E34BECEA63F793DEF
      D7507C5C7EF3616ECDA00EC3CBD99A02D713C2DA01CBF66B06DD7A50E28FA6B5
      9CE047F329FD59E7D3260CC8485E7592ABDB6E3D68BC1E5469CF5A1B9B21649B
      DFCB8FE5DBAF693D09F717B8C6C0EB7B23EE7548F6181906F7E34CDB5FC43D32
      5C87B0BD2D252E65796FCD7ECCAFDD5FE46429CF750CEAC63D1DF8F1DE1A7FCD
      FB8BC6727E6F88303897B21FB167D85FE4F5E8E1FE0A7F86A93D413EA4BE15E2
      3A4C9916F5B0FD09C0A04D5E9671B35D3E1CAFE1946B39639F721E647AF0DE92
      F61631F4F2E6C31483F58C72F18B18DCB74139AD215542F07E4DFD1D4EB21E64
      7A4C5B0B2246C3FEA088415FD91A56A84B8B2B8D7A4A0FEE01F27B7BCA7D20B6
      26459F54EA80FA8B823C7932FB83A847F33D31D757E807EB2F08FDFE20FA6FCE
      9FF607B5DA1BC47D42DA1BC410F7A8D3FD412F7A0CD25A7DE3FE22AE91E0FE6B
      D31E23BAB3797F91DB63A33D2ED897A13D241A831AF717999CF6B660BCCBEC31
      A21ED3F7175196635D20EA817BBBFC718F117F53F7174DD9631431A6EE2F820E
      B62F87A1D303FE360C86DA57A4D0EFAD717B7A84136DF118B9351CED2F4AF606
      11C7EF0F323D9AD682283F657F906134ED0D1246C3FE20C3C0B564FDDE20E821
      F901FA78667F10311AF706991C654135FB834C8F86B5A03EAEEFC67B83F2FB83
      E6DD1B646587FD41B8B9357D6F508BFD412F7A0CD23CA8713DA9C51E23ABDB86
      FD456DF6181946C3FEA2518B3D4686D1B0BFA8DCD3833D21E89FB6AF84EB01DC
      F3C273207E9A0735AE27715F0EF79478024EC408F3A036FB8B9AF618992D4DFB
      8B6083ED2F62D9357B8C0CA3CDDE20CC99EAF607450CFA89C43525EECD61483F
      5296047FD4ED0F320CEDEB81DCC4DE20EA0F0C23B73FC7DF5BAB60B07CD69DDF
      1B4479EDF1A9D91F54C1A03CEBD0CB85BD4DDA9F94DB1F448C6E1E34DE5361FE
      D8C33F8D4153D793C2B5B9DF0FA13994AEB7795CBB370879714DC65D6B4A967B
      8CF8A33E8D18C84FF7A50883FB268411CBF2E5225E37E60B837B370C03F6CE8B
      C1F5A0268C091DB886419F041F5356188DEB4941C6AF7F6431B07EE2F7F4289E
      D583BAE4F4086B30924DEB40FA7B5DE4D3684BD33A0E6D49EC49D783E817624E
      E82DD9445E76A47AB4590B32D9E007CAF3258BFCC916B60D4B675E1B4AF607CD
      BB37883A687F107568BB37887B86EAF60735FAD3FBB6264E9DF6F263F9F6EBD6
      83CC0D9A07D97AC30F6A3D08D71695359C70ECD752DC7A4E3AFF98BA37A85B0F
      B235B472DDB45B0F9A654CE258CA5FB71EF4035E0FC235C7D467C59235A16E3D
      A85B0F6A3B3F9A65BCC9F16A1ED4AD0775EB41DD7A50F99C9B7F5EAD5B0F0AD7
      C835D7611A3F72634BDB346174EB41E5F57EB71ED4AD07694D4BEB513FE0F5A0
      437F5E7DB7D06FCFBCF7F69BF682A17F8B8CFF17F42F73FCAD7D70BA689263BE
      28C7A73C1F7ABE347DDAB164737CCAF321F9FCF18B884FD321B525D5D1E72BEE
      7994C690E9D38E259BE3539E0F85EBD39E777C9A0EA92DA97E3E5F71CFA33486
      4C9F762CD91C9FF27C285C9FF6BCE33B5FEC36F605E68B72BA29CF879E2F4D9F
      762CD91C9FF27C483E7FFC32C5EBEA57E9693B91EE69FAB4E39C9C6494E743E5
      31F4E9697C5A7ECA7F10C7753A289DA1C897AFB43ABE345FB23E5D71E5F95079
      0C7D7A1A9F969FF21FC4719D0E4A6728F2E52BAD8E2FCD97AC4F575C793E541E
      439F9EC6A7E5A7FC07715C37CE283D1DAFA4439A3EED38272719E5F950790C7D
      7A1A9F969FF2D71D4FAB8B69757AD0F9D27B5A3907C927ECBAB0F3E1DEFB7BE7
      C3BDFB70DA98306D6C39E87CF59F69E51C249FB073E15EDBA0309FF75835ADBC
      BDE67BBB14AF0B3B1FEEBD1F773EDCBB0FF73A16AA7D3FEFB16A5A797BCDF776
      29EEC39FC605C6F36F5E38BBF8DBA5536FBF7D72A9FAE1BBD7C0433E2F978B17
      A3A1CD619BC2E2091E9C00DFCB18D226EAD514E6EC561A6FEA986C43587C5E6E
      E8781943D31DFA3585B23517F245EC26DB10F6F19255F2BD8C2175A75E4D61CE
      EE1F4BDAF8EB983656540789FF8801E237A0B6BB3366E56B7BC7B42D5F1F6F8A
      E7D393F60B3B5DE3D3CDFE49677B8AD5EFDEAB8FF34908FEF86666FBE969687B
      F2163B77F8E46E7C0AD71F37C7E31B59F94665FE88C327A485C75044FC96F1F8
      842F9E10E58F5F95B0AF324847E1E78E7D5E12AFC7057E6EC769CBB4095C3EA9
      441F4B3E7D3AD91F37C4B3B8B449320C452CAB657C02574F72FB1DB673C4E34E
      5CD59B9ECC76BB752B4F62B74C8FED0C4F095B7BE013FEF644B49EA6E6D3D18A
      33F4C7F5F188ABF68BB64BDF94543E699E3FF67999B8FA1BDE76BDDF3F7E7121
      7E41814F14A0CEF966E63D11EA49E35EC131E720689F1D31394EA25F842F7758
      C8787A8C27E6635E2ECE27A6F11B8F93C0E458CC2F07D8DBF611EA2B02FE785A
      FC8BF2A9693EE16EBF6FD057F9E4B3B0E60D69037EFCE286FDB8B39D75372F9E
      E4E837FC222EDF5A205C6F2BF9FDF1B4780E5718949D97525C1EEF076EEA5FE1
      EA0B41F3866A0FAAB7888BF636F1358619D2841BC6C9E273B43BD371068C5CF9
      C4617B50FB653D516712CB543C3DF679B938CBC28F6F7DD8EFDF418F931A2FF7
      3BDC6F3F54C6493C19DFC393BDBD7BFC5AC614C205479687174AE12D101A2777