main.dfm

Delphi实效编程百例的随书源代码 这是其中的磁盘文件部分

object Form1: TForm1
  Left = 260
  Top = 157
  BorderStyle = bsDialog
  Caption = #29992#36882#24402#26816#32034#25152#26377#30340#23376#30446#24405
  ClientHeight = 268
  ClientWidth = 382
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clPurple
  Font.Height = -14
  Font.Name = #24188#22278
  Font.Style = [fsBold]
  OldCreateOrder = False
  Position = poDesktopCenter
  PixelsPerInch = 96
  TextHeight = 14
  object Label1: TLabel
    Left = 19
    Top = 10
    Width = 75
    Height = 14
    Caption = #25628#32034#30446#24405#65306
  end
  object Image1: TImage
    Left = 8
    Top = 136
    Width = 113
    Height = 113
    Picture.Data = {
      07544269746D617036300100424D363001000000000036040000280000004001
      0000F00000000100080000000000002C01000000000000000000000100000001
      0000FFFFFF000808080018181800393939007B7B7B0084848400CECECE00EFEF
      EF0008081000CED6DE00293139002939420031424A00849CA500BDD6DE007B94
      9C005A737B00314A5200183139009CBDC600B5D6DE0094BDC6004A6B73003152
      5A004A737B0039636B00214A5200528C9400104A520084F7FF00E7EFEF00F7FF
      FF009CA5A5007B848400CEDEDE00ADBDBD00B5C6C600E7FFFF00D6F7F700CEEF
      EF00B5D6D600526363009CBDBD004A5A5A00738C8C0094B5B500BDE7E700B5DE
      DE006B8484008CADAD0042525200637B7B00A5CECE0084A5A5007B9C9C005A73
      7300739494008CB5B500394A4A00526B6B006B8C8C004A6363005A7B7B001821
      21006B9494002131310010181800395A5A00639C9C0018292900213939003963
      6300294A4A000810100039737300295A5A0073FFFF005ACECE002963630063FF
      FF0052D6D60052E7E7005AFFFF00318C8C004AE7E70031A5A500185A5A0029AD
      AD00219C9C001063630018949400108C8C00006B6B005AFFF70052FFF70042DE
      D60039CEC60073E7DE006BDED60073F7EF0063EFE70052D6CE0031BDB5001084
      7B004AA59C0018847B0073BDB500B5DED60094BDB5007B9C94006B8C8400A5C6
      BD0084A59C009CB5AD00849C9400526B6300638C7B007B948400738C7B006B73
      6B0031393100ADCEA500A5CE9C008CA58400ADDE9C006B8C5A009CC68400A5CE
      8C0094BD7B00BDDEA500B5D69C009CBD84008CAD730084A56B00ADD68C00ADB5
      A5008C948400D6EFBD007B9463009CBD7B00B5DE8C006B845200BDDE94009CB5
      7B00ADCE7B00BDDE7B006B735A00CED6B500E7E7DE00C6C6BD008C8C84006B6B
      6300CECEBD0063635A00ADAD9C0042423900737363006B6B52008C8C6B00E7DE
      C600ADA59400FFF7E700DED6C600A59C8C00E7D6BD00FFEFDE00F7E7D600D6C6
      B500BDAD9C00DEC6AD0073635200292118007B736B00C6B5A5005A524A00524A
      4200A5948400E7CEB5008C7B6B003931290031292100C6BDB50042393100FFE7
      D600FFDEC600E7C6AD007B635200A58C7B00F7DECE00D6BDAD00B59C8C00947B
      6B00B58C73006B52420073635A007B6B6300F7D6C600E7C6B500D6B5A500C6A5
      9400A5847300947363008C6B5A00392921006B4A39006B5A5200FFC6AD00E7AD
      9400C68C7300D6AD9C00CEA59400BD948400A57B6B00E7A58C00845A4A00CE8C
      7300C6846B00AD6B5200FFCEBD005A423900D68C7300CE846B00DE8463003921
      1800947B73008C736B00E7B5A500CE9C8C00E7AD9C00DEA59400A57363005239
      3100FFAD9400E79C84004A3129009C63520084524200D69C8C00CE948400B57B
      6B0063423900FFBDAD00F7B5A500D6948400B57363004A2921007B524A00734A
      4200C67B6B008C5A520084524A00292121001810100042292900100808000000
      0000FFFFFFFFFF01020596FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF2B71
      0E3A49FFFFFFFFFFFCAEB2AFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE49
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF082103FFFFFF494902ACB4
      FFFFFFFFFF783B0B0A02FEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF01FFFFFFFFFFFFFFFFFFFFFFFF
      01FBADCD01FFFFFFFFFFFFFF4503FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFF0108FFFEFFFFFFFF010C721F0F42FFFFFFFFFFFFFFFF01AB02FFFFFFFFFF
      0AAEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF3F304501
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF01FFFFFFFFFF
      FFFFFFFFFFFFFFFFFF772B49FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF013F
      3A01FFFFFFFFFFFFFE96A293B301FFFFFFFFFFFFFFFFFFFFFFFFFF013A3AFB85
      9D01FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF3A45FFFFFFFFFFFEAFAB
      FEFFFFFFFF0229703B920449FFFF01FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF49423A3C01FFFFFFFFFFFFFFFFFFFFFF
      FFFF4901FFFFFFFFFFFFFFFF293542FC323B01FFFFFFFE3F3FFFFFFFFFFFFFFF
      FF01058849FFFFFFFFFFFFFF01292B0BFFFFFFFFFFFFFFFCCD952432FFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0872254342
      FFFFFFFFFFFFFFFFFFFFFFFFFF01FFFFFFFFFFFFFF3F3A01FFAE88ACABFEFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF023AFFFF
      01FFFFFFFFFFFFFFFF02B3C1FBFEFFFFFFFFFFFFFFFFFFFFFFFFFFFF453A0102
      FBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFEB6FEFF0A0F3AAF9973959945FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFF010A2B01FFFFFF3F362B0A0AFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFF01FFFC052049FFFFAB9923B532FCFFFFFFFFFF
      FFFF0303FFFFFFFFFFFFFFFFFFFF2129FFFFFFFFFFFFFFFCC3A5A003FFFFFFFF
      FFFFFF01FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF42459B3FFF
      FFFFFFFFFFFFFFFFFFFFFFFFFF01FFFFFFFFFFFF01493FFFFCB298A7B601FFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF01FF01FFFFFFFFFFFFFFFFFF4529FEFF
      FFFFFFFFFFFFFFFFFFFFFF010AB6FB4201FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFF0A49FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FF01B308FF01454599AF01783FFFFFFFCDCD030AFFFFFFFFFC979C01FFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFF0C3B49FFFFFF013F01FFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF01FFFFFFFFFC96000020B6FFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF49AFB0A604B401FFFFFF
      FF08FFFFFFFFFFFFFFFF784501FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF01
      B6FCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCABFC49FFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF02373A0A02FFFFFFFFFFFFFFFF0808FF
      FFFFFFFFFFFFFFFFFFFFFF010C04972901FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFF087132FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFB3CD87A507950D45FFFFFFFEAE99FFFFFFFFFF
      08FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0101B6FCFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFF452C45FFFFFFFFFFFE05001F9F9A9BFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFAFA09FBCA8CDABFFFF32
      0F872C32FFFFFFFFFF493537FFFFFFFFFFFF01FFFFFFFFFFFFFFFFFFFFFFFF9B
      E03F01FF01FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF010801FFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF01290A4901FFFFFFFFFFFFFF4977203F
      01FFFFFFFFFFFFFFFFFFFFFFFF4502FCFFFFFFFFFFFFFFFFFFFFFF0149FFFFFF
      FFFFFFFFFFFFFFFFFFFFFF01FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFF889F001F00A1A3FFFFFFFFFFFFFFFFFFFFFFFF
      3F384101FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE9B3F01FFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFF423A49FFFFFFFFFFAEB50000009F96FFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF459970B6FEFFFFFF72
      00000070FFFFFFFFFFFF01FFFFFFFFFFFF01FFFFFFFFFFFFFFFFFFFFFFFFFFFF
      3F2A339CCAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF320D883A3FFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFAF23A7
      FBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEAFB6FFFFFF0145FFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFF01BA9F00B7BBB3FFFFFFFFFFFFFFFFFFFFFFFF
      FF3F49FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEB6C29949FFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF01FEFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFAFB50024AEFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF490AFF424508FFFE
      0AFBFB3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FF9B0AB4ABFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF4204092437FFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF010101FFFFFFFFFF0A8A
      02FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFAEB4FFFF4201FFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFF99C7C79BFFFF02BB9B01AB9BFCFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE99A6949BFEFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF08E0AAFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF02FC493F9C45FFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF32262332FF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF019E0497043AFEFFFFFFFFFFFFFFFF
      FFFF0A73FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF490A4549FFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF01FFFF0A3F01FFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0A0C0CFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFBB6FEFF45FB01BAB401FC8AB3FFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF01B3B6FFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFB69B0A999BFEFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE2B0D3BFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC4901FEFFFFFFFFFF456D06ACFC
      FFFFFFFFFF0A373201FFFFFFFFFFFFFFFFFFB0A50000A3ABFFFFFFFFFF01FFFF
      FFFFAB9C01FFFFFFFFFF0278FEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFF01FEFEFFFFFFFFFFFFFFFFFFFFFFFFFF4901FFFFFFFF01FFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF423FFFFFFF
      FFFF0A32B601FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF3D37FC03B4FCFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFE01FF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFBAB2AE700AFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFF4942FEFFFFFFFFFFFFFFFFFFFFFFFFFFFF0277330CFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF49FC3A3478FFFFFFFFFFFF4201FF
      FFFFFFFFFF3F2B0CFFFFFFFFFFFFFFFFFFFFB320070D9BFFFFFFFFFF42BB03FF
      FF3F410A01FFFFFFFFFFFC9D3FFFFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FE3AFFFFFFFFFF4902FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFBFBFFFFFF
      FFFFFFFFFFFF0849FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFF01AB9B01FFFFFF49FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFF45FEFFFFFFFFFFFFFFFFFFFFFFFFFFFF01FE42FB9B49FFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFEFCFE01FFFFFFFFFFFFFFFFFFFFFF0A783FFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF01FFFFFFFFFFFFFFFFFF01FFFFFFFFFFFF
      FF499904AF01FFFFFFFFFFFFFFFFFFFFFFFFFFFF0101FFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF3F780A02FFFFFFFFFFFFFFFFFF
      FFFFFFFFFEBAA0AC02FFFFFFFFFFFFFFFFFFFF420AFFFFFFFFFFFFFFFFFBFEFF
      FF3F0B12FFFFFFFFFFFFFFFFFFB3AAFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      493DFFFFFFFFFFFF0101B3B4AB010242FFFFFFFFFFFFFFFFFFFF01B2E001FFFF
      FFFFFFFFFF3F052429493F2BFEFFFF490249FFFFFFFFFFFFFFFFFF3FAE3B49FF
      FFFFFFFFFFFBCDFC014101FFFFFFFFFFFFAB6D45FFFFFFFFFFFFFFFFFFFFFFFF
      FFFF3832FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFF49FFFFFFFFFFFFFFFFFFFFB499AEB6FB01FFFFFFFFFFFFFFFFFF424249FF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF49FFFFFFFFFFFF
      FF01B3E7AB49FC0101FFFFFFFFFFFFFFFFFFFFFF01FFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF01FFB6E09A9BFEFFFFFFFFFF
      FFFFFF493A87969B49FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFE02FFFFFFFFFFFFFFFFFFFFFFFF01FFFFFFFF
      FFFFFF01FFFFFFFFFFAB9DAFB4FF0C0A01FFFFFF01B30A3F01FFFF490101FFFF
      FFFFFFFFFFFF3B72204942B301FFFF0199997849FFFFFFFFFFFFFFFE0D9645FF
      FFFFFFFFFFFC9B49FFFFFFFFFFFFFFFFFF013D03FFFFFFFFFFFFFFFFFFFFFFFF