service.~dfm

这是《Delphi程序设计基础》由李文池写的书的示例代码

      173A1C8875336E19E5C73C52303BC31F0D796D1D366EE645BE6E8B81ABE2BA68
      18F0E1E558A644538E1373D2A2AD145E4AA798EB1F0635ED2A59732381736770
      5904238AC7AB7D6D1662ED95383F03399B5EC6F794E0E167C60FE049D9BFC97A
      D94CA6428B27E02734262E76A5A9CD0E163424B19A43C37206C00DEB48DC2B25
      432DCC3CB936268B893E365439924C3B698E7882EDB6DADA3328677134FEF646
      469009A3367126E3E2AD548865AC7CBAB210904C3B6389C03B767554E62A3D0F
      2CFAE89215597D622526244DEE075D3996895F8B90F0F16165C20C6B712211DB
      8DBA08EAB565240F41E46CD879D74FCBE4CD63259E7C789E5D1739CFE2AAC62E
      23E2F09AAA60F397C4CBC39A5C6CA6B65E14C16543D241DE6BA20C864AD41E45
      C95CE8812AF6E35E8BF82B64C864FC36924FC529DD86DABD1B2AB37C0AA35FA0
      8074E4237126D5C4F99E8DBE44D70DB2C2FD75575EC3404AD4839370348CC8BC
      0A772EFB5101A2B5240056806DC5813D5D14648D08981E263727A3A2AB1AF364
      B04806E3E7AB9501C5B7EEBEFA5402C00DF52002B40015A90015A000AD000568
      002B520E70D01ED5CB2F6E55D3BC527F75EBB7A8FE54FCABD48F0ED7D289DD6D
      EFA6CDE2BD6367E23977BF4D9E664F68F8EBD4A9F38D1D142A1AAB31B2824F82
      8281B4332F9C840EB34A871680BD813D42A6A450D8FC1CC66F716A19AC807ADE
      6BF7726CBB471A2A0DDD01F8EBC1DECAB33EF7A5C32DA378CA7A3E5AE33D21B7
      4B8B6EF15001C16D952012B40015A000AD48199E32D13A8DE5481E3228432835
      0931347E5BC2CD9A3133BC8526BEDDCD6E1AED85C794F17711A48D1EA3A76273
      172B09F4A897166880520EC6543E70AE1D575E64D8AF69F3FCDA6CBEFDCD8CB9
      920C293817BCDAE46FEC57A919AA1BCE2A9C8D8687CABCF1A344799397F22530
      BFE3C984E7CF55DE08FADD55C3768D99DB6CDDC7F13E4E60E5E6CC4C78F1F321
      1DD6461640B4B7DC4816DD592A1A9E3DCE1A9644722A4590275C804C98EE6E23
      3D4A3AABAEDB0D193C4D3B072720C2E8788B032B279B7EA1569A4CAB363859FA
      EE0E463C3CA52E56214B09E126D1B9F00AE59463810A4D1BED2BE30F3072FEA3
      0C3CC9848BC56E19117F10AF497D9BEB29246D19B3DC396F9C744D771967D333
      D3B6388C45BB758B3A2322D3D6A4926DFB77F11F0556A695433A9E0E26A986D8
      BA8277F8921BB427683F25564D95950F39E6BF857C93020C9C771A677638CC6D
      D846036D86DAE8B6D984923E72E6CD274E1AE6564C4593B5FF004C8BE6B20DE6
      BB2262F0267274B9F9B9CB16163463847765A61B76F55252211B2D3B90F9823E
      628A483263F5B2389941D8B1FD2AC25375E65919EF8C1CA11F2FEA3066E1BF79
      EBCBDEE5BEF008DE2B78320CE2C7269393A3EBD884A7691F8A3DC541B907C752
      C8A9BDF8C7CAC8DA760F3469D0A81AE22CD946DE6BD80B0ABC195A9E610CB271
      0C79CFF81D9B741AEA895932FE5C88A4D384480092E154F55E9739148D6A6A74
      5C16C4D3E28E4B77A14072371B5C8FDF5E7F6D4F5A0A8A84D2B52586C8140015
      A01B756B6CDF4071E32B6BF4804788D13A81B65A9034E586C51726AB2A928058
      828DF72779AB25421B04AD490015A000AD4800AD00D84016CBBA880256A40056
      8012B400F0D01EC1CBAF6E56D3BC527F75EBBFA8FE54FCDEA47836DFF1445AB3
      DF4F98782B1B5F11CDBCFA6CF383BCF8CD7A48F9E0854B2A5C7E362AC58B8612
      3CA9207CDCCCD955A44C5C48F634BC0BB5D8FD115E4EFB7528BCB13E93A4F4E8
      4E39E7C702C751C3C9C2D1935FC5D720E68E5F0C8BA870C31C13E3AB9E1EF02C
      7F54F9DC55C50DD4E3C6B547A777A7DAB89C72E597619EE6385701722CDD8085
      91B75D48D9FBEBDF8CEB1A9F21A2D5DCBDE7A5FC38D3970B923498C03C534032
      5F8B7F1641329FF5EBE7EFCAB367DF6DA196DA468996B23700AD000568002B52
      002B40015A000AD011208F0BD5B50D2F331FD6BBF3EB78CB6BF0DB6BDBC3D557
      52E079FBAB7C6A6D395F1F163E583958901113C2CCF1CC3B6D6E9AC1AE2636D5
      0F9A1C69BFAA354D426C8EEAF293142C6C38B6D96D5D919F036972369A3EA5F1
      8B3604C7C48313134F7DB14928B1206EF92B29994512E7E5AE74194B9DAAE90A
      D9708ECCF829F8320EB7359D4D11E6DF12F95AE24E61C163DEA9E1D470937C6E
      7EA8EAAEAB722C914BC8B0E23EA98D22CC0E2CA84E4AC87683D62B4932251A1E
      8FA0F30E93AA6BC797F0C7711C2DD8CC6D8CC4751AE5B8CCDA367CE7F0C72337
      013349396F1AD801B65663B86FDD58C99A46260FE1BF26F3B63F3D467D526C4C
      4436996D641B6B16CDA28FA771B11F189E37EF49B580DB6D9552E1E465636280
      F248A92152628DBA7C1E3AB463529291E31F1235DD566326A6DA7CD24382DDDA
      C2EB7437E9B574C119B67866A7AD6A9AA6ADEB7361A63EDBC51816503AABA119
      9EA185A9E9F9DCB78D98618310E9DC2323D545A56236F6AA92654D4E85A46473
      003AAA34B8B04A84412A6C7287612D5849F12E8F39E77D17372F503A3E1CCDAB
      344A523588F1917FAD5B4664367751E46CAC6E56D37025BA64875F5847FF0066
      D7F3454BB865267A56B9A4C9A8721C5A5CEBC1EA30FE0FF3585EE2AD0999B91F
      3DEA3A79C79A1EF41595EFC57E9DB5DF69D5131751FC2C0C8CACA1041D0C0963
      B85B6D67767C0DED5BAB3D1550AA2A9DE0015C87A200B30B8DA2E47CC6D40034
      609048048DC7AA8012B5206CAD00056A400568400568068026F716DBB2A1364B
      03BA001E1EC926E48DFF00B6A41C2B5240D9536DB40095A9036568012B40015A
      9037B0DEDD1B0D4260E70D483D5B437B72C69DE293FBAF5E8750FC99F957A91E
      043E944E6A0F7C2947F29AC6DF339776FF008D9E7FF48F8EBD14780C35DE3C15
      254B9C8C97895B3C2B360E6E9D2691A9491A191F1D59B8D27E0041650C7B56AF
      0B7F6DA966EC67D7F46DC4656F2578A75186D3790A0D126D1794A79B5BD6B544
      5833B5461247063E3DEF231521146CD8BB0D70C2DA7C23C4F5A779C7DE9F04BD
      25773E642CD13C3090DC4131E363B2E6C10135F46A396DD0F8DB52D4DC54F75C
      5C618F890C037451AA0FF3540AF9E6EACFB88AA24822B505802A6A4016254122
      C6DB45000568002B40015A90015A02B3583918F17AEE2EC9E256527F91D486AB
      2E667723544AF847CD99395953F2D67925951BB995BA577D6938511C1C8C67C4
      CE43D2796333DFB3A8CB9A79D5A0C34ED026FBC8ACE12E24D6A40D67279A7549
      717272B25F4D8952D8B8B11E15E1FE61D75B5C890F813B079AF9F3971A0CD199
      2656286111C295AEAC1BA40AE692262CF406D379539B206C8C445C6D69A1639B
      A7EEEF16DDA60BD26AD6E54343C6B9BFE1541CBBA9E03E92D21C5D5A362DC5BA
      0626C036DD95AB990CDBFC32F857A5E3A48D23B6466C0E1679D76AEDDA4C66F5
      CF3752D047A8E8926660EB326986393274CF3E1C91B5D4AEE0C6B266891799BA
      D62E1219B27617DA7BBF39BC755A17A99AD77E23E1698124C1C49728E40E1050
      5C2336C1C54A156CF23D739B799B51D664C4D4D24558CF163C98DBD48DA0356B
      0473DD90C0F893AD49A66A1A2889B2F29AE647905D5401B7E5ADE25133CEF4DC
      59B3F342CB38502E4F11DC2FBAB424D1E3E7E04FA6E769584A315623F8D9736C
      57703703D66A8D10CF5EF841AC656372E4789AA346B0B0E0C7BEFE1277561723
      C4988CF347C4DE57E4DCB94697A544727BC114D90A9DBE36DDB6A52643342BA7
      E0F32E8916565C644D92566729E75C6EAA4AA65222F3467E99A16263B65BB490
      84EED46FB5FAEB4B753268F10E784D1F5247C9C0707B936B8E8F157A565D225E
      D23BCA1A7AAE0AE4DF8BBE176BF58AE79CAACF4ED4688D015AA9A8D95A000AD0
      0045C6EB500056A400568002B52051471B93C4C00E1BAB13617F98D401A78B84
      9DA0DB65C1D952069A356201E83707C34681D681BA2C7C4452A014C29A67E040
      01DE496007CE6A939A4B8BA1318B639EEA99812AC8581B08D5C331F15AA9F736
      F12DA52C0E64E8B990A23B2DD1C12186D0082458D89DBB2AD0BF0972643835CC
      82F108C70C88C1BAEE07ECB56A9941A280EEBD481B65DB403DEA52FA36FD9515
      07A2690D6E59D3FC527F75EBD4DFFE4CFCDEA47CF47E944E65BDF1651FC86B0B
      7CCE5DD7C0CC2FD23E3AEF3C2610AB152562676462B7142C54D56514F9968DC7
      1E44AC8D77509D0A3BD8782AB1B5145E7B89CB9B2972311B50D5B49D3AE5465E
      6448CC369038813D559EE25489DDD2A19AE1F4315AF9D3EE812B40015A01B2B5
      2012B4036568002B40015A90353C2B2C4F1BF9AE0AB0F0116A1055F25E9C987C
      CE246654C8C70CB15F7C91B1D8456CE7EE9E7DF8E5668FE20698FAA41899F851
      2C9360CF1AB4720D856F726BCE8DDE2630664BE26649C7E6BD1308C51FABEA68
      1A4007695F70E1F057AD0E28B5C633CF18797A7C91E0BC0CA9C3F8590C3B21AD
      B36D72CD08B20FC3AE5CE607E72C5D42191BBF85089E53E6B213B403E2ACD334
      4CF45F8A3A06267E841A290C0FEB11B0606C2C37AFCB49489A8D654A749D371F
      B84314263E2CA9A3D800036DCF5D522EA573D095C9DCEDA1EB2B2FBA33D1E1C3
      3DDCF1337E33B1FA5E2A344EA1CC9D4352C69B2B2A5823C9849B61861707A854
      508774A93AD6A1C691EA585060C53A9924655E154B749ABA4672BA556A8BA2C1
      01D5F4894E74A14A4B203C5116357E4679EA62F53D467C781045891C39797DA7
      5516765E9ABA66916516072E64E5E6C93145C688CCAA436CEC9DE6B546837CC3
      C9CFA5EB929C5C95D4705FF165484F146ACA3E978694219173799E6C88F1E139
      2D8C221780A1B0057706ABC6D54846432F57D4A7D4E659A5F5A7C8705D6F7B36
      E0DF2569A2287A8FC3FE73E61D254E2E5E4860BD98DE43D9E13D158CAD1568AC
      F88DCEB9BA8662619FF00A9E263B89F056B6AC9571327A62CA6231468CE19D78
      D6D7DE6B6BCB2A2F6A3C4F4DC6C68E0C748A3508AA07646EAE23D348E956E2E8
      E1B7CB7A004AD4800AD000568002B403656A400568077070FD6B2920E2085F73
      36E16DBD15129515422F394B4DE5BE64C89A1D373F122CAC776497173A4226EC
      120B2C4076976571DD9DDA7BA68B2769AE4F875A5282333568230778C7C65D83
      C6D6AE19EEA51E72553A15897645B1F4E4FF0087189181939B959247D10C231F
      3203584B7B6EBC67C4E88ECEE3FF001E03F8D8FC878EC06172EBE63FD12CAF25
      FE7AC5F5087251948DD6C25DB28C4B9C5CED5A22174CE538E01BD59D1631FE95
      4EBDD7CAD959EDADC7E2B867F3BE1C6B9A866CD9914789A34D3B1770B3178F88
      EF3DD807F655D3BEDF1CB12927B68AA2CD2665F9DFE1F67E9B1C3233C59DDEED
      C9CCC50014602D668C90D63D6057759DCBB7F13A9CAEC39FC29983C8D1F2F1C0
      660A41DC01B9F9AD7AF42DEE613E473CED4A3CCAF94589247C9D35D06672FE3F
      D9420F40D35EDCB5A7F8A4FEEBD7ABBEFC99F9BD48F9D4FF008A20CCF78651FC
      86B187339773F03317F48F8EBB4F0D86B562AC21E0A1015A8412795215C8F88B
      A142FB550CB3003EB471330AE2DFBA419EFF00428FBE7BC15AF04FB000AD4800
      AD000568002B40015A90015A000AD000CB52083A863C9DDF7F8E426545DA89ED
      73B36F0FCB42938292206B9CE139D0877492A4AAE1E5946C40A9E706AD6DC238
      1E45D8B4073DE89FADF95748D739733226D530380A9BEDB29DA3C7579A7D856D
      A6F99B0D1A61CC7A145A5F3262BC3928A3F1985B8CAECBA9AE59459AA4643232
      72390F9A238BBF66C5CD05A3E33B157EAF4D4C625AA7A2E54FA66B9A14423756
      50CACEBD21854CA23314F34E74B8F246742F9983900A0E01C48030B6DAC87330
      BCB3A169187CD1DF63E1491B1BAC0D86BF85C0C76F7DFCD524D0F4BCD07014E6
      640EF23C68C9C78079BB05C5C75D4A22879B730EAFAD73D696D830E3B452B4EA
      1E4885B863BD995FC7562329611723CBA3692D04532A88995A0C707B2D6DBDB1
      D7461248A9D379379835DD61F53D4D530F0714DDA7F34708DE10F55417E05973
      06572F730C2749C4C3C983131760D4E116EF197A38BC3564D956CC86A3ADA41A
      4CBA063E09C43C60C996CBC2EEA37EDAD63532948C6C3C8999CC5AB2458DF838
      37FF0015B67CB574DA2AA67A2697F0979634D1C3DE99732E38E4BDEFFB6AE9B2
      1CCA1E73D0A2C494C7831B18D7FC466FADE0AD120A4609F132B2723F1AECA9BA
      FD15AA74358F1371CA5851261B485007BDAFD3F2D735E9559E8588D225F15AC8
      D802B40015A01B2B40015A90015A000AD00056A40E69AAC99484B5C80C6FFE69
      ACEE7C2C95CCCB64C0B27C3FCACA971D4CF0E63FAB65851C481A4208122D985F
      EA9AD2DBFF001EE2246CC6B5CC387AE697169DEAB931AE989349A76716114E7A
      785D7CD7EA35F39D3F656AEEA675FE5C0F6377B9B90C995F0A1B8E50F89383AF
      412B60E84987978D2775363766570C07688B0BD81D97AAEFED436D2518DBCCE9
      CCA6DDBBC9CA73A7135B16ADCDF30B63E3772BF59C7028F9EB92DDEDDCD7BB1C
      A744B6FB58FC4C17D3799322F266EB30E22F4843C47F65AB470BFF00F25C488D
      4DBF285BCC42C8C7E5AC76BE7EAF979C479CAAFC2A7E45DB5494EC25EF4F31D1
      1FB892A46DA8A1AFD43CA382DFF45A32CCE3FDACDDA27E57B9ACBFB0B10E1155
      2D1E997E5CE54335CD1AB626BB3C73CDA6C104F10E08E788B2BF0FD56E12011E
      3ACE7D52E5289289D56BA2DAAD5C9C8F3AD723838CB05E0914F761540E13C37E
      224F5ED15F4FD2F712B96F89F3BD46CC6DDD6A3C8AAB782BD3380DB6135B9734
      FF00F99FDD7AF5B7DF933F37A91F37FF001C41E2BC728FF76DFBAB18AE272EE3
      E03227CE3E3AEC3C5648C481A79D225F398DAA5BA20A35742FB4BC4CBCFD41F4
      DD0B1B0A5921668E4CBD46668A3966400BC58E91F6E4297DA45FCBE2DDDFC9CA
      913E9F6FD220A09DCAF1C06B330B246664E99A9608D3B59C64131891B8E19A12
      6DDE42C76DAFBC1DB5D1B5DE393CB2E671F51E98A11CF075891FE1DE319FE276
      2B3123D4B1A69140E92C863DBF6EAFD41FBA6DD0A3C579FD47B915AF10FAA04A
      D000568002B52002B40015A000AD4800AD000568069A3BB0373B3A3A280ACCCC
      31034B32C5DF624EA533B177F12B79CEB7FA5578CA8617ACE6323A4728731685
      993B72CE489B96F3AF2448C7F1A27E853D42F5D3075470496565F72EF39730C3
      A9AE81CD7892C50C80AE2EA8A2D1890F9838BAAB2995CC1F3BF2DEA3AB61CB85
      AA93EBD8FF00FE4F363FF09B65C6DA854152979139279F306649E1CBEF5AC4E4
      4721BC67C559CE44E5A9EB1A243A890C75141DCDF84639F3493E0AE6CC6B6E25
      CE3C1A7E2B48B14690C8C6E51367CF5352F94CE73C725E7735C10C58BA83E0C5
      0B069381B859ED4CC4E52E746D03174C8208E3B270270CCEBBE46FACD5351949
      5958D84E3F1A31211E6F0ED623AEACA4525029B51D2756D4AD87C623D20904A2
      6C6603A3C54CC46531FCEBCABA94DC1A54192BA669847144F09E12186E0FE1AB
      46467243B8BCBD06372DC38B9AAB979F1901647DAD22F4D6B19184912DB4FF00
      56C5E2C3C2EE54F9D115B107F96AF5A99BE065758C7D4E07F5860517887646FA
      DA08C9C8A1E60D6D1D446FD5DABEFAD997B7CCA4D3B4A8F5566285A289083C60
      79DE2AE69CCF5AC5AE1566AA3812240AAA17AED599D674AD00D95A000AD4800A
      D00056806CAD4800AD000568073097FEA4789BFD5359DEF85931E667A7653F0B
      7310121C66B58100F10EF8DEC5482A07F30F156B6D7BD5EE0CD40C747E6BD345
      CC65343043836B0B6DB960C9B7F985787D21FC5FEE3BB7CF843C862793A271CC
      7C70E664E9F913B4CB8D9987288595D189DA58F032ECDC6BDBB8D37CB8D0E28F
      2EEA9E9BC8FCE5CD7AB9D471B56D49F325C19846931558C95DDDA0A379AF98FF
      00D14E76DC1C2544D1EC748B519465995789A29E495AED231E1DE4B9B0B7CBB2
      BE5AB3B9E26CF720A315D9429B3756D2F178DA5C98C7768646453C4C106F365B
      D7458E9D7EE3E444F7B6A0B99512734E1CB2E3C38B14937ACC6658E4202AD80B
      ED076EDAF5A1D067FE6D24734BAC47FC5360E2E7EA59471E4F55E08245BCCC76
      153C56B6D3D5B77545FD858B707497BC6B637F7AE4D563EE94BCC0C88CF19F3B
      BF3C247515AF67A24AB03C3EB10CB7994DC35EE9E49AEC76B72EE9FF00F33FB8
      F5EBEF7F267E6F523E6BFE38811BDC4A3FDDB7EEAC573392FF00C2662DDA3E3A
      EC478ECB2D0A648354C791FCD5617F9EAB713A702F665491D8397A5D771F0796
      06663E979DA366664F953E4C822E28B21D5E39A2DCCFBADD9EAAF96941D72F69