object F_pub_data: TF_pub_data
  Left = 229
  Top = 132
  Width = 348
  Height = 230
  Caption = 'F_pub_data'
  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=SQLOLEDB.1;Password=whlmg;Persist Security Info=True;Us' +
      'er ID=sa;Initial Catalog=whlmg;Data Source=pc01;Use Procedure fo' +
      'r Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=' +
      'PC04;Use Encryption for Data=False;Tag with column collation whe' +
      'n possible=False'
    DefaultDatabase = 'whlmg'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 80
    Top = 56
  end
end