cachedupdates.lfm

devent UniDAC 2.003 include sources

inherited CachedUpdatesFrame: TCachedUpdatesFrame
  Height = 270
  Width = 681
  Align = alClient
  object DBGrid: TDBGrid
    Height = 168
    Top = 102
    Width = 681
    Align = alClient
    DataSource = DataSource
    FixedColor = clBtnFace
    FixedHotColor = cl3DLight
    Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgCancelOnExit]
    OptionsExtra = [dgeAutoColumns, dgeCheckboxColumn]
    ParentColor = False
    TabOrder = 0
    TabStop = True
    TitleFont.Height = -11
    TitleFont.Name = 'Tahoma'
  end
  object Panel8: TPanel
    Height = 102
    Width = 681
    Align = alTop
    BevelOuter = bvNone
    ClientHeight = 102
    ClientWidth = 681
    TabOrder = 1
    object ToolBar: TPanel
      Left = 1
      Height = 100
      Top = 1
      Width = 667
      BevelOuter = bvNone
      ClientHeight = 100
      ClientWidth = 667
      Color = clBlue
      Font.Height = -11
      Font.Name = 'Tahoma'
      ParentColor = False
      TabOrder = 0
      object btOpen: TSpeedButton
        Left = 1
        Height = 22
        Top = 1
        Width = 82
        Caption = 'Open'
        Color = clBtnFace
        Flat = True
        NumGlyphs = 0
        Transparent = False
        OnClick = btOpenClick
      end
      object btClose: TSpeedButton
        Left = 84
        Height = 22
        Top = 1
        Width = 82
        Caption = 'Close'
        Color = clBtnFace
        Flat = True
        NumGlyphs = 0
        Transparent = False
        OnClick = btCloseClick
      end
      object RefreshRecord: TSpeedButton
        Left = 408
        Height = 22
        Top = 1
        Width = 82
        Caption = 'RefreshRecord'
        Color = clBtnFace
        Flat = True
        NumGlyphs = 0
        Transparent = False
        OnClick = RefreshRecordClick
      end
      object DBNavigator: TDBNavigator
        Left = 167
        Height = 22
        Top = 1
        Width = 240
        BevelOuter = bvNone
        ClientHeight = 22
        ClientWidth = 240
        Color = clBtnFace
        DataSource = DataSource
        Flat = True
        ParentColor = False
        TabOrder = 0
      end
      object Panel1: TPanel
        Left = 1
        Height = 52
        Top = 47
        Width = 368
        BevelOuter = bvNone
        ClientHeight = 52
        ClientWidth = 368
        ParentColor = False
        TabOrder = 1
        object Label2: TLabel
          Left = 5
          Height = 13
          Top = 5
          Width = 48
          Caption = 'Updates'
          Font.Color = clMaroon
          Font.Height = -11
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentColor = False
        end
        object Panel3: TPanel
          Left = 20
          Height = 24
          Top = 23
          Width = 333
          BevelOuter = bvNone
          ClientHeight = 24
          ClientWidth = 333
          Color = clBlue
          ParentColor = False
          TabOrder = 0
          object btApply: TSpeedButton
            Left = 1
            Height = 22
            Top = 1
            Width = 82
            Caption = 'Apply'
            Color = clBtnFace
            Flat = True
            Font.Color = clMaroon
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            NumGlyphs = 0
            Transparent = False
            OnClick = btApplyClick
          end
          object btCommit: TSpeedButton
            Left = 84
            Height = 22
            Top = 1
            Width = 82
            Caption = 'Commit'
            Color = clBtnFace
            Flat = True
            Font.Color = clMaroon
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            NumGlyphs = 0
            Transparent = False
            OnClick = btCommitClick
          end
          object btCancel: TSpeedButton
            Left = 167
            Height = 22
            Top = 1
            Width = 82
            Caption = 'Cancel'
            Color = clBtnFace
            Flat = True
            Font.Color = clMaroon
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            NumGlyphs = 0
            Transparent = False
            OnClick = btCancelClick
          end
          object btRevertRecord: TSpeedButton
            Left = 250
            Height = 22
            Top = 1
            Width = 82
            Caption = 'Revert'
            Color = clBtnFace
            Flat = True
            Font.Color = clMaroon
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            NumGlyphs = 0
            Transparent = False
            OnClick = btRevertRecordClick
          end
        end
      end
      object Panel2: TPanel
        Left = 1
        Height = 22
        Top = 24
        Width = 317
        BevelOuter = bvNone
        ClientHeight = 22
        ClientWidth = 317
        ParentColor = False
        TabOrder = 2
        object Label4: TLabel
          Left = 220
          Height = 14
          Top = 5
          Width = 50
          Caption = 'Batch Size'
          ParentColor = False
        end
        object cbCachedUpdates: TCheckBox
          Left = 8
          Height = 19
          Top = 4
          Width = 103
          Caption = 'CachedUpdates'
          OnClick = cbCachedUpdatesClick
          TabOrder = 0
        end
        object cbCustomUpdate: TCheckBox
          Left = 113
          Height = 19
          Top = 4
          Width = 99
          Caption = 'Custom Update'
          OnClick = cbCustomUpdateClick
          TabOrder = 1
        end
        object edUpdateBatchSize: TEdit
          Left = 276
          Height = 21
          Top = 1
          Width = 37
          TabOrder = 2
          Text = '1'
        end
      end
      object Panel4: TPanel
        Left = 370
        Height = 52
        Top = 47
        Width = 296
        BevelOuter = bvNone
        ClientHeight = 52
        ClientWidth = 296
        ParentColor = False
        TabOrder = 3
        object Label3: TLabel
          Left = 5
          Height = 13
          Top = 5
          Width = 74
          Caption = 'Transactions'
          Font.Color = clNavy
          Font.Height = -11
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentColor = False
        end
        object Panel5: TPanel
          Left = 24
          Height = 24
          Top = 23
          Width = 250
          BevelOuter = bvNone
          ClientHeight = 24
          ClientWidth = 250
          Color = clBlue
          ParentColor = False
          TabOrder = 0
          object btStartTrans: TSpeedButton
            Left = 1
            Height = 22
            Top = 1
            Width = 82
            Caption = 'Start'
            Color = clBtnFace
            Flat = True
            Font.Color = clNavy
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            NumGlyphs = 0
            Transparent = False
            OnClick = btStartTransClick
          end
          object btCommitTrans: TSpeedButton
            Left = 84
            Height = 22
            Top = 1
            Width = 82
            Caption = 'Commit'
            Color = clBtnFace
            Flat = True
            Font.Color = clNavy
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            NumGlyphs = 0
            Transparent = False
            OnClick = btCommitTransClick
          end
          object btRollBackTrans: TSpeedButton
            Left = 167
            Height = 22
            Top = 1
            Width = 82
            Caption = 'Rollback'
            Color = clBtnFace
            Flat = True
            Font.Color = clNavy
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            NumGlyphs = 0
            Transparent = False
            OnClick = btRollbackTransClick
          end
        end
      end
      object Panel6: TPanel
        Left = 319
        Height = 22
        Top = 24
        Width = 347
        BevelOuter = bvNone
        ClientHeight = 22
        ClientWidth = 347
        ParentColor = False
        TabOrder = 4
        object Label1: TLabel
          Left = 6
          Height = 14
          Top = 4
          Width = 64
          Caption = 'RecordTypes'
          ParentColor = False
        end
        object cbDeleted: TCheckBox
          Left = 284
          Height = 19
          Top = 4
          Width = 63
          Caption = 'Deleted'
          OnClick = cbDeletedClick
          TabOrder = 0
        end
        object cbInserted: TCheckBox
          Left = 222
          Height = 19
          Top = 4
          Width = 64
          Caption = 'Inserted'
          OnClick = cbInsertedClick
          TabOrder = 1
        end
        object cbModified: TCheckBox
          Left = 155
          Height = 19
          Top = 4
          Width = 66
          Caption = 'Modified'
          OnClick = cbModifiedClick
          TabOrder = 2
        end
        object cbUnmodified: TCheckBox
          Left = 77
          Height = 19
          Top = 4
          Width = 79
          Caption = 'Unmodified'
          OnClick = cbUnmodifiedClick
          TabOrder = 3
        end
      end
      object Panel7: TPanel
        Left = 491
        Height = 22
        Top = 1
        Width = 175
        BevelOuter = bvNone
        ParentColor = False
        TabOrder = 5
      end
    end
  end
  object DataSource: TDatasource
    DataSet = UniQuery
    OnStateChange = DataSourceStateChange
    OnDataChange = DataSourceDataChange
    left = 233
    top = 50
  end
  object UniQuery: TUniQuery
    SQL.Strings = (
      'SELECT * FROM Emp'
    )
    CachedUpdates = True
    OnUpdateError = UniQueryUpdateError
    OnCalcFields = UniQueryCalcFields
    left = 205
    top = 48
  end
end