object ClientForm: TClientForm Left = 232 Top = 277 Width = 574 Height = 387 Caption = 'Union Tables Sample' Color = clBtnFace ParentFont = True OldCreateOrder = False Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 0 Top = 0 Width = 558 Height = 57 Align = alTop Constraints.MinWidth = 558 TabOrder = 0 object DAPoweredByDataAbstractButton1: TDAPoweredByDataAbstractButton Left = 0 Top = 0 Width = 212 Height = 48 Cursor = crHandPoint end object Label1: TLabel Left = 218 Top = 8 Width = 103 Height = 13 Caption = 'Default table for insert' end object Label2: TLabel Left = 377 Top = 8 Width = 166 Height = 13 Caption = 'Dynamic Where filter on Name field' end object cbInsertTo: TComboBox Left = 218 Top = 27 Width = 145 Height = 21 Style = csDropDownList ItemHeight = 13 ItemIndex = 0 TabOrder = 0 Text = 'Providers' Items.Strings = ( 'Providers' 'Clients') end object edFilter: TEdit Left = 377 Top = 27 Width = 121 Height = 21 TabOrder = 1 end object chFilterOn: TCheckBox Left = 504 Top = 27 Width = 33 Height = 17 Caption = 'On' TabOrder = 2 OnClick = chFilterOnClick end end object Panel2: TPanel Left = 0 Top = 57 Width = 558 Height = 41 Align = alTop TabOrder = 1 object btLoad: TButton Left = 8 Top = 6 Width = 75 Height = 25 Caption = 'Load' TabOrder = 0 OnClick = btLoadClick end object btInsert: TButton Left = 89 Top = 6 Width = 75 Height = 25 Caption = 'Insert' TabOrder = 1 OnClick = btInsertClick end object btUpdate: TButton Left = 170 Top = 6 Width = 75 Height = 25 Caption = 'Update' TabOrder = 2 OnClick = btUpdateClick end object btDelete: TButton Left = 251 Top = 6 Width = 75 Height = 25 Caption = 'Delete' TabOrder = 3 OnClick = btDeleteClick end end object dgData: TDBGrid Left = 0 Top = 98 Width = 558 Height = 253 Align = alClient DataSource = ClientDataModule.ds_UnionAddresses TabOrder = 2 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] Columns = < item Expanded = False FieldName = 'Id' Width = 55 Visible = True end item Expanded = False FieldName = 'Name' Width = 81 Visible = True end item Expanded = False FieldName = 'ContactPhone' Width = 115 Visible = True end item Expanded = False FieldName = 'ContactAddress' Width = 96 Visible = True end item Expanded = False FieldName = '@SourceTable' Width = 94 Visible = True end item Expanded = False FieldName = 'SourceTableName' Width = 95 Visible = True end> end end