object FrmTransDemo: TFrmTransDemo Left = 199 Top = 111 Width = 507 Height = 341 Hint = 'All edits in this form are done in a transaction' Caption = 'Employee Browser' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter ShowHint = True OnHide = FormHide OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 0 Top = 0 Width = 499 Height = 41 Align = alTop TabOrder = 0 object BtnUndoEdits: TSpeedButton Left = 345 Top = 8 Width = 76 Height = 25 Hint = 'Rolls Back the current transaction and starts a new one' Caption = '&Undo Edits' OnClick = BtnUndoEditsClick end object BtnCommitEdits: TSpeedButton Left = 261 Top = 8 Width = 76 Height = 25 Hint = 'Commits the current transaction and starts a new one' Caption = '&Commit Edits' OnClick = BtnCommitEditsClick end object DBNavigator: TDBNavigator Left = 8 Top = 8 Width = 240 Height = 25 DataSource = DmEmployee.EmployeeSource Ctl3D = False ParentCtl3D = False TabOrder = 0 end object BitBtn1: TBitBtn Left = 431 Top = 8 Width = 60 Height = 25 Hint = 'Exit and close this form' Caption = 'E&xit' TabOrder = 1 Kind = bkClose Style = bsNew end end object Panel2: TPanel Left = 0 Top = 41 Width = 499 Height = 273 Align = alClient BevelInner = bvLowered BorderWidth = 4 Caption = 'Panel2' TabOrder = 1 object DBGrid1: TDBGrid Left = 6 Top = 6 Width = 487 Height = 261 Align = alClient BorderStyle = bsNone DataSource = DmEmployee.EmployeeSource TabOrder = 0 TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] end end end