unit2.dfm

本程序是一个比较简单的通讯录 该程序可能比较有参考价值的地方 可能就是它用到了数据库的动太链接

object Form2: TForm2
  Left = 195
  Top = 126
  Width = 544
  Height = 375
  Caption = 'Help'
  Color = clGreen
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 136
    Top = 24
    Width = 225
    Height = 13
    AutoSize = False
    Caption = '能有本程序先得感谢CSDN的朋友们'
  end
  object Label2: TLabel
    Left = 40
    Top = 48
    Width = 481
    Height = 13
    AutoSize = False
    Caption = 
      '本程序的操作很简单，相信大家一看便懂。怎么插入图片？不用找了，点' +
      '击'
  end
  object Label3: TLabel
    Left = 24
    Top = 72
    Width = 281
    Height = 13
    AutoSize = False
    Caption = '右边那大大块空白的地方，就可以了。'
  end
  object Label4: TLabel
    Left = 24
    Top = 120
    Width = 505
    Height = 13
    AutoSize = False
    Caption = 
      '本程序能对大家有所帮助的地方可能就是”数据库的动太链接，和JPG图' +
      '片的插入”'
  end
  object Label5: TLabel
    Left = 24
    Top = 152
    Width = 241
    Height = 13
    AutoSize = False
    Caption = '再次感谢CSDN朋友的无私帮助'
  end
  object Label6: TLabel
    Left = 32
    Top = 192
    Width = 60
    Height = 13
    Caption = '存在问题？'
  end
  object Label7: TLabel
    Left = 48
    Top = 216
    Width = 350
    Height = 13
    Caption = '数据库的长大是忽不太正常，我插14K的图片数据库却增大了40多K'
  end
  object Label8: TLabel
    Left = 32
    Top = 240
    Width = 497
    Height = 13
    AutoSize = False
    Caption = 
      '谁能有解决的办法？，谁有更好的办法和更好的提意希望你能告诉我，谢' +
      '谢'
  end
  object Label9: TLabel
    Left = 40
    Top = 264
    Width = 161
    Height = 13
    AutoSize = False
    Caption = '让我们共同进步'
  end
  object Label10: TLabel
    Left = 48
    Top = 296
    Width = 281
    Height = 13
    AutoSize = False
    Caption = '广西水电学校56#                                     徐超飞'
  end
  object Label11: TLabel
    Left = 240
    Top = 312
    Width = 99
    Height = 13
    Caption = '[e-mail]'
    OnClick = Label11Click
    OnMouseMove = Label11MouseMove
  end
end