demo.dfm

《Delphi 7数据库应用技术与实例》源代码__客户端数据集更新实例.ra《Delphi 7数据库应用技术与实例》源代码__客户端数据集更新实例.ra

object Form1: TForm1
  Left = 192
  Top = 154
  Width = 497
  Height = 422
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 120
  TextHeight = 16
  object DBGrid1: TDBGrid
    Left = 24
    Top = 16
    Width = 433
    Height = 281
    DataSource = DataSource1
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object DBNavigator1: TDBNavigator
    Left = 24
    Top = 296
    Width = 430
    Height = 25
    DataSource = DataSource1
    TabOrder = 1
  end
  object BitBtn1: TBitBtn
    Left = 56
    Top = 344
    Width = 89
    Height = 25
    Caption = #25552#20132
    TabOrder = 2
    OnClick = BitBtn1Click
  end
  object BitBtn2: TBitBtn
    Left = 200
    Top = 344
    Width = 89
    Height = 25
    Caption = #25764#38144
    TabOrder = 3
    OnClick = BitBtn2Click
  end
  object BitBtn3: TBitBtn
    Left = 344
    Top = 344
    Width = 81
    Height = 25
    Caption = #20851#38381
    TabOrder = 4
    OnClick = BitBtn3Click
  end
  object DataSource1: TDataSource
    Left = 144
    Top = 64
  end
  object SQLConnection1: TSQLConnection
    ConnectionName = 'IBConnection'
    DriverName = 'Interbase'
    GetDriverFunc = 'getSQLDriverINTERBASE'
    LibraryName = 'dbexpint.dll'
    LoadParamsOnConnect = True
    Params.Strings = (
      'DriverName=Interbase'
      
        'Database=c:\program files\common files\borland shared\data\emplo' +
        'pyee.gdb'
      'RoleName=RoleName'
      'User_Name=sysdba'
      'Password=masterkey'
      'ServerCharSet='
      'SQLDialect=1'
      'BlobSize=-1'
      'CommitRetain=False'
      'WaitOnLocks=True'
      'ErrorResourceFile='
      'LocaleCode=0000'
      'Interbase TransIsolation=ReadCommited')
    VendorLib = 'gds32.dll'
    Left = 112
    Top = 96
  end
  object SQLDataSet1: TSQLDataSet
    CommandType = ctTable
    MaxBlobSize = -1
    Params = <>
    SQLConnection = SQLConnection1
    Left = 240
    Top = 96
  end
  object DataSetProvider1: TDataSetProvider
    DataSet = SQLDataSet1
    Left = 304
    Top = 96
  end
  object ClientDataSet1: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider1'
    Left = 168
    Top = 128
  end
end