object ClientForm: TClientForm Left = 55 Top = 235 Width = 800 Height = 560 Caption = 'Dynamic Where Sample' Color = clBtnFace Constraints.MaxWidth = 800 Constraints.MinWidth = 800 ParentFont = True OldCreateOrder = False Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 0 Top = 0 Width = 784 Height = 49 Align = alTop TabOrder = 0 DesignSize = ( 784 49) object DAPoweredByDataAbstractButton1: TDAPoweredByDataAbstractButton Left = 0 Top = 0 Width = 212 Height = 48 Cursor = crHandPoint end object Label1: TLabel Left = 218 Top = 3 Width = 131 Height = 13 Caption = '&Dynamic Where Conditions:' FocusControl = cbConditions end object cbConditions: TComboBox Left = 218 Top = 22 Width = 554 Height = 21 Style = csDropDownList Anchors = [akLeft, akTop, akRight] ItemHeight = 13 ItemIndex = 0 TabOrder = 0 Text = 'Position is Sales Manager' OnChange = cbConditionsChange Items.Strings = ( 'Position is Sales Manager' 'Position is Sales Manager And City is Chicago' 'City is Chicago or Atlanta' 'FirstName doesn'#39't begin with A' '(Position is Sales Representative Or Zip is NULL) And (City is K' + 'irkland or Seattle). Returns NO RECORDS!' 'No Conditions' 'Country_Name is France (wrong field name is provided)') end end object Panel2: TPanel Left = 0 Top = 49 Width = 784 Height = 128 Align = alTop TabOrder = 1 DesignSize = ( 784 128) object Label2: TLabel Left = 8 Top = 6 Width = 25 Height = 13 Caption = 'XML:' end object edXML: TMemo Left = 8 Top = 25 Width = 764 Height = 89 Anchors = [akLeft, akTop, akRight, akBottom] ScrollBars = ssVertical TabOrder = 0 end end object Panel4: TPanel Left = 0 Top = 177 Width = 784 Height = 41 Align = alTop TabOrder = 2 object btLoad: TButton Left = 8 Top = 6 Width = 75 Height = 25 Caption = '&Load' TabOrder = 0 OnClick = btLoadClick end object btValidate: TButton Left = 89 Top = 6 Width = 75 Height = 25 Caption = '&Validate XML' TabOrder = 1 OnClick = btValidateClick end end object dgData: TDBGrid Left = 0 Top = 218 Width = 784 Height = 306 Align = alClient DataSource = ClientDataModule.ds_Workers TabOrder = 3 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] end end