unit1.~dfm

Delphi实效编程百例的随书源代码 这是其中的操作系统部分

object Form1: TForm1
  Left = 228
  Top = 114
  BorderIcons = []
  BorderStyle = bsNone
  Caption = 'Form1'
  ClientHeight = 348
  ClientWidth = 536
  Color = clBlack
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  OnActivate = FormActivate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Image1: TImage
    Left = 160
    Top = 80
    Width = 32
    Height = 32
    AutoSize = True
    Picture.Data = {
      055449636F6E0000010006002020100000000000E80200006600000010101000
      00000000280100004E0300003030100000000000680600007604000020200000
      00000000A8080000DE0A00003030000000000000A80E00008613000010100000
      00000000680500002E2200002800000020000000400000000100040000000000
      0002000000000000000000000000000000000000000000000000800000800000
      00808000800000008000800080800000C0C0C000808080000000FF0000FF0000
      00FFFF00FF000000FF00FF00FFFF0000FFFFFF00000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000004444444400000000000000000000000444444444
      4400000000000000000222204444444444440000000000000022222200C4C444
      4444000000000000002A2A22204C4C44440020000000000002A2A2A220C4C4C4
      C022020000000000022A2A2A222C4C4002222000000000002AAAA2A22224C422
      A2A22200000000002AFAAA2222CCCC2A2A2A2220000000002FAFAA2CCCCCCC27
      A2A222000000000082FAFA2CCCCCC27A7A2A2220000000008C2FA22CCCCCC2A2
      A7A2A220000000000EC22ECCCCCCCC2C227A2A20000000000000ECEC00020CCC
      4C27A220000000008000000000022C24C42A7A2000000CCCC00C0000B00CC2A2
      4C422A00000C0C0CC00CC00BB00CCC2A2CC44200000C0000000CC00BB00CCCC2
      CCCC4000000009999000C00B000CC2CCCCCC4000000909099000000000022222
      CCCC00000009000000090000A00A22222CCC0000000000000009900AA007AA22
      2C000000000000000009900AA008888200000000000000000000900A00000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFF00FF
      FFFC003FFFF0000FFFE00007FFC00003FFC00003FF800001FF800001FF000000
      FF000000FF000000FF000000FF000000F8000000EA000000AF000000F8000001
      AA000001EF800003B8000003EA000007AF80000FF800003FAA0000FFEF801FFF
      BFC03FFFFFF0FFFFFFFFFFFFFFFFFFFFFFFFFFFF280000001000000020000000
      0100040000000000800000000000000000000000000000000000000000000000
      000080000080000000808000800000008000800080800000C0C0C00080808000
      0000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0000000000
      00000000000000020444000000000022244444000000002A22442220000002AA
      2C42A22000000822CCC22AA00000000CC00C422000000000000CC44000CC0C00
      0B0CC400CC000CC0BB022C40009900C0B0022400990009000208000000000990
      22000000000000902000000000000000000000000000000000000000FF8F9900
      FE03CC00FC01FF00FC000000F8003300F8006600C00099003000CC00C001FF00
      30010000C0033300300F6600C01F9900301FCC00F83FFF00FFFF330028000000
      3000000060000000010004000000000080040000000000000000000000000000
      0000000000000000000080000080000000808000800000008000800080800000
      C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000
      FFFFFF0000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000044444444000000000000000000000
      0000000000000000444444444444440000000000000000000000000000000222
      04C4C4C44444404400000000000000000000000000002222204C4C4C4C442204
      40000000000000000000000000022A222200C4C4C4C42A044400000000000000
      000000000027A2A2A2220C4C4C4C4244400000000000000000000000027A2A2A
      2A2204C4C4C4C44002020000000000000000000002A2A2A2A2A20C4C4C4C4C02
      22200000000000000000000027AA2A2A2A2222C4C4C0C0222222000000000000
      000000002AFAAAA2A2A222CC4C220A2A2220200000000000000000002FAAAA2A
      2A222CCCC422A2A2A22200000000000000000002FFAAAAAAA222CCCC4C2A7A2A
      2A2220000000000000000002FAFAAAA222CCCCCCC427A7A2A222020000000000
      000000027FAFAAA26CCC6CCCCC2A7A2A2A222000000000000000000827FAFAA2
      26C6CCCCC2A7A7A2A2A222000000000000000008E27FFF226C6C6C6C27AA7A7A
      2A2220000000000000000000002272C6C6C6C000C27227A7A2A2220000000000
      0000000000002CEC6C600000CC2C422A7A2A22000000000C000C0000000000C6
      C000000004C4C442A7A2A200000CC00CCC0CCC000000000000000000A0424C42
      7A7A2000000CCC00CC0CCC0000CC4000003BB0002C2A24C427A72000000CCC00
      CC0CCC0000CCCC000BBBB0006C62A24C422A20000C000C000C000C0000CCCC00
      0BBBB000C6C62A24444200000C0000000000000000CCCC000BBBB0006C6C624C
      44440000000000000000000000CCCC000BBBB000C6C6C4C4C440000000000000
      0000000000CCCC000BBBB000226C6C4C44000000000000000000000000CCCC00
      0BBBB0002224C6C4C00000000000000000000000004CCC000BBB300022224C4C
      40000000000000090009000000004C000B3000002A2224440000000000099009
      990999000000000000000000A2A2220000000000000999009909990000910000
      0002A00088800000000000000009990099099900009999000AAAA00000000000
      000000000900090009000900009999000AAAA000000000000000000009000000
      00000000009999000AAAA0000000000000000000000000000000000000999900
      0AAAA00000000000000000000000000000000000009999000AAAA00000000000
      000000000000000000000000009999000AAAA000000000000000000000000000
      00000000000199000AA200000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00000000FFFFFFFFFFFF0A0AFFFFFFFFFFFF2E2EFFFFFFFFFFFFC8C8FFFFFFE0
      1FFF0A0AFFFFFF0003FF0A0AFFFFFC0000FF2E2EFFFFF800007FC8C8FFFFF000
      003F0A0AFFFFE000001F0A0AFFFFC000000F5555FFFF80000007CEC8FFFF8000
      00070A0AFFFF000000030A0AFFFF000000035555FFFF00000003C821FFFE0000
      00010A0AFFFE000000010A0AFEEE000000015534E62200000001212EE2220000
      0001210AE322000000010A0ABBBA000000015527BEEE00000001282EE6220000
      0003280AE322000000030A0AE3220000000327D3BBBA000000072877BEEE0000
      0007280AE6220000000F0A0AE2220000001F27DAE3220000003F7777BBBA0000
      007F280ABEEE000000FF0A0AE622000003FF27D3E32200001FFFC202E3220000
      FFFF280ABBBA0000FFFF0A0ABEEE0000FFFFDADAE6220000FFFF02CEE2220000
      FFFF280AE3220000FFFF0A0ABBBA0000FFFFDADABFFF0001FFFFD3CEFFFF8003
      FFFF280AFFFFE00FFFFF0A0AFFFFFFFFFFFF0A0AFFFFFFFFFFFF0228FFFFFFFF
      FFFF280A28000000200000004000000001000800000000000004000000000000
      0000000000000000000000000000000000008000008000000080800080000000
      8000800080800000C0C0C000C0DCC000F0CAA60004040400080808000C0C0C00
      11111100161616001C1C1C002222220029292900555555004D4D4D0042424200
      39393900807CFF005050FF009300D600FFECCC00C6D6EF00D6E7E70090A9AD00
      0000330000006600000099000000CC0000330000003333000033660000339900
      0033CC000033FF00006600000066330000666600006699000066CC000066FF00
      009900000099330000996600009999000099CC000099FF0000CC000000CC3300
      00CC660000CC990000CCCC0000CCFF0000FF660000FF990000FFCC0033000000
      3300330033006600330099003300CC003300FF00333300003333330033336600
      333399003333CC003333FF00336600003366330033666600336699003366CC00
      3366FF00339900003399330033996600339999003399CC003399FF0033CC0000
      33CC330033CC660033CC990033CCCC0033CCFF0033FF330033FF660033FF9900
      33FFCC0033FFFF00660000006600330066006600660099006600CC006600FF00
      663300006633330066336600663399006633CC006633FF006666000066663300
      66666600666699006666CC00669900006699330066996600669999006699CC00
      6699FF0066CC000066CC330066CC990066CCCC0066CCFF0066FF000066FF3300
      66FF990066FFCC00CC00FF00FF00CC009999000099339900990099009900CC00
      9900000099333300990066009933CC009900FF00996600009966330099336600
      996699009966CC009933FF009999330099996600999999009999CC009999FF00
      99CC000099CC330066CC660099CC990099CCCC0099CCFF0099FF000099FF3300
      99CC660099FF990099FFCC0099FFFF00CC00000099003300CC006600CC009900
      CC00CC0099330000CC333300CC336600CC339900CC33CC00CC33FF00CC660000
      CC66330099666600CC669900CC66CC009966FF00CC990000CC993300CC996600
      CC999900CC99CC00CC99FF00CCCC0000CCCC3300CCCC6600CCCC9900CCCCCC00
      CCCCFF00CCFF0000CCFF330099FF6600CCFF9900CCFFCC00CCFFFF00CC003300
      FF006600FF009900CC330000FF333300FF336600FF339900FF33CC00FF33FF00
      FF660000FF663300CC666600FF669900FF66CC00CC66FF00FF990000FF993300
      FF996600FF999900FF99CC00FF99FF00FFCC0000FFCC3300FFCC6600FFCC9900
      FFCCCC00FFCCFF00FFFF3300CCFF6600FFFF9900FFFFCC006666FF0066FF6600
      66FFFF00FF666600FF66FF00FFFF66002100A5005F5F5F007777770086868600
      96969600CBCBCB00B2B2B200D7D7D700DDDDDD00E3E3E300EAEAEA00F1F1F100
      F8F8F800F0FBFF00A4A0A000808080000000FF0000FF000000FFFF00FF000000
      FF00FF00FFFF0000FFFFFF000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000000000000000000A0A0A0A
      0A0A0A0A000000000000000000000000000000000000000000000A0A5FC7C7C7
      C7C7C7C70A0A000000000000000000000000000000000000212121A6C7C8C7C8
      C7C8C7C7C7C70A0A000000000000000000000000000000272D2E2E21A6C8C8C7
      C8C7C8C7C8C7C7C70A00000000000000000000000000272E552E2E2E2121C8C8
      C8C8C8C8C7C8C7C7210A0000000000000000000000002E7C55552E2E2E21C8CE
      C8CEC8C8C8C82121280A0000000000000000000000555A7C555555552E21CEC8
      CEC8CEC8C821022828210A0000000000000000000055C07C555A55552E2E28D3
      CECEC8212102280228280A00000000000000000055E49EC07C5555342E2E28CE
      D3CE212E2E2E02280228210A0000000000000000559EC09EC07C55272728D3D3
      CED3282E2E2E02022828280A000000000000000055F39EC0C07C27D3DAD3D3D3
      D3CE28772E2E2E020228280A00000000000000000955F19E9E7C27DAD3DAD3D3
      D3027777772E2E020202280A000000000000000009E2559F9E2727D3DAD3DAD3
      D302C202C277772E2E02280A00000000000A0A0A0AE2E25555B9DADAD3DAD3DA
      D3D302CE0202C2772E2E280A0000000A000A000A0A0A0A0ADFDADADA0A0A0A02
      28D3D3CECECE0277772E280A000A000A00000000090A0A0A0A0A0A0A0A0A0A02
      28D30228CECE02C2772E280A0000000000FCFCFCFC0A0AFC0A0A0A0AFB0A0AD3
      DA02552828CECE02022E0A00000A00FC00FC00FCFC0A0AFCFC0A0AFBFB0A0ADA
      D3DA025502D3CECECE480A00000000FC00000000000A0AFCFC0A0AFBFB0A0ADA
      DAD3DA02D3CED3CECE0A0000000A000000F9F9F9F90A0A0AFC0A0AFB0A0A0AD3
      DA28CECED3D3D3CECE0A0000000000F900F900F9F90A0A0A0A0A0A0A0A0A0A28
      282E2828CED3CECE0A000000000A00F900000000000A0AF90A0A0A0AFA0A0A55
      2E2E2E2E28CECECE0000000000000000000A0A0A0A0A0AF9F90A0AFAFA0A0AC2
      7C552E2E2ECE000000000000000A000A000A000A0A0A0AF9F90A0AFAFA0A0A55
      5555555500000000000000000000000A00000000000A0A0AF90A0AFA0A0A0A00
      000000000000000000000000000A00000000000000000A0A0A0A0A0A0A0A0000
      0000000000000000000000000000000000000000000000000A0A0A0A00000000
      0000000000000000000000000000000000000000000000000000000000000000