home *** CD-ROM | disk | FTP | other *** search
- 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
-