home *** CD-ROM | disk | FTP | other *** search
- object AdhocForm: TAdhocForm
- Left = 195
- Top = 108
- Width = 553
- Height = 324
- Caption = 'Adhoc Background Query Demo'
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 96
- TextHeight = 13
- object Label1: TLabel
- Left = 16
- Top = 16
- Width = 74
- Height = 13
- Caption = '&Database Alias:'
- FocusControl = AliasCombo
- end
- object Label2: TLabel
- Left = 16
- Top = 56
- Width = 31
- Height = 13
- Caption = '&Query:'
- end
- object Label3: TLabel
- Left = 152
- Top = 16
- Width = 56
- Height = 13
- Caption = '&User Name:'
- FocusControl = NameEdit
- end
- object Label4: TLabel
- Left = 304
- Top = 16
- Width = 49
- Height = 13
- Caption = '&Password:'
- FocusControl = PasswordEdit
- end
- object Label5: TLabel
- Left = 15
- Top = 259
- Width = 72
- Height = 13
- Caption = '&Retrieve query:'
- FocusControl = SavedQueryCombo
- end
- object Bevel1: TBevel
- Left = 8
- Top = 8
- Width = 449
- Height = 281
- Shape = bsFrame
- end
- object AliasCombo: TComboBox
- Left = 16
- Top = 32
- Width = 129
- Height = 20
- ItemHeight = 13
- TabOrder = 0
- Text = 'AliasCombo'
- end
- object NameEdit: TEdit
- Left = 152
- Top = 32
- Width = 145
- Height = 20
- TabOrder = 1
- Text = 'NameEdit'
- end
- object PasswordEdit: TEdit
- Left = 304
- Top = 32
- Width = 137
- Height = 20
- PasswordChar = '*'
- TabOrder = 2
- Text = 'masterkey'
- end
- object ExecuteBtn: TButton
- Left = 464
- Top = 8
- Width = 75
- Height = 25
- Caption = '&Execute'
- Default = True
- TabOrder = 3
- OnClick = ExecuteBtnClick
- end
- object CloseBtn: TButton
- Left = 464
- Top = 134
- Width = 75
- Height = 25
- Cancel = True
- Caption = '&Close'
- TabOrder = 4
- OnClick = CloseBtnClick
- end
- object SavedQueryCombo: TComboBox
- Left = 96
- Top = 256
- Width = 345
- Height = 20
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 5
- OnChange = SavedQueryComboChange
- end
- object SaveBtn: TButton
- Left = 464
- Top = 72
- Width = 75
- Height = 25
- Caption = '&Save'
- TabOrder = 6
- OnClick = SaveBtnClick
- end
- object SaveAsBtn: TButton
- Left = 464
- Top = 104
- Width = 75
- Height = 25
- Caption = 'Save &as'
- TabOrder = 7
- OnClick = SaveAsBtnClick
- end
- object NewBtn: TButton
- Left = 464
- Top = 40
- Width = 75
- Height = 25
- Caption = '&New'
- TabOrder = 8
- OnClick = NewBtnClick
- end
- object QueryEdit: TRichEdit
- Left = 16
- Top = 72
- Width = 425
- Height = 169
- Lines.Strings = (
- 'QueryEdit')
- PlainText = True
- TabOrder = 9
- WantTabs = True
- end
- end
-