Delphi_7.0数据库开发源代码。有内容十一章节

				object Form1: TForm1
				  Left = 214
				  Top = 204
				  Width = 676
				  Height = 205
				  Caption = #31532#19968#20010'dbExpress'#23454#20363
				  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 Label1: TLabel
				    Left = 472
				    Top = 16
				    Width = 97
				    Height = 13
				    Caption = 'BDE'#35775#38382#26041#24335
				  end
				  object Label2: TLabel
				    Left = 88
				    Top = 16
				    Width = 137
				    Height = 13
				    Caption = 'dbExpress'#35775#38382#26041#24335
				  end
				  object DBGrid1: TDBGrid
				    Left = 0
				    Top = 40
				    Width = 320
				    Height = 120
				    DataSource = DataSource1
				    TabOrder = 0
				    TitleFont.Charset = DEFAULT_CHARSET
				    TitleFont.Color = clWindowText
				    TitleFont.Height = -11
				    TitleFont.Name = 'MS Sans Serif'
				    TitleFont.Style = []
				  end
				  object DBGrid2: TDBGrid
				    Left = 344
				    Top = 40
				    Width = 320
				    Height = 120
				    DataSource = DataSource2
				    TabOrder = 1
				    TitleFont.Charset = DEFAULT_CHARSET
				    TitleFont.Color = clWindowText
				    TitleFont.Height = -11
				    TitleFont.Name = 'MS Sans Serif'
				    TitleFont.Style = []
				  end
				  object SQLConnection1: TSQLConnection
				    ConnectionName = 'ludata'
				    DriverName = 'Interbase'
				    GetDriverFunc = 'getSQLDriverINTERBASE'
				    LibraryName = 'dbexpint.dll'
				    Params.Strings = (
				      'DriverName=Interbase'
				      'BlobSize=-1'
				      'CommitRetain=False'
				      'Database=f:\temp\employee.gdb'
				      'ErrorResourceFile='
				      'LocaleCode=0000'
				      'Password=masterkey'
				      'RoleName=RoleName'
				      'ServerCharSet='
				      'SQLDialect=1'
				      'Interbase TransIsolation=ReadCommited'
				      'User_Name=sysdba'
				      'WaitOnLocks=True')
				    VendorLib = 'GDS32.DLL'
				    Connected = True
				    Left = 48
				    Top = 136
				  end
				  object SQLTable1: TSQLTable
				    MaxBlobSize = -1
				    SQLConnection = SQLConnection1
				    TableName = 'CUSTOMER'
				    Left = 160
				    Top = 136
				  end
				  object DataSource1: TDataSource
				    DataSet = ClientDataSet1
				    Left = 120
				    Top = 136
				  end
				  object ClientDataSet1: TClientDataSet
				    Active = True
				    Aggregates = 
				    Params = 
				    ProviderName = 'DataSetProvider1'
				    Left = 208
				    Top = 136
				  end
				  object DataSetProvider1: TDataSetProvider
				    DataSet = SQLTable1
				    Left = 88
				    Top = 136
				  end
				  object Table1: TTable
				    Active = True
				    DatabaseName = 'IBLocal'
				    TableName = 'EMPLOYEE'
				    Left = 424
				    Top = 88
				  end
				  object DataSource2: TDataSource
				    DataSet = Table1
				    Left = 480
				    Top = 88
				  end
				end