frmdata.~dfm

地税局发票程序源代码,自己开发的一个程序,最近整理资料的时候看到,放在那也是放着,拿出来供大家

object MyData: TMyData
  OldCreateOrder = False
  Left = 333
  Top = 287
  Height = 168
  Width = 215
  object ADOCon: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Program Files\Bo' +
      'rland\Delphi7\Projects\'#21457#31080'\data\BkData.mdb;Persist Security Info=' +
      'False'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 16
    Top = 8
  end
  object TaxGl: TADOQuery
    Active = True
    Connection = ADOCon
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'Select * From TaxZly')
    Left = 72
    Top = 8
  end
  object ADOSelect: TADOQuery
    Active = True
    Connection = ADOCon
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'Select * From Admin')
    Left = 16
    Top = 64
  end
  object ADOPub: TADOQuery
    Connection = ADOCon
    CursorType = ctStatic
    Parameters = <>
    Left = 136
    Top = 8
  end
end