unit1.dfm

实现手机阅读EXCEL文件

object Form1: TForm1
  Left = 192
  Top = 107
  Width = 696
  Height = 480
  ActiveControl = Button1
  Caption = 'Form1'
  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 Button1: TButton
    Left = 296
    Top = 240
    Width = 75
    Height = 25
    Caption = 'Button1'
    TabOrder = 0
    OnClick = Button1Click
  end
  object Edit1: TEdit
    Left = 288
    Top = 40
    Width = 225
    Height = 21
    TabOrder = 1
    Text = 'Edit1'
  end
  object Button2: TButton
    Left = 328
    Top = 320
    Width = 75
    Height = 25
    Caption = 'Button2'
    TabOrder = 2
    OnClick = Button2Click
  end
  object DBGrid1: TDBGrid
    Left = 304
    Top = 112
    Width = 320
    Height = 120
    DataSource = DataSource2
    TabOrder = 3
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object BitBtn1: TBitBtn
    Left = 80
    Top = 392
    Width = 75
    Height = 25
    Caption = 'BitBtn1'
    TabOrder = 4
    OnClick = BitBtn1Click
  end
  object Edit2: TEdit
    Left = 176
    Top = 288
    Width = 121
    Height = 21
    TabOrder = 5
    Text = 'Edit2'
  end
  object Edit3: TEdit
    Left = 48
    Top = 56
    Width = 121
    Height = 21
    TabOrder = 6
    Text = 'Edit3'
  end
  object Edit4: TEdit
    Left = 64
    Top = 96
    Width = 121
    Height = 21
    TabOrder = 7
    Text = 'Edit4'
  end
  object Edit5: TEdit
    Left = 48
    Top = 168
    Width = 121
    Height = 21
    TabOrder = 8
    Text = 'Edit5'
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 434
    Width = 688
    Height = 19
    Panels = <>
    SimplePanel = False
  end
  object Edit6: TEdit
    Left = 128
    Top = 8
    Width = 121
    Height = 21
    TabOrder = 10
    Text = 'Edit6'
  end
  object Edit7: TEdit
    Left = 8
    Top = 264
    Width = 633
    Height = 21
    TabOrder = 11
    Text = 'Edit7'
  end
  object ClientDataSet1: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 112
    Top = 192
  end
  object DataSource1: TDataSource
    Left = 120
    Top = 144
  end
  object Database1: TDatabase
    AliasName = 'mydata'
    DatabaseName = 'mydata.jsp'
    LoginPrompt = False
    Params.Strings = (
      'DATABASE NAME='
      'USER NAME=wfyk'
      'ODBC DSN=mydata'
      'OPEN MODE=READ/WRITE'
      'SCHEMA CACHE SIZE=8'
      'SQLQRYMODE='
      'LANGDRIVER='
      'SQLPASSTHRU MODE=SHARED AUTOCOMMIT'
      'SCHEMA CACHE TIME=-1'
      'MAX ROWS=-1'
      'BATCH COUNT=200'
      'ENABLE SCHEMA CACHE=FALSE'
      'SCHEMA CACHE DIR='
      'ENABLE BCD=FALSE'
      'ROWSET SIZE=20'
      'BLOBS TO CACHE=64'
      'PASSWORD=wfyk')
    SessionName = 'Default'
    Left = 200
    Top = 128
  end
  object Database2: TDatabase
    DatabaseName = 'mydata'
    DriverName = 'ORACLE'
    LoginPrompt = False
    SessionName = 'Default'
    Left = 264
    Top = 88
  end
  object ADOTable1: TADOTable
    Left = 520
    Top = 160
  end
  object ADOConnection2: TADOConnection
    ConnectionString = 
      'Provider=MSDAORA.1;Password=wfyk;User ID=wfyk;Data Source=mydata' +
      ';Persist Security Info=True'
    Provider = 'MSDAORA.1'
    Left = 408
    Top = 192
  end
  object ADOQuery1: TADOQuery
    Parameters = <>
    Left = 224
    Top = 176
  end
  object ADOQuery2: TADOQuery
    Connection = ADOConnection2
    Parameters = <>
    Left = 280
    Top = 176
  end
  object DataSource2: TDataSource
    DataSet = Table1
    Left = 208
    Top = 336
  end
  object Database3: TDatabase
    AliasName = 'book1'
    DatabaseName = '4'
    KeepConnection = False
    LoginPrompt = False
    Params.Strings = (
      'DATABASE NAME='
      'USER NAME='
      'ODBC DSN=book1'
      'OPEN MODE=READ/WRITE'
      'SCHEMA CACHE SIZE=8'
      'SQLQRYMODE='
      'LANGDRIVER='
      'SQLPASSTHRU MODE=SHARED AUTOCOMMIT'
      'SCHEMA CACHE TIME=-1'
      'MAX ROWS=-1'
      'BATCH COUNT=200'
      'ENABLE SCHEMA CACHE=FALSE'
      'SCHEMA CACHE DIR='
      'ENABLE BCD=FALSE'
      'ROWSET SIZE=20'
      'BLOBS TO CACHE=64'
      'PASSWORD=')
    SessionName = 'Default'
    Left = 440
    Top = 296
  end
  object Table1: TTable
    DatabaseName = '4'
    TableName = 'www'
    Left = 120
    Top = 288
  end
end