object PickOrdDlg: TPickOrdDlg Left = 280 Top = 172 ActiveControl = OrderGrid BorderStyle = bsDialog Caption = 'Choose an order to invoice.' ClientHeight = 253 ClientWidth = 547 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object OrderGrid: TDBGrid Left = 8 Top = 8 Width = 529 Height = 193 Columns = < item FieldName = 'OrderNo' Width = 45 end item FieldName = 'Company' Width = 140 end item FieldName = 'LastInvoiceDate' end item FieldName = 'TotalAmt' Width = 72 end item FieldName = 'AmountPaid' Width = 72 end item FieldName = 'AmountDue' Width = 72 end> DataSource = MastData.OrdPickQrySrc Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] OnDblClick = OrderGridDblClick end object OkBtn: TButton Left = 8 Top = 216 Width = 75 Height = 25 Caption = '&OK' ModalResult = 1 TabOrder = 1 OnClick = OkBtnClick end object CancelBtn: TButton Left = 96 Top = 216 Width = 75 Height = 25 Cancel = True Caption = '&Cancel' ModalResult = 2 TabOrder = 2 end end