unit1.dfm

ToolBar工具栏控件的使用,动态建立主菜单选项,窗口界面的动态分隔条

object Form1: TForm1
  Left = 193
  Top = 107
  Width = 295
  Height = 137
  Caption = 'MySecondWebServices'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object ADOConnection1: TADOConnection
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:\JasonCenter\Delp' +
      'hi 6 '#25968#25454#24211#24212#29992#31243#24207'100'#20363'\3'#32508#21512#19982#36828#31243#25216#26415'\ID.mdb;Persist Security Info=False'
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 24
    Top = 16
  end
  object ADOQuery1: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 72
    Top = 16
  end
end