uinfocard.dfm

一个通讯录源码

      object LabT11: TLabel
        Left = 30
        Top = 244
        Width = 30
        Height = 12
        Caption = #22791#27880':'
      end
      object Memo1: TMemo
        Left = 32
        Top = 260
        Width = 241
        Height = 65
        Color = 15198183
        Font.Charset = GB2312_CHARSET
        Font.Color = clNavy
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 0
      end
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 385
    Width = 511
    Height = 19
    Panels = <
      item
        Alignment = taCenter
        Width = 100
      end
      item
        Alignment = taRightJustify
        Width = 100
      end>
    SimplePanel = False
  end
  object MainMenu1: TMainMenu
    AutoHotkeys = maManual
    Images = ImageList1
    OwnerDraw = True
    Left = 59
    Top = 34
    object ADBKManual: TMenuItem
      Caption = #36890#20449#24405#25805#20316
      object RecAddNew: TMenuItem
        Caption = #21517#29255#22686#21152
        OnClick = RecAddNewClick
      end
      object RecModify: TMenuItem
        Caption = #36164#26009#26356#26032
        OnClick = RecModifyClick
      end
      object RecDelete: TMenuItem
        Caption = #21024#38500#35760#24405
        OnClick = RecDeleteClick
      end
      object Null11: TMenuItem
        Caption = '-'
      end
      object QuitSys: TMenuItem
        Caption = #36864#20986#31243#24207
        OnClick = QuitSysClick
      end
    end
    object DataManual: TMenuItem
      Caption = #25968#25454#24211#22788#29702
      object DBBackup: TMenuItem
        Caption = #25968#25454#24211#21478#23384
        OnClick = DBBackupClick
      end
      object DBRestore: TMenuItem
        Caption = #25968#25454#24211#24674#22797
        OnClick = DBRestoreClick
      end
      object Null21: TMenuItem
        Caption = '-'
      end
      object DBToTxt: TMenuItem
        Caption = #23548#20986#33267#25991#26412#25991#20214
        OnClick = DBToTxtClick
      end
    end
    object SysSet: TMenuItem
      Caption = #35774#32622
      object SetLogPass: TMenuItem
        Caption = #35774#32622#30331#24405#23494#30721
        OnClick = SetLogPassClick
      end
      object SetADBKType: TMenuItem
        Caption = #35774#32622#36890#20449#24405#20998#31867
        OnClick = SetADBKTypeClick
      end
    end
    object SysHelp: TMenuItem
      Caption = #24110#21161
      object AboutHelp: TMenuItem
        Caption = #20351#29992#24110#21161
        ImageIndex = 1
        OnClick = AboutHelpClick
      end
      object AboutSource: TMenuItem
        Caption = #31243#24207#35828#26126
        ImageIndex = 2
        OnClick = AboutSourceClick
      end
      object Null41: TMenuItem
        Caption = '-'
      end
      object AboutMe: TMenuItem
        Caption = #20851#20110
        OnClick = AboutMeClick
      end
    end
  end
  object PopupMenu1: TPopupMenu
    AutoHotkeys = maManual
    OwnerDraw = True
    Left = 143
    Top = 34
    object POPAddNew: TMenuItem
      Caption = #22686#21152
      ImageIndex = 1
      OnClick = POPAddNewClick
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object POPModify: TMenuItem
      Caption = #20462#25913
      ImageIndex = 2
      OnClick = POPModifyClick
    end
    object N4: TMenuItem
      Caption = '-'
    end
    object PopDelete: TMenuItem
      Caption = #21024#38500
      ImageIndex = 3
      OnClick = PopDeleteClick
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object PopRefresh: TMenuItem
      Caption = #21047#26032
      ImageIndex = 12
      OnClick = PopRefreshClick
    end
    object N2: TMenuItem
      Caption = '-'
    end
  end
  object ImageList1: TImageList
    Left = 31
    Top = 34
    Bitmap = {
      494C010103000400040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
      000000000000360000002800000040000000100000000100180000000000000C
      0000000000000000000000000000000000000000000000000000000000000000
      00F7F7F75953590E4C79074577071F3B2921294B444BD7D6D700000000000000
      0000000000000000000000000000CCC2C6A390918071707B706C7A706C706762
      53494DA09C9E000000000000000000000000000000000000000000000000E1D7
      CCB19689A78A7CA58A7AA58A7AA38A7AA18880BFBCBF00000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000000000C1BFC1939193ACAC
      AC74757C108FBE0BA2FE078CF10771E51D19371E1426423C427E777EC6C3C800
      0000000000000000000000D9CEC9E9DDD6F4EFEBEDEFEFF2F2F2F3F3F6F3F2F1
      EBE2DE9F8F8D514B4DDBD9DB000000000000000000000000FAF3EBE9C39DE2BB
      91E5BA92EBBE94EBC096EBBE95EABE93E5BC92C3A787927E86E5E2E500000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000DAD9DA584651582B40C343787935
      534A3E5107BFFF1DA9FF0799F90789F234265E3B23BF0E0C30534B556861697F
      7883000000000000F5EEE7F5F1EEEFE9E5D6AD9DC27E62C97F60CB8162D6A38C
      E8DCD6F3F4F3CEBFBA4C4547E4E2E4000000000000FAF3EBE9C49EE8C09AF0C9
      A0E8BE97DDB188E0B38FE0B38DE3B58BF3CCA1EBC39BD9B4948C7C7EE5E2E500
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000AAA7AAA83F6B9A3F67CF477F823D
      5D50435520C6FF37B3FF0DA7FE0798FE3829674B33DF191668686168ACA8AFF2
      F1F2000000ECE4DCF6F4F1E9D5CDCB7B59C55E34C57B5FE9DDD8DFA28AC65B33
      C66A45DEBDACF4F3F3C0B0AD736E70000000000000E9C6A1E8C59FF4CEA8FEDC
      B4D7B8977C4437952A0DA93E1DB37E61FADBB0FAD5ACEFC9A3D9B898A9A1A100
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000AEABAEB545749C436AD249818946
      645B4E6138CCFF4EBBFF1498F90782F64630715E44ED24206FE8E8E800000000
      0000F8F5F3F8EEEAF0E2DBCC704FCA5E36CE5F37C97B5DEBDCD3DE9F80CE5F36
      CB5E36C6673DE2C3B5F5F0EF7D6D6DD7D6D7F5E1DAE7C8A5F4D4AEFEDDB8FFDF
      B8FFE5C2B6957E882307A64221F1D9B4FFDFB8FFDFB8FAD9B3EFCBA8B09989E5
      E4E5000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000B2AFB4BD5782A34E73D8588B894F
      6B6071874FD2FF58C7FF39B7FB075BEB4F357D6E53F9342C7AF6F6F600000000
      0000F0E6DEFBFBFBDB9A7CCB6036CF6137CF5F37CF663FDA8A67D46F46CF5F36
      CF5F37CB5E36CB7453F2EDE9DBCDC9777275ECCEB0EFCFB2FDE0C1FFE3C1FFE0
      C1FFE7C7B79782882407A64222F1D9B9FFE1C0FFE0BFFFE5C0F7D7B7E3C2A2AC
      A4A4000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000B8B4B8C66891A7597DDE6998975B
      7767AFCD67D7FF61D7FF53D0FF1498FD244CA56C58CA352D66F7F6F700000000
      0000F7E6DFF7EEE9CD6B45D06638CF6337CF5F37CB7758F0E5DFE3A184CF5D35
      CF5F37CF6037CA6038E5C8BBF2EAE666585BEBC9ACF5DABDFFE7C9FFE6C7FFE6
      C7FFECCDB49A87882407A74422F3DDBFFFE7C7FFE6C6FFE8CBFEE3C6F1D2B6A5
      9081000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000009F7F8EE189ACD981A6E380A6C570
      957BB8D17FDDFF76DCFF66D3FF42ACFF3284C18A6AC329218F94909600000000
      0000FBEEE9F1DCCED0693FD3673CCF6037CF5F37CB6C46E2D4CEF5DDD0D7774F
      CF5F36CF6437CD6237E0B09BF6F3EF796C6BEBD1B1F9E3C8FFEED3FFE8CEFFE7
      CDFFEED6B49D8C882407A64423F2E1C7FFE7CEFFE7CDFFEDD0FFF0D2F6DDC1A6
      937F000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000009D798BED9FBFED9DBBE893B3CC83
      A18DC1D496E5FF8EE2FF90DEFF72BDFF5992C49479CD4038FF7C778400000000
      0000FBEEEAF3DBCDD96F44D5693DCF6037CF5F37CE6036CB8062EDE3DFF4D8CA
      D37049D06439D0663AE4B09AF9F4F0807373EED3B6FBE9D2FFF2DAFFEBD3FFEE
      D6E4D3BE995A4B912107A14025F1E2CDFFEDD5FFEBD3FFF0D8FFF6DEF9E2C9A6
      937F000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000A98799F5B2CEF2ADC8EEA1BDD091
      A994C6D9AEECFFA2D7F881CBF760BAF76F9EC9A389D16C64FF847F8900000000
      0000FBECE6FCEEE7E58055DD6E44D0673CD26F45D1653DCE6035D59178FBF7F6
      E5A98ED5663BD46C3FEDC7B8F8EFEB948989EFD5BAFEEDDAFFF7E2FFF0DBFFF1
      DFC2AE9E9D706AA06B63A16F60F6E9D5FFEFD9FFEFD9FFF5E3FFFDE9F9E7D3B1
      9F8D000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000AF93A1F7C0D8F8BED5F2C5D9DBC8
      D192A8B691B4C4213B5C133662386CAE7D869DB79CD59B96FC89848D00000000
      0000F3E5DDFFFEFEF8B28BEF8453D68769ECDCD3E6AA91D16439D98B6CFAF6F4
      E9B9A5DC6F43E17E57FCEDE7EEE4DCB8B4B6EED6BCFEF1E1FFFDEDFFF4E4FFF0
      E0FFF8E8F7F1E7EAD2C7F6EADEFFF5E5FFF0E0FFF1E1FFFBF1FFFEF5F5E0CBD4
      CCCA000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000B097A4F1D5E1D2B5C5BA92AAAD69
      91934B783D4B578D86896E676D4B494B9A75B5A363C0A672C08A858C00000000
      0000F4ECE6FCF5F4FFEBE1FEAC7AED956BE6D6CEFAF6F3F1D0C4F7EAE3F7F4F1
      EAA37FED8458F4C4ADFDFCFBC1B3AF000000F8E4E3FCF0E2FFFEF8FFFEF3FFF8
      E9FFFAF1A5786F93260DBA6A52FCF4EAFFF8E8FFFBF0FFFFFEFFFDF8DFC9B900
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000BCBCBE9C9A9C3D393D413C40412F
      3B6B5964756F74EAEAEAAFABAC2E2A2E3934384E3A59AAA7AAD0CED000000000
      0000000000EFE2D7FEFDFCFFEEDAFFCC9BF5C094EFD8C7E8DCD7ECDDD2F8C4A5
      FCA774FFC8A8FFFBF8F2E6E1E5E1DD000000000000F7DAD3FFFEF9000000FFFE
      FBFFFDF984636176180C924C40FAF5F1FFFEF8FFFFFE000000F8EEE7EED9DD00
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000605A60B7B2B3C9C6C6807B
      7F2B282B918F93CACACA827D80616061A8A5A6534D5391919100000000000000
      0000000000F7F4F1EFE3DEFEFCFCFFFDF3FFF5D9FFECC2FFDEADFFDCAAFFDDB2
      FFECDCFFFEFEF8EFECE4DAD5000000000000000000FCF6F0FAF2E6FFFFFE0000
      00000000ECEAEAB7ABABE3DEDC000000000000000000FCF7F4EED7D600000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000787378F3F3F3F2F2F29D97
      993835380000007A797A827F82FEFEFED4D1D1615A5F94949400000000000000
      0000000000000000F7F4F1EFE0D6FCF5F0FFFEFD000000000000000000FFFEFE
      FEF9F6F6E9E5F3ECE7000000000000000000000000000000FCF6F1F8E7E1FEFC
      FB000000000000000000000000000000FFFEFDF9F0E7F2E0DA00000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000E8E7E88581855B5B5B5E59
      5ED7D7D7000000000000B2B0B26F6D6F514F518A888A00000000000000000000
      0000000000000000000000000000F4ECE6F1E5DCFAECE5FBEEEAFBECE7F0E1D8
      F9F2ED000000000000000000000000000000000000000000000000000000FAE7
      E8F7E6D7F7E6D7F7E6D6F7E6D6F6E7D8F6E6D9F8F0F000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000424D3E000000000000003E000000
      2800000040000000100000000100010000000000800000000000000000000000
      000000000000000000000000FFFFFF00F807F00FF00F0000C001E003C0030000
      0000C00180010000000080018001000000030000000000000003000000000000
      0003000000000000000300000000000000030000000000000003000000000000
      000300000000000000030001000100000003800190090000800780038C730000
      8207C387C7C70000830FF01FF00F000000000000000000000000000000000000
      000000000000}
  end
  object Timer1: TTimer
    OnTimer = Timer1Timer
    Left = 171
    Top = 34
  end
  object TAB1: TTinyTable
    MediumType = mtDisk
    IndexDefs = <
      item
        Name = 'ADBKIdx'
        Fields = 'ADType,Name'
        Options = [ixPrimary, ixCaseInsensitive]
      end>
    FieldDefs = <
      item
        Name = 'ADType'
        DataType = ftString
        Size = 8
      end
      item
        Name = 'Name'
        DataType = ftString
        Size = 10
      end
      item
        Name = 'Mobile'
        DataType = ftString
        Size = 11
      end
      item
        Name = 'Email'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'QQ'
        DataType = ftString
        Size = 10
      end
      item
        Name = 'OffTel'
        DataType = ftString
        Size = 18
      end
      item
        Name = 'HomeTel'
        DataType = ftString
        Size = 13
      end
      item
        Name = 'Fax'
        DataType = ftString
        Size = 13
      end
      item
        Name = 'ZipCode'
        DataType = ftString
        Size = 6
      end
      item
        Name = 'ContAdd'
        DataType = ftString
        Size = 30
      end
      item
        Name = 'ADMemo'
        DataType = ftString
        Size = 20
      end>
    Left = 87
    Top = 34
  end
  object TAB2: TTinyTable
    MediumType = mtDisk
    IndexDefs = <>
    FieldDefs = <>
    Left = 115
    Top = 34
  end
  object XPMenu1: TXPMenu
    DimLevel = 30
    GrayLevel = 10
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clMenuText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    Color = clBtnFace
    DrawMenuBar = False
    IconBackColor = clBtnFace
    MenuBarColor = clBtnFace
    SelectColor = clHighlight
    SelectBorderColor = clHighlight
    SelectFontColor = clMenuText
    DisabledColor = clInactiveCaption
    SeparatorColor = clBtnFace
    CheckedColor = clHighlight
    IconWidth = 24
    DrawSelect = True
    UseSystemColors = True
    UseDimColor = False
    OverrideOwnerDraw = False
    Gradient = False
    FlatMenu = False
    AutoDetect = False
    Active = True
    Left = 3
    Top = 34
  end
end