unit1.dfm

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

      2BE981437CECDC2DBEBC79F2445C76E1039E5ABF99DB383CE4A7074BAB21D6AD
      FFE088CF824E23AE751B618FC5EF6B08EBEDB8599010D6D7B9478BC4BD56098D
      706C8475F69111F6B0605FD504F1DE5A96D07DB197AA55D7FC067C91B05F0C7B
      4F2608FB9346AD6972394875C670EE7AA3605777D53A8DF5C63ACCD41BD35AD7
      1B7927EB8ECB9B7BAEB7AEEEAAF5C665C7E75477B6AF724F9DAEEB7713E36857
      77DDF92E8EABF931B3EB77C97C253B4FE1FC0563E14B3457D1EDBCBD0E99DD5C
      05F5EA6FAF75636637667663A65DEBFDD0AEEFBA313339D7F15ABD3BDF85EB75
      B7A6C2F595696B2ACCEFD65532D7EDDD3CF387B426D68D99DD98D95D2374D708
      763EECCE77DDF9EE077E0FA83BDF75E7BBEE7CD79DEFBAF35DDD3DD9EEFAAEBB
      BECBDC75E8F63CBCA8FB0887FE53752BD2EBE7CE9C39F1F6BB27F9141877291D
      77DB91FC16174D7572A1E76B8A537688570ED823F97875CE008FD90F14F2917B
      C4994FBE261CBE1A86AF03183CC323FB086D3B086FCB687992AF9A018EBD6686
      B878FC3F8767FAE0F500D4C35E0FC0E96A6ECB13B63AF1B68FE98A57D7A47886
      63FAE0B508B81D605BA372382E8DDB9E64BBB797B6993E7C0D10B7583919C637
      7E83DD46491A8F693BEDA53F64ABF900B6312F95218E28CDE3316DA41ED2CDEA
      0DD8B6BDCB95EF317CDC639AEF522CBE7AA20647E9393CF31BEB0B7EA29DA657
      82257986C4F0C73ECEA1997550C1321BF37ECFE9233CD5A7C732FFF1D5613576
      D6E1C95FC2621D58DDC26661E56427D2D07EAC0DC046D5A3F98C6D156D85E508
      6F5AC8AD3DD62EF1FA0DB52F86A61BEAC36C6D8127DB7CDBF278B49979662FEC
      661D5574635F844FD95F8DCFDA42BE7F4B3F1B2BF8CAA930BED8EB40F84A108E
      1148D338227F7B7D727193872C712BC434E07A5FE7E4736994F194E3694A932C
      6D28ED6358C6DBEA433ECAD2AF7C15115F3DC4D71C59A8385E97C2FC69BEA26F
      FB78AD4A0FAFF92196F9856374B88D3444597D7C5DB387D7F310DF8F5BDE4ECA
      51BE87570611D3DA426646C1CB30B62D62F5EE811775E371681B5F3916716C5B
      ACB68125B773C2F4846DCFF06003F5109ED906BFB08D9A3EFEF60F96BDD80FED
      768F4F479CFA5137EA212CB6BF1E5FF383FE555E468CC71EF5E7126F9CAEFE40
      1CD68FEA97FAF0ABB0B6F556630EB6E30A8763B78FFBEDBAB48F75253B0D0BF5
      576EF3451FAC91ADE0B1AFB27E59B7D08B7EA29D86853A4CB704EBD8ECA36C85
      306E620B0DDB59058B6D13756CAF70E4D8EA64A4CB041E75E29C006DC263711E
      C2FAB05728A12C7BCD237885C3D799F9B8E5B30DB39FC0D7E6AF6063E9BFF26B
      C1361F417951967A068A69C2A14EEC5BEC03B035B68BD037E83B9667F30AC8C4
      D757525F62703B2CF5010E5F2566ED2BC8088BBA593B465FE3176DEDD5804833
      5C6293788CB19D7330E1943A8DDB7DC463DF663F63DFE56BB8509EBDA289E32B
      C706CCCB584EE4A16D497F141643D38F6305EA82D4E79881F66384784CE73812
      FCEDE5D378F407F4B2D70CA29FC490BA4217F2A472D38E2BFEDA83BCC665DA2D
      6AAB8FD906393F46B31D720C11D997A1DB8ED1A1CD988FE973B6458C21247E2D
      9BE365EF76CB311AED813AD86BECE873FA1F7A1885BA30DC50CF699BA06DAC27
      B62BC3419B18E0955C03CED15167AC7B12E3E5791B6381DA8D1BBB588FE4337F
      B02D190E741106FCC77E28DF474C8E2DC4B37E928CD16C9768EB6613DB39FB0A
      CA507F8E78A663392FA08EE64FF844F54B79FADA5E7BC93A0A3A09C763326E44
      1EDACC3181E741E84F1B0D0BF631B46B27F08C71A85F49B934D6891FBF221675
      E22BD34CAF2A86F0C661D08FE3286CA4AEA617B169A3EC0BFA1353BA30B43294
      475BD91F88C5BA0C5876CCAFB0D346E9E4703C66CC078EB5A5C446E2D37FAC93
      B4FEBC2ED291FCF6F800AEE9AC4F50AE668C8E7D9A76C826E96B3818A7315EDB
      F99EBE813D6A13D65EC1538E97A5DFEC1C923EBAC0AD661CF3795E0476B405B2
      C4F07FF45F89578EF99C6F49D65F275B3B60DBA66DC0F4183E4E5F8CFB1AF831
      6EB03DDA388F38C76AD3E7058FD15EE736713E7EE59ECC3AF9B76F9F285F89F3
      635F0CB1899526913E7C89164334114EC3B68B21EAE85E3E97C6C6CF8EA20EAB
      41F9A01643A48F7461A8341F3EEFC510E9E375C8A53DEFC510E9235DB2FEE262
      08EB112765D52307080E7A36187372EDDB39E2591CA4778B21E3A1953E557FA8
      9EF8CA13BAF7F558AA3946194FCDDC93B9928D27655B08E91643E429FAC726DA
      5A5439C0C590B8EF75CEC510F569DF377369B4879310DA463BD9A73969AB9CC7
      92458C8883F4591743C42F0C864AB3F0052D86489FDCC288A5B55D0CE14D837D
      5C0CD1828DF4337F715184E570528B7AE3F8C189A84D466B26DAD6B7799385E3
      3526C286D32D865426FFEAE70CE557F687B808A205917051A53EE3E5A6C5AD1E
      DC383D8D3FCD97FC788C2ECF173C9FB4D5877C9A9BF182C42E7870F16817FEBC
      2001710CB00B51D79E525D786C174CC0D06293C9B22DFE081643EC1CAEF3382E
      1C6D8105F3DDB68B21EAD3110758318D8B109C63BD80C5102D544817864AF3A1
      5D04BB4507F6152E4258BB3980C510E9E3E74B95342E22B03EA62D86C0AFC4F0
      B23E6E3686FE94DA48FCB8801016B3348F1306C3A82371B82031C76248C46139
      86D32D86F831C8C631F6917D1EA37D196DE2FC56D7F9138B58023979F28DDFDA
      9E905F2289B48E4F69BC8AC4AFF0F540D4FD55FB51677EA9ADD3FFC5D45CD6FF
      BC379CFE7269753CD378A7E5A7B8B9E38051ABBFCA48436231CDA72BDE504ECC
      926C938C98C5930B435AA3FEE4111153F15CA8FC346CE2CDE5F9B46958C86FAD
      BFC77D59E29DFECD6DEAA0EBA9F37FE7FFBDB4B196ED67E4CA509CA1E21C57D3
      638DB59EC7F3A5FC9ECFC72523BC4A58A3BFB0E70AF9A4BEB367223E2DBF4936
      C983FAD9F13F96C9B2522286D284279D7C289E346D9ACCB47CE181AF56FF5836
      3F09467DC79F068BBA471E9F9FC4B1E45CCA3A9B239E787D283E959B1E2BBDC4
      ADD75FE52A54193A5698C3CFE5298D618A951E7BDEE6787BFD9B71AAF5F3FC78
      3BFD9F9FAF7375DCF9FFE5F5FF10030529576F4A9B962FBE346C23D7A6FCB6ED
      C763296E3A601FB43F561AF5B57812DA670F9946B940B2CD1F0B73041E614DC8
      02A74E7F935719BE3C1F573E43A62BCF8769DCF3A5F2C251D8C41B706BF54FB1
      A5874F4FE39E4771859E77DE34CA7902662BFD7DD92F59BCD37FDC0FD5FF9E67
      D8F9BFF3FF5EDA5BD77EBAF6D3B59FC9FB477BF1C9F394EDFA6FD77FF7D2DEBA
      F6D3B59F83683F6C57AFCA6FE3C19D62E7ABF1FE01DE8F7C5588BA6F3EDA2876
      BEEE173D7C2EA8F74DDFF642703FC4AB40F4BBE9CEFD2783A1EDE1E03E8E578A
      E877EAFEFDF0D0BF2BB7069D3A7FF22C5F15F36738BC08EA0F4745EF6B54091E
      D3DC7A78A7356D3FD92876BFC263759017C62E77B371D7F40CBF119EC6A01C75
      200EF5981543C5518EF2C4A12D73FD788B054B21948F38BC9D3223D9D256D043
      38F1D611CB6843613967F0FDB0A28F96D566093994BE5438F0CD004DD3FB7916
      7BCCBF5C72C253417538B39C3E06C0E927FAC425B11996B6B23833C84BE71267
      50F18FF2660959E7DC42E7FD3C8BBC78F7058775B51FFAD4E0107B56B2ED85DF
      8EFDC3BE7AF3F34171F4EEB0387A03614B3A7E7750DCFCAC6F6386308EDD1F16
      C73F2D8AE35FCC40CF8A8272D481384B0FFA25C6E7C098955036E589B38DC7E2
      E7FA719CC23844F98833E35868DB043896053D84D36A0CF4E3A41B0FBD3EB38E
      1B1A3BD8565E1A1CF886E3D85EF4B1BE1AC6C31C8EFA729B50E398C7D9CB7858
      C1D9C378B8679C30FEBC14386E1CDB933E3538B38E85E4D778287DD857E7190F
      396EFA319118738D871C3BDD98B8A7F190E36718137919B5D79F2EC53A9CBC07
      3AFFE4FDA2D4CE3FF2443EDC4FFFE44B983D95E3219700B83CB0FDF96E6BDAC1
      B2C72EE6999417C62E9646FA1873E37995F39B29C4F332E5A80371A8C7AC182A
      8372260F1CDAA2F47942CA539F0E275F879D7FF27E515BEBFCF36AFA877D7E9E
      F9A19F1B0A63AEF9A19B1B12674FF3C3F47A99D7B9B3FEBAEBE5E66D91B8F6DB
      97EB6ED4F58BB85ED6DA417A0D3DEBF5F24C380DD7CBCD38580F77EB36A9CE6D
      8E754DF852E0D45CE7B6B1A3C25383B30FD7CB87785F65E9DC99FFF9C6B9FFFE
      D6DBBF3DF3DEDB6FFEE2EF2EFFEE8F91FAF7A036CF70FF10783868CE62871F64
      DBC8797EC59BE4C4930B737239BE34CDCBA5794DC75EAE8BBF380FB08E6629DD
      D7691B39CFAF78939C7872614E2EC797A679B934AFE9D8CB75F117E781FE83D5
      99DA28F9456DB416AF0F9BE43C5F1ACFC9A53CB9632F97CBAF4BF3725DFCC579
      80F5334BE9BE3EDBC8797EC59BE4C4930B737239BE34CDCBA5794DC75EAE8BBF
      380FF05C374BE9FEDCD846CEF32BDE24279E5C9893CBF1A5695E2ECD6B3AF672
      5DFCC5798075344BE9BE4EDBC8797EC59BE4C4930B737239BE34CDCBA5794DC7
      5EAE8BBF380FF05C374BE9FEDCD846CEF32BDE24279E5C9893CBF1A5695E2ECD
      6B3AF6725DFCC5798075344BE9BE4EDBC8797EC59BE4C4930B737239BE34CDCB
      A5794DC75EEE658CF3FD95583D3D73E1D55B3A6D3A7DA579DEF5695EEED8F32B
      9EE3539A7872A1787C98E34BD366E5973CE514EFC217EB015F87D3E25ED369BC
      CCF7FC8A37C9892717E6E4727C699A974BF39A8E29D794DFE53D3F0F349DBED2
      3CAF559A973BF6FC8AE7F894269E5C281E1FE6F8D2B459F9254F39C5BBF0C57A
      C0D7E1B4B8D7741A6F5D1D37C979FC349E934B7972C75E2E975F9756A77F1D7F
      977E701EF0E7C26971AFC5345EE67B7EC59BE4C4930B737239BE34CDCBA5794D
      C7946BCAEFF29E9F077C1D4E8B7BADA6F132DFF32BDE24279E5C9893CBF1A569
      5E2ECD6B3AA65C537E97F7FC3CE0CF85D3E25EAB69BC75E7CA26398F9FC67372
      294FEED8CBE5F2EBD2EAF4AFE3EFD20FCE03BE0EA7C5BD16D378EBEAB849CEE3
      A7F19C5CCA933BF672B9FCBAB43AFDEBF85FE5746E313DBF74E2BD9776CFE9AC
      27359D3CDB568AF8DB96E3F9DBC8A4FCD36472FCD364DADADAC49796DBC4ABBC
      796424FB430A67AD1FF9ADAD0FC4DFB61CCFDF4626E59F2693E39F26D3D6D626
      BEB4DC265EE5CD2323D91F5238EB494D27CFB63E107FDB723C7F1B99947F9A4C
      8E7F9A4C5B5B9BF8D2729B7895378F8C647F48E1ACF523BFB5F581F8DB96E3F9
      DBC8A4FCD36472FCD364DADADAC49796DBC4ABBC796424FB430A673DCFE9FCD3
      D607E26F5B8EE76F2393F24F93C9F14F93696B6B135F5A6E13AFF2E69191EC0F
      299CB57EE4B7B63E107FDB723C7F1B99947F9A4C8E7F9A4C5B5B9BF8D2729B78
      95378F8C647F48E1ACE7399D7FDAFA40FC6DCBF1FC6D6452FE693239FE69326D
      6D6DE24BCB6DE255DE3C3292FD2185B3D68FFCD6D607E26F5B8EE76F2393F24F
      93C9F14F93696B6B135F5A6E13AFF2E69191EC7E847F8A85D3B36F9CB275D3D7
      CF9C7BD7BE9AFE4748FC19689602D61F6E14972E2F4FDCB963DAFA838D98CE63
      91F075CC50690C95BE7A6DAD20E9D8F328EEF319577A1AB6E15339E4F5FC1E4B
      3C0C959E4BA3ED9EC7F37ABF287DBFC2C6FA405DA99C9CCEB934F22BBDC92FC2
      F57E635CE969D886AF4DB9E261A83272694D7ED9707E11C67E859B4FB78AF587
      9B5137E16E3CC6ABC73FDB89E9E4597F5492E7211F49690CC9C7346293723CE2
      F7F98C2B3D0DDBF0A91CF296FC2CBB8A291E862A833C1B4F4A521A6DF73C4A27
      DFF617BB5156E9FB15F28DFC3B5F4EE2336D17792A87C7A2A634E6896F17AFA5
      23E958723EF4F98CFB3C1F6FC3A772C8EBF93D8E78182A3D9746DB3D8FE7A5CF
      74DC26FC893BB99C3DF5D6A9B3A72ECE7D7E6953DE0F89C78F5D3E9EDAE8F37C
      3CE5EB8EF7E601EF5B1F4F517D9E8FA77CDDF1DE3CE0CF2F3E9EA2FA3C1F4FF9
      BAE3BD79C09F4B7C3C45F5793E9EF2B539FE0FEEFCB274F2DDF3E796B2A717DF
      0DD3B82F26CDF3C79EAFEE744D7EF22D5F5989972A1E83E9CC179FCF4BE3299F
      2F5F718FE3F995AF507C75C775E9A94EFE5832F3841E278D7BBC34CF1F7BBE5D
      7C3DC71F2B4E7EC657BAFA8017EAFF7819CACB225D76D86545B8B4F052FED244
      BC1A523D1FDFAAEC8F15272FE392B57290260C4EF9999FF26D045D225FC0F17C
      2AC387CA8F21707CBEE213972E6DF9BCEE3E1EEC10FEACA11F16D3B8C74AF3FC
      B1E7EBE34358FE5871F233CEFAF2B2311EEA31F2B94BA1C813D20C4778215439
      0A3D8EE757BE42F1D51DD7A5A73AF963C9CC121EC6E9059B0A5FFF9BC5134B17
      DE3EF65FF9E5307E48EC23500E67E759BE7DA5BCBD2F778A3B9FADD95789D23C
      7F4CBEADAF378BA52F978A95C7976AF9C5B7F2CD8ABD7DF6C8B32359FE944F6F
      4F4DF97B5F6C175B5F6D14C2139FDE22BAF029F01F5D2A36EEADD9D7CB96BF5E
      8E6FBD158FC201DADEC2A38562FDD6AAF1122BC5136FFF5B5C7A7E0EDFDC5869
      C78BA5838E173E7B0E7EB8F4D5A562F18BC5E2C86747AA84B6B6F078A158B8B7
      50D605FA80F1299D799E1E8877D5DECECB76CDF6B170BF4C278EA78BD74F1737
      AF95F326B637B623D6F924AD463EDF87149FA56FAE7FB65BDBD784C7BEB4FD55
      BFB884AFAAAC3E427FC117F394E743F1AD7D557E49EAD89351963FE5531F49F9
      CBBED92F84273EF5A1638F81FF104B6CA16FAE7E59969BF2919F7DF3E8FD7ED7
      3739EE3C873EC43AC8D503EBC2C6BE397558C15782963EC397D39E2684B676EC
      01EAF8F66EEC9BC6C7F487F82211F23C1DBDDB032FC7D4B26FB25D1FC517D428
      3F493BC5A5EB77629F7B5E7DF3CED396E7CD2F300E3DC679F3FE94F326F8969F
      95E7CDC3B7715ECBF0DB79D3F1A90E537EF6CDCD2F36229EF8D437C9BF7C6F7C
      DEBCF469F379F3F0B5EEBCB9977E7150FD6D16DC8B4F2F15C71F2E1687EF1E99
      A4EB0BC56B9F8CCF9B91EFC6427118799E5EBB0ADE2BE40DE74DB453E6537E82
      C0B7F44977DEF4E7E5EEBCD9CD95D3B1E4953F6FD6ACB3F8F927E3764B0FBCD3
      6EA7928F5FD7E25789F845A23A7ECF675F30C2FC25C73FC1C7AF7B85AF79787E
      96A972F545A418829F366C411FD20ED6FA621EF112B22F91E0CB5E5BCF76A6F3
      862F3E6E3EDBEE78F145B557C20F680FFA2A8BE91BD6AED89EB895A04268039B
      9F624EF614843ADEC657E88C4FE9CCF3443E12D2629B232F64B314F8F8D513AD
      13F1CB27932B453CFBF03BEF59C21533BF2FC312CBB31466905F6193D4979726
      68F1B3455BD9D1D59DF8163F3F5D2C7EBE3826F02D3CC595F9C3F10C9278E43B
      82D51BAEE054087C0B77C34C047ACE32C3E9785FE06A15376B68C50CEDE834EA
      97F5A1515621AFF477B12ABB707B3C835C7DB26C6D403C0C8D0F3D8A7C7EE585
      AB1BB652833635C1770D33CDABE34D57D6731C7F0F23B6E165F8C85BE1C7EAD0
      C5063ECFBF7CEFE244B9CA4FC3F5DBF51BD066EB9BFD822B2A2B245C757BE295
      35679CEA9BC6079E8B48F7A42B705E596B559478E4399E5EC1F31857EAF10ABE
      EB9BE54AC6ABE087A46FB27E9BFAA65F79597BB263AB39B9BE79F416565EAEDD
      8C2B2FEC9B6C775C29F47D33F265FAA6F8D937EBF8D48784CF95422B37C1139F
      421B2BEE6E3CF7BEC995974B9FAE14BCE24E8957D65CD951DF14DFF147A77175
      EE295CA9E3CA5A7DD3AEE0C197BD82C7957ABC827F15DAE42BBED2B96F738DA4
      6FB21D34F5CDCACACB83656B0BB9BE493EBFF2627D812B3558F9F37D33F2257D
      C9F3B36FD6F155FA1AF1B15268E52678E25348FC4BB7BAF3A6AF3BC6D395817D
      6B675D7FB3763F937F93BED99D37D57BAB61D39C96AB295C29C912578270254C
      34ADBCD80E105E49A7846B06BB620E2B2F311FE97E7705E3BAB2EE565E8645FF
      55594DC1B5626535056D265D518BC799959798E757E1C887EF1373D791FC602B
      2F7898C3F891AFB0E41B163DFACBADBC70E591ED49E3741D9F7A84E7A73D299E
      F8148ABF0F5E5FAEF2D390FC5C59D2CA509A9F1E93374DE3F19F73A5E8DCB933
      D850B4887D45BF5D3A77E1AD37B8ADE8AFFED5A1437C87994E3C2F6D88CA1B91
      50E146E931D3959FCB939CF8C4A3B02E5DF973846A44A617E4FDB1E25D38F68B
      F9021D78480AFE6207647CA063C691C66323C673C74A7FE9C361A9FFDC7A7A79
      C675AC7879DC073EC97C051E1D97218F9596C629E7F3742CBE5CE87878ABA38E
      88CB3C85FF3F7B6F136ADB71A5090A1ABA4D36D9EDEE6A0A353D79A69B4E3CA8
      E2DE73CEFD2B3269EEBB3F69392DDBF52457522E92E2A5FC6CABF4F36CBD279C
      C69806233C30220746B8C1080F0CCE81C11E1894340679625A3948500E12E441
      8272900335D440831A68D083DBDF176BAD88B56247EC9F739E947AD27D626B9F
      B36FEC752256FCAC2FBEB522C2D2D5DFEDF9FB74