admin.dfm

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

object frmAdmin: TfrmAdmin
  Left = 188
  Top = 107
  BorderIcons = []
  BorderStyle = bsNone
  BorderWidth = 1
  Caption = #22270#20070#39302#31649#29702
  ClientHeight = 319
  ClientWidth = 424
  Color = clBtnFace
  Enabled = False
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  Visible = True
  PixelsPerInch = 96
  TextHeight = 13
  object Image2: TImage
    Left = 0
    Top = 0
    Width = 425
    Height = 321
    Picture.Data = {
      0A544A504547496D61676594720000FFD8FFE000104A46494600010200006400
      640000FFEC00114475636B79000100040000003C0000FFEE000E41646F626500
      64C000000001FFDB0084000604040405040605050609060506090B080606080B
      0C0A0A0B0A0A0C100C0C0C0C0C0C100C0E0F100F0E0C1313141413131C1B1B1B
      1C1F1F1F1F1F1F1F1F1F1F010707070D0C0D181010181A1511151A1F1F1F1F1F
      1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F
      1F1F1F1F1F1F1F1F1F1F1F1FFFC0001108014001A903011100021101031101FF
      C400BF0000010501010100000000000000000000020003040506010708010100
      0301010101000000000000000000000102030405060710000201030104040909
      06010B020407010102030011040521311206415122136171D132531454150781
      91425292D2239316A1B1C16272B333E182A2B24363738324D4459426F0C43555
      F1346474B425361711000201020403030B040105010101000000010211035112
      13042131054161527181A1B1D1223262331434F091231542E172432406C17316
      FFDA000C03010002110311003F00C27735F6553E0E82315813D54A8A0D54902A
      01500A805402A01500A805402A01500A805402A01500A805402A03B6A03AAA49
      B0173422A4B834F91F6B6C1D5D35066EE1618FA7AAEE5F97A6A2A64E4D93A2C1
      3D550D90484C03D55152093169DE0AAB9164484D3AFD155CC5B2D4911E9DE0A8
      CC4E51F5D3475557313942F76F829988CA0B699E0A9CE4AB652F30E562E9386D
      34DB6423F0A21BD8F92A1DCA1D1B7DACAECA88F22D4B37233B2DF2273776DC3A
      00E802B8E526DD59F5FB7B11B50518F221915536048A900914001140708D8765
      4025E2C79D06164662E18970E50715B2648B8E3476B3765C8B2C96DDD36AACA8
      DA55E24A26F2AE268936A78E3519E58E3322AB70C21C0B9DF7E2FE15E6753CCE
      295381D1B6A54F58F8C1CBFF000F70B47D33DD39DC333C09D809DF7E0FD76AF1
      AD45E65DBC4DEE3E0784480719B31617F388B5EBEBA1CB950F3D8E1C8CDC8820
      C2E367861666821E85692DC4478F84543CB1AC807AA68DA96972A459D0181DD7
      8941B1B8F92F516EF467C8354209F0EDEAAD08042824026C0EF27A28C0E67634
      58F972C114E9951C6C5572230C11C0E95E20A7F65445D557912CB3E5DE54CED6
      A4E24FC2C55367988DE7A94749AE7DCEEE1655645EDDA94DD228F4CD1BE1DE9B
      8B15842246362CF2F6AE4783757CDEE3FF00412AFBAA87AD67A2392F799693F2
      769CD190F8B1B0FE85AE25D6EF37F11D6FA25A4B9193D7BE1CE9F2237AB2FAB4
      FBD4AF9A7C62BD5DB75A937EF71479D7FA6B872679A6A7A5E669D92D8F971947
      1B8F411D60D7D15ABD1B8AB1679928B4E8C8B6AD483D9FD5FC15E854F8EA0334
      1689CF5293FB2A530D702B2B4321500A805402A01500A805402A01500A805402
      A01501DB50815A80EDA805C34048830E4976DACBD7428E542D31B0116D61B7A4
      D56A6329965060936D9556C85C4B1834FDDB2A8E44D09F0E9DE0AA39175125C7
      A70EAAAB9175124A69BB37557396501D4C0B7454390CA484C1F055731A280F2E
      1782A33139031840F454662DA66639C79B74AE5E84C6489F5061F878EA7CDF0B
      F50AAB9D0ECDBEC5DC7DC78C6B3AF67EA990F3E4BF1331DDB801D4075551CAA7
      BD676F1B6A88A922A0E8048A0008A004AD4805D1958AB02186C20EC20D427503
      B93812418D8D3B3C6CB94ACE8A8C19942B15ED81E6ED1558CD36D604B446E270
      A54310ADE700761B75D5A888388EF1B87436653704556E5B538B8BED2632A3A9
      69ABF30EB1ADCF1F7F219A4304588142282563B70801475D72D9DA42DF17D8F9
      979DC722A2784C333C4595CA3152C84329B1B5C11BC57645D554CC774CF561A8
      40D92E63815C33B804EC1B7A2B3DC26E0D25560B5E76E6FCAE68D461CB9D046B
      8D0AE3C483EAA93B7F6D576D674D71E6C96EA6708AE82A09152093A569B2EA3A
      8C1851F9D330527A86F63F20ACEE4D422E4FB094AAE87B9E89A5E1E062C50C60
      24518E15F93A4D7C16FAFCEECDB3E9F636636E2AA6B2085046A765C8BECAF125
      5A9F4104A838D1476B115534A2323AFCF1365A88B783663E2D95EF74F8351753
      E6BAA4D39AA19AE70E5D8B55D29CA20193102F0B74F101BBE5AF4FA6EE9DBB94
      EC679DBCB358E6ED3C7BB89BEA37CD5F5B547927BBFAB782BB6A7CA651ACBC7B
      62CC6DB918FEC35317C4AC9703375D0730A805402A01500A805402A01500A805
      402A03B6A1076D40740A03A168454358CB1B0172684365862E9DB9A4DA7AAA2A
      67299690626ED9556CCAA5963616ED954722522D71B0376CACE52348C0B5C7C0
      5B0D959391B46089F160ADB7551C8BA8224A601E815573345698F2E09B6EAAE7
      2CAD30D70874EFA8CE5959C4318D6DDB69989D36725EE6089A599D638D05DDD8
      80A00EB26A2A5B4D9E5FCE3F16A38C4985CBC78DF6ABE791B0747E183BFC66A1
      B3D3DB74FED9FEC794654F3E4CCF34EED24AE789DD8DC927C26A0F5A292E0860
      AD09008A90095A0048A0008A039233C8ECF2317763766637249E924D12A72016
      2CC71F2629FBB497BA60FDD4ABC48D637B32F4835125554098C35C924EF3B4D4
      A5400115201DA082378DD40294AB48CC8BC0A492A80921413BAE76ECA2E406F7
      745FC7404EC1D19B334FCBCB5C982238A631DC4AE11E4EF091D8BEC36B5673BB
      95A54252A91BD40FAACF3F7F0DF1DD51A1E31DE306B8E241B99411B6C6AD9F8A
      54E64110A9AB90693E1E851CC4AC46D589CAF8F60FDD5C9BE7FC4CD2DFC48F5A
      EEFD615006E1E1162B5F193791B3E82DAD44B8F60E6444D1C0B23643161B1141
      22D58DB9D5D288E99C1A55726371EB79CB1981DFBC43B89F380F01AD25B483F7
      B919C77D712CB5AA20491BB92D7DBBEBA23251392717200CB220EEE4F34EE35B
      5A845BAA31B972495198DF55C0F442BDDCECF2687A4FAAF82BDEA9F31946351C
      6B69F926DBA273FE89AB41F145671E0CC35761C02A01500A805402A01500A805
      402A01501DA10740A0080A1038A942AD8F45033B055173504365AE269EA9D176
      E9350D993954B38713C1546CA961061EEAAB64D0B5C6C4000D959391B4625AE3
      E30B0D959366D1459418FB06CACDB358C49D1638006CDB59B91D1181256102A9
      53551084400A54B28805052A55A325CCFF0011B97B4357884BEB99C360C68483
      63FCEFB97F7D49D16B6939F723C739A79DF5DE61908CA97BAC406E98716C8C78
      FA58F8E87AB676F1872E6670AD0DC16420904588DE0D13A800AD48008A02CB97
      F96754E61CC930B4B45972D2279842CC10B84DE12FB0B782B3B9754399651A95
      73C12C32BC33218E58C95911859948D84106B44D35545469947451000AD48048
      A038AAA5C06365247111B4814606C8A900914009140011520122801228402450
      163CB99E34FD671F218DA30DC321FE56D97F92B1DC5BCF06894E8EA7B263C81C
      A3A9EC9DB5F17B8546D1EF6DA55A31D954CD2F69B6740EAAE78BCA8EB97BCF89
      2B130E166DC3BB1E738DF6F056376EBF39B5AB51AF70F64E3E208CF762CC3775
      56309CABC4D6E4214E066B987361C3C09B2A420242A58784F40F94ECAF67A741
      CEE511E2EFDD2353C7FDF99DD63F6D7D8E8C4F10FA5BD53C15BE63C0CA44D5F1
      78749CD36DD8F29FF40D5E0FDE456E47DD7E43CC2BD13CA1500A805402A01500
      A805402A01500A80214202028431D45A156C910C2CEC140B935051B2EB0F0950
      016DBD26AAD99B659C18DBB6551B211610E30AA365A85863E38B8AA365E2B896
      10C40566D9BD0B1810002B366B127C005AF59B3781284914685E4608A3CE6636
      0078CD66CE88229F50E7CE52D3B8BBFD462775FF006709EF5AFF00E6717EDA83
      A21B79CBB0C8EAFF001B30D38974BC0795BA25C8608BF65788FED14A1D51D8B7
      CD982D7BE207356B01A3C8CC30E3B6C38F8FF8684751B769BE5352755BDB423C
      919A11821AEC16C2FB6FB7C02C0EDA86E8740D15AB10095A000AD00056A40256
      803B6562B0652F0B48A1948254953B41D9D1B2A9EECBBE84F14353493E44A5E4
      669657B02CC4B31E8152A2A2B8704399CC76C64909C888CB195202AB701048D8
      6F66DDE2A4936B83088E455C8048A0048A01048CC6ECCE4482DC096B837DFB6F
      B2D50DBA81A22A402454838415E25D9D4771DC7A0F92A3981B22A40245490091
      401418F26464470462F24AEA880FD663615594A8AA4A47AEE6697AEF21CF0693
      CC838B0E451EA7A9A5CC7B7FD9BF55BA0D7CF6EB6CAFBCD0F8B03B6C5F76F83E
      469343D2752D69CA69B0FAD1001FC3651B0EE37246CAF15EDE75A50F523B88D2
      B52DF54E56D7B44C58E6CFC768125BEF2A4820DAC403FBAB2BDB3BB1556B81D3
      67776E5C1332BA8EB78F898EF2E4C8B0C436966D97F10E9F92AD63692B8E9155
      6677B76A2B89E4FCDDCD926B328860063C18CDD54EF76FACDFC057D8EC362AC4
      7E66781B8BEEE3AF619BB57A0739F6188B47E9CC8FF312B0D43CDD0783236AF8
      9A3CBA466C69991B48F8F2AA28963B925080055A176924DE252E6DA4E2D25C68
      7980E585E9EF3ED2F92BD1FBCB78FACF23FAEDD787D2BDA77F4CC5D727DA5F25
      3EF2DE3EB23FAEDD783D2BDA70F2DC23A64F9D7C94FBBB78FAC7F5DBAF07A57B
      413CBB10E97F9D7C94FBBB78FAC7F5DBAF07A57B403CBE83717F9D7C953F776F
      1F58FEBB75E0F4AF68D9D0ADBB8BE75A7DDDBC7D64FF005DB9F0FA57B413A237
      537CEB4FBBB78FAC9FEBB73E1F4AF683EE66EA6F9D69F776F1F58FEBB73E1F4A
      F68BDCFD7C5F38A7DDDBC7D647F5DB9F0FA57B45EE84E92DF38F253EEEDE3EB1
      FD76E7C3E95ED3BEE987A59BE71E4A7DD5BC7D63FAEDCF87D2BDA746978C37BB
      FECF253EEADE3EB23FAEDCF87D2BDA10D3B0C6F91FFF008F929F750C48FEB775
      E1F4AF68EAE1E9C37CAE3FF8FE9A7DD431F58FEB373E1F4AF6965889A0C4BDAC
      97E23BCF0B7DDAA3DD47123FAADC3FF1F4AF69610E5F2D2F9D96FF0061FEE551
      EE512BA45FF0FA57B4991EADCA8BBF3587F9927DCAABDC22CBA4DEF0FA50FF00
      EA1E528D6E331DCFD558DEFF00B50555DF45D748BB87A50D1E77E5A8BCD5CA7F
      E9541FBD8555DF378F46B98AFD7988D2FC48C243F83A7CAE3A0BCAABFB023553
      58DD746C64409FE26EB04118F8D0443A0B71391FB547ECAABB8CE98F49B6B9B6
      55E573EF364E384E7344BD512AC7FE928E2FDB55CCCE986CAD47B0A5CBD433B2
      DF8B2F225C93BD8CB2331F9DAF50CE98C12E488641E9A1600AD48018501C10C8
      CACEAA4AA5B88F55F752A068AD490015A00A1C769A65894AAB36E6765451E366
      200AACA5444A5518617AB1001152012B4001140095A000AD480CE1E4FAAFADF7
      67D58C9DD77BF478EDC5C3E3B55732AD3B49A11C8AB1009140011401AAE2FAB4
      BDE71FACDD7B8E1B705B6F1F15F6F55AD50EB5EE030C2AC00228012280E3F698
      B580B9BD86C03C54402C59863E5433941208A457319360DC241B5FC35128D534
      11B7E7CF8BBAAF3868987A56669D8B8EB847F0E78C333F0F428E2BF08AE5B3B4
      C92AD4BCA7531DA66BDAD6952779A766CD8ADFEEDCA8F9B75744ECC27F124CA2
      6D722E73FE297C41D4204C7CDD73272208C592372A40D96E81593D9DA7D9EB2F
      A92C4CD6566E6E4CBDEE44F24B2743BB12478AF5B46DC62A89248A36DF323115
      A102E13D551524FA50AD711700AD0800AD00D95A90015A000AD00056A40D95A0
      00AD000568002B52002B4036568002B52002B40032ECA000AD4902931A78E08A
      79232B14FC5DCB9DCDC0DC26DE23558CAA4B430CA6F562012B40011E0A90015A
      000AD00056A402A885C719212FDAB6FB782A1802400B31038412485DF61D5528
      00F1BADB894AF10056E2D70771144EA06CA8B7876ECA55D4026E0100900EFA90
      365680ECAC8F3B4863E04662DDD2EC00137E15BDEDE0AAAE5CC0CB81C4784596
      FB01372078EACB9000AD4A2002B40015A004AD4800AD00256800228012280387
      224848D82445E3B44F729775E1636B8DB6A89453150229CC51CC8238DFBE4E02
      CEA1996CC1AE87E89D96BF55251AD3B811C8AB0048A9072409C6DC17E0B9E1E2
      DF6E8BDAA157B40D915201228012280122A48048A01471ABB599C462C4F135ED
      B05EDB013B7754374246C8A92029E248CA849526054312818589FA278D5768F0
      6CA84EA48DDDBACD4D1107D2A56B84D002B52002B40015A10015A01B2B52002B
      40015A00196A40056806CA3027885BA874D1000AD481BE001B8AC0904120ED06
      C6FB4543550070D8017B91D35280256A40D95A001901B12368DD40149162FAAC
      12473B3CCE5CCD094E154DA384AB7137171ADAFD91BAB38D6AF802395AD48018
      136DC2C2DB3C64DCF876D42448056A4800AD4805CB3B1662598EF27C02D51149
      72246CAD490015A000AD4814D24F23299246728A110B12D655165517E81D1555
      15D82A36C38DC96362C6E4DBAEAC068AD00056A402E05CDAF6E8BEFB54207268
      2489B864428C555803B3B2C0329F941A2927C85283456AC400568002B40015A0
      04AD4800AD00056801228002280122A40245000450024500245480A2C49E7320
      850C9DD2348FC3D0882ECDE2155724B981822AC0122804380BA070420B072BBE
      D7DBBFA6A3C806D8786F52802454900914072D424FB0F9339087336818BABFAF
      7AA7AD2B3773DD779C3C323279DC697F36FBAB937B0D0BB2B7CF2F6F98AEDEE6
      A414F954B0D57E16E369B8A7267D5C940C1485C617DBE3985636A4E6E8911B8B
      D1B51CCCA75E51D1185FDF0EBE3C78C7FF00315D0EC4F0FD7EC71AEA96BBFD1E
      D3A792F4322FEFB23FE445FF00714D19E1FAFD89FECED7EA9ED187E52E5F06C7
      5C3F9117FDCD4ADBDCC3D7EC28FABD95FA5ED00F28F2F7FF007D3F9117FDCD4F
      DBDCC3D7EC23FB8B18FABDA70F27E816FF00EB8C7C58F17FDCD3EDEE61FAFD87
      F6F67F54F691E4E56E5E5FFCC4C7C58B11FF00E66ACB6B73BBF5E628FAD595D9
      2F47B48EFCBDCB837EAD91FF00A48BFEEAAFF6773BBF7FF428FAED95D92F47B4
      0FD3DCB47FF2F917FF00F671FF00DD53ECEE777EFF00E842EBD63097A3DA2FD3
      3CB67FF3191FFA38FF00EEA9F6773BBF7FF42DFDED9C25E8F68BF4A72E1FFCCE