开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Delphi控件源码 > 查看源码
JetImportExportU1.dfm
资源名称：delphi.rar　[点击查看]
上传用户：fh681027
上传日期：2022-07-23
资源大小：1959k
文件大小：2k
源码类别：

Delphi控件源码

开发平台：

Delphi

JetImportExportU1.dfm：源码内容
  1. object Form1: TForm1
  2.   Left = 192
  3.   Top = 125
  4.   Width = 730
  5.   Height = 289
  6.   Caption = 'Jet Import/Export'
  7.   Color = clBtnFace
  8.   Font.Charset = DEFAULT_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -13
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   OldCreateOrder = False
  14.   PixelsPerInch = 120
  15.   TextHeight = 16
  16.   object DBGrid1: TDBGrid
  17.     Left = 0
  18.     Top = 49
  19.     Width = 722
  20.     Height = 207
  21.     Align = alClient
  22.     DataSource = DataSource1
  23.     TabOrder = 0
  24.     TitleFont.Charset = DEFAULT_CHARSET
  25.     TitleFont.Color = clWindowText
  26.     TitleFont.Height = -13
  27.     TitleFont.Name = 'MS Sans Serif'
  28.     TitleFont.Style = []
  29.   end
  30.   object Panel1: TPanel
  31.     Left = 0
  32.     Top = 0
  33.     Width = 722
  34.     Height = 49
  35.     Align = alTop
  36.     BevelOuter = bvNone
  37.     TabOrder = 1
  38.     object Button1: TButton
  39.       Left = 40
  40.       Top = 16
  41.       Width = 129
  42.       Height = 25
  43.       Caption = 'Export To Paradox'
  44.       TabOrder = 0
  45.       OnClick = Button1Click
  46.     end
  47.     object Button3: TButton
  48.       Left = 344
  49.       Top = 16
  50.       Width = 129
  51.       Height = 25
  52.       Caption = 'Export To HTML'
  53.       TabOrder = 1
  54.       OnClick = Button3Click
  55.     end
  56.     object Button2: TButton
  57.       Left = 192
  58.       Top = 16
  59.       Width = 129
  60.       Height = 25
  61.       Caption = 'Export To Excel'
  62.       TabOrder = 2
  63.       OnClick = Button2Click
  64.     end
  65.     object Button4: TButton
  66.       Left = 504
  67.       Top = 16
  68.       Width = 113
  69.       Height = 25
  70.       Caption = 'Import HTML'
  71.       TabOrder = 3
  72.       OnClick = Button4Click
  73.     end
  74.   end
  75.   object ADOConnection1: TADOConnection
  76.     Connected = True
  77.     ConnectionString = 
  78.       'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:program filesmi' +
  79.       'crosoft officeofficesamplesnorthwind.mdb;Persist Security Inf' +
  80.       'o=False'
  81.     LoginPrompt = False
  82.     Mode = cmShareDenyNone
  83.     Provider = 'Microsoft.Jet.OLEDB.4.0'
  84.     Left = 272
  85.     Top = 32
  86.   end
  87.   object ADOTable1: TADOTable
  88.     ConnectionString = 
  89.       'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:tempCustomers.h' +
  90.       'tm;Extended Properties=HTML Import;Persist Security Info=False'
  91.     TableName = 'Customers'
  92.     Left = 272
  93.     Top = 88
  94.   end
  95.   object DataSource1: TDataSource
  96.     DataSet = ADOTable1
  97.     Left = 272
  98.     Top = 152
  99.   end
  100. end