home *** CD-ROM | disk | FTP | other *** search
Text File | 2004-09-23 | 58.7 KB | 2,375 lines |
- object FrameDetailUK: TFrameDetailUK
- Left = 0
- Top = 0
- Width = 528
- Height = 698
- PopupMenu = PopupMenu1
- TabOrder = 0
- OnEnter = FrameEnter
- object ScrollBox2: TScrollBox
- Left = 0
- Top = 0
- Width = 528
- Height = 698
- HorzScrollBar.Visible = False
- VertScrollBar.Tracking = True
- Align = alClient
- TabOrder = 0
- object Label1: TLabel
- Left = 38
- Top = 5
- Width = 23
- Height = 13
- Caption = 'Title:'
- end
- object Label13: TLabel
- Left = 5
- Top = 49
- Width = 56
- Height = 13
- Caption = 'User Descr:'
- end
- object imgFlag: TImage
- Left = 2
- Top = 2
- Width = 39
- Height = 21
- Picture.Data = {<image000.bmp>}
- end
- object Label35: TLabel
- Left = 13
- Top = 219
- Width = 131
- Height = 13
- Caption = 'eBay Scheduled Post Date:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label36: TLabel
- Left = 23
- Top = 30
- Width = 38
- Height = 13
- Caption = 'Subtitle:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object gbPayment: TGroupBox
- Left = 7
- Top = 869
- Width = 486
- Height = 112
- Caption = 'Payment Options'
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 13
- object PayPalAccepted: TCheckBox
- Tag = 3
- Left = 7
- Top = 16
- Width = 97
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'PayPalAccepted'
- Caption = 'Pay Pal send to:'
- TabOrder = 0
- OnClick = PayPalAcceptedClick
- end
- object MOCashiers: TCheckBox
- Tag = 3
- Left = 7
- Top = 32
- Width = 169
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'MOCashiers'
- Caption = 'Postal Order/Banker'#39's Draft'
- TabOrder = 1
- OnClick = MOCashiersClick
- end
- object PersonalCheck: TCheckBox
- Tag = 3
- Left = 7
- Top = 48
- Width = 121
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'PersonalCheck'
- Caption = 'Personal cheque'
- TabOrder = 2
- OnClick = PersonalCheckClick
- end
- object PaymentSeeDescription: TCheckBox
- Tag = 3
- Left = 7
- Top = 79
- Width = 145
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'PaymentSeeDescription'
- Caption = 'See item description'
- TabOrder = 4
- OnClick = PaymentSeeDescriptionClick
- end
- object PayPalEmailAddress: TwwDBEdit
- Tag = 3
- Left = 105
- Top = 14
- Width = 216
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'PayPalEmailAddress'
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 5
- UnboundDataType = wwDefault
- WantReturns = False
- WordWrap = False
- OnChange = PayPalEmailAddressChange
- end
- object GroupBox1: TGroupBox
- Left = 181
- Top = 40
- Width = 136
- Height = 70
- Caption = 'Merchant Credit Cards'
- TabOrder = 7
- object VisaMaster: TCheckBox
- Tag = 3
- Left = 16
- Top = 48
- Width = 113
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'VisaMaster'
- Caption = 'Visa/Master Card'
- TabOrder = 1
- OnClick = VisaMasterClick
- end
- object AmEx: TCheckBox
- Tag = 3
- Left = 16
- Top = 16
- Width = 113
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'AmEx'
- Caption = 'American Express'
- TabOrder = 0
- OnClick = AmExClick
- end
- end
- object CCAccepted: TCheckBox
- Tag = 3
- Left = 7
- Top = 64
- Width = 153
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'CCAccepted'
- Caption = 'Credit Card'
- TabOrder = 3
- OnClick = CCAcceptedClick
- end
- object AutoPay: TCheckBox
- Tag = 3
- Left = 335
- Top = 16
- Width = 146
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'AutoPay'
- Caption = 'Immediate Payment Req.'
- TabOrder = 6
- OnClick = AutoPayClick
- end
- end
- object gbDisplayOptions: TGroupBox
- Left = 7
- Top = 355
- Width = 485
- Height = 130
- Caption = 'Display Options'
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 9
- object Label18: TLabel
- Left = 9
- Top = 106
- Width = 61
- Height = 13
- Caption = 'Picture URL:'
- end
- object Label33: TLabel
- Left = 9
- Top = 84
- Width = 40
- Height = 13
- Caption = 'Counter:'
- end
- object Label55: TLabel
- Left = 25
- Top = 18
- Width = 21
- Height = 13
- Caption = 'Bold'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label53: TLabel
- Left = 25
- Top = 34
- Width = 41
- Height = 13
- Caption = 'Highlight'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label52: TLabel
- Left = 25
- Top = 50
- Width = 68
- Height = 13
- Caption = 'Featured Plus!'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label51: TLabel
- Left = 25
- Top = 65
- Width = 95
- Height = 13
- Caption = 'HomePageFeatured'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label56: TLabel
- Left = 125
- Top = 17
- Width = 60
- Height = 13
- Caption = 'Show as Gift'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object BoldTitle: TCheckBox
- Tag = 3
- Left = 8
- Top = 16
- Width = 17
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'BoldTitle'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- OnClick = BoldTitleClick
- end
- object Highlight: TCheckBox
- Tag = 3
- Left = 8
- Top = 32
- Width = 17
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'Highlight'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = HighlightClick
- end
- object Featured: TCheckBox
- Tag = 3
- Left = 8
- Top = 48
- Width = 17
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'Featured'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- OnClick = FeaturedClick
- end
- object SuperFeatured: TCheckBox
- Tag = 3
- Left = 8
- Top = 64
- Width = 17
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'SuperFeatured'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- OnClick = SuperFeaturedClick
- end
- object GiftIcon: TCheckBox
- Tag = 3
- Left = 108
- Top = 16
- Width = 17
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'GiftIcon'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- OnClick = GiftIconClick
- end
- object GiftWrap: TCheckBox
- Tag = 3
- Left = 124
- Top = 32
- Width = 129
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'GiftWrap'
- Caption = 'Gift Wrap/ Gift Card'
- Enabled = False
- TabOrder = 5
- OnClick = GiftWrapClick
- end
- object GiftExpressShipping: TCheckBox
- Tag = 3
- Left = 124
- Top = 47
- Width = 121
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'GiftExpressShipping'
- Caption = 'Express Shipping'
- Enabled = False
- TabOrder = 6
- OnClick = GiftExpressShippingClick
- end
- object GiftShipToRecipient: TCheckBox
- Tag = 3
- Left = 124
- Top = 64
- Width = 129
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'GiftShipToRecipient'
- Caption = 'Ship to gift recipient'
- Enabled = False
- TabOrder = 7
- OnClick = GiftShipToRecipientClick
- end
- object pnlGallery: TPanel
- Left = 240
- Top = 11
- Width = 241
- Height = 94
- BevelOuter = bvNone
- BorderWidth = 1
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 8
- object Shape3: TShape
- Left = 0
- Top = 8
- Width = 241
- Height = 49
- Brush.Color = clBtnShadow
- Pen.Style = psClear
- end
- object Shape1: TShape
- Left = -1
- Top = 0
- Width = 112
- Height = 94
- Brush.Color = clBtnShadow
- Pen.Style = psClear
- end
- object Shape2: TShape
- Left = 0
- Top = 0
- Width = 241
- Height = 44
- Brush.Color = clBtnShadow
- Pen.Style = psClear
- end
- object Label10: TLabel
- Left = 5
- Top = 23
- Width = 60
- Height = 13
- Caption = 'Gallery URL:'
- Color = clBtnShadow
- ParentColor = False
- end
- object Image1: TImage
- Left = 5
- Top = 40
- Width = 100
- Height = 47
- Center = True
- Proportional = True
- end
- object imgPictureURL: TImage
- Left = 117
- Top = 47
- Width = 100
- Height = 47
- Center = True
- Proportional = True
- end
- object Label49: TLabel
- Left = 114
- Top = 5
- Width = 94
- Height = 13
- Caption = 'Gallery Featured'
- Color = clBtnShadow
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- end
- object Label50: TLabel
- Left = 27
- Top = 5
- Width = 32
- Height = 13
- Caption = 'Gallery'
- Color = clBtnShadow
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object GalleryURL: TwwDBEdit
- Tag = 7
- Left = 68
- Top = 22
- Width = 148
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'GalleryURL'
- Ctl3D = False
- MaxLength = 255
- ParentCtl3D = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- UnboundDataType = wwDefault
- WantReturns = False
- WordWrap = False
- OnChange = GalleryURLChange
- OnExit = GalleryURLExit
- end
- object GalleryFeatured: TCheckBox
- Tag = 3
- Left = 95
- Top = 3
- Width = 18
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'GalleryFeatured'
- Color = clBtnShadow
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- TabOrder = 1
- OnClick = GalleryFeaturedClick
- end
- object btnGalleryPicture: TButton
- Left = 218
- Top = 22
- Width = 19
- Height = 19
- Caption = '...'
- TabOrder = 2
- OnClick = btnGalleryPictureClick
- end
- object Gallery: TCheckBox
- Tag = 3
- Left = 8
- Top = 3
- Width = 17
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'Gallery'
- Color = clBtnShadow
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- TabOrder = 0
- OnClick = GalleryClick
- end
- end
- object PictureURL: TwwDBEdit
- Tag = 7
- Left = 76
- Top = 106
- Width = 381
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'PictureURL'
- Ctl3D = False
- MaxLength = 1024
- ParentCtl3D = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 10
- UnboundDataType = wwDefault
- WantReturns = False
- WordWrap = False
- OnChange = PictureURLChange
- OnExit = PictureURLExit
- end
- object Counter: TwwDBComboBox
- Tag = 3
- Left = 76
- Top = 84
- Width = 158
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'Counter'
- ShowButton = True
- Style = csDropDownList
- MapList = True
- AllowClearKey = True
- DropDownCount = 8
- ItemHeight = 0
- Items.Strings = (
- 'No hit counter'#9'0'
- 'Honesty style counter'#9'1'
- 'Green LED'#9'2')
- Sorted = False
- TabOrder = 9
- UnboundDataType = wwDefault
- OnChange = CounterChange
- end
- object btnPictureURL: TButton
- Left = 458
- Top = 106
- Width = 19
- Height = 19
- Caption = '...'
- TabOrder = 11
- OnClick = btnPictureURLClick
- end
- end
- object Title: TwwDBEdit
- Tag = 23
- Left = 66
- Top = 4
- Width = 423
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'Title'
- Ctl3D = False
- MaxLength = 55
- ParentCtl3D = False
- TabOrder = 0
- UnboundDataType = wwDefault
- WantReturns = False
- WordWrap = False
- OnChange = TitleChange
- end
- object Type_PT: TwwRadioGroup
- Tag = 3
- Left = 7
- Top = 113
- Width = 161
- Height = 86
- HelpType = htKeyword
- HelpKeyword = 'Type'
- ItemIndex = 0
- Caption = 'Auction Type'
- Ctl3D = False
- Items.Strings = (
- 'Auction'
- 'Dutch auction'
- 'Fixed price item ("BIN only")'
- 'Stores inventory format')
- ParentCtl3D = False
- TabOrder = 4
- Values.Strings = (
- '1'
- '2'
- '9'
- '7')
- OnChange = Type_PTChange
- OnExit = Type_PTExit
- end
- object gbLocation: TGroupBox
- Left = 306
- Top = 113
- Width = 183
- Height = 115
- Caption = 'Item Location'
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 6
- object Label17: TLabel
- Left = 4
- Top = 34
- Width = 39
- Height = 13
- Caption = 'Country:'
- end
- object Label16: TLabel
- Left = 4
- Top = 52
- Width = 37
- Height = 13
- Caption = 'Region:'
- end
- object Label14: TLabel
- Left = 4
- Top = 16
- Width = 44
- Height = 13
- Caption = 'Location:'
- end
- object Country: TwwDBLookupCombo
- Tag = 19
- Left = 59
- Top = 34
- Width = 111
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'Country'
- Ctl3D = False
- DropDownAlignment = taLeftJustify
- Selected.Strings = (
- 'Country'#9'20'#9'Country'#9'F')
- LookupTable = tblCountry
- LookupField = 'Abbr'
- Style = csDropDownList
- ParentCtl3D = False
- TabOrder = 1
- AutoDropDown = True
- ShowButton = True
- AllowClearKey = False
- ShowMatchText = True
- OnChange = CountryChange
- OnNotInList = CountryNotInList
- end
- object Region: TwwDBLookupCombo
- Tag = 19
- Left = 59
- Top = 52
- Width = 111
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'Region'
- Ctl3D = False
- DropDownAlignment = taLeftJustify
- Selected.Strings = (
- 'RegionName'#9'30'#9'RegionName'#9'F'#9)
- LookupTable = qryRegions
- LookupField = 'RegionID'
- Style = csDropDownList
- ParentCtl3D = False
- TabOrder = 2
- AutoDropDown = True
- ShowButton = True
- AllowClearKey = False
- ShowMatchText = True
- OnChange = RegionChange
- OnNotInList = RegionNotInList
- end
- object Location: TwwDBEdit
- Tag = 23
- Left = 59
- Top = 16
- Width = 111
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'Location'
- Ctl3D = False
- MaxLength = 45
- ParentCtl3D = False
- TabOrder = 0
- UnboundDataType = wwDefault
- WantReturns = False
- WordWrap = False
- OnChange = LocationChange
- end
- end
- object edtUserDescr: TEdit
- Left = 66
- Top = 49
- Width = 423
- Height = 19
- Color = clMoneyGreen
- Ctl3D = False
- MaxLength = 150
- ParentCtl3D = False
- TabOrder = 2
- end
- object pnlPrices: TPanel
- Left = 172
- Top = 118
- Width = 132
- Height = 110
- BevelOuter = bvNone
- BorderWidth = 1
- BorderStyle = bsSingle
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 5
- object Label7: TLabel
- Left = 10
- Top = 2
- Width = 42
- Height = 13
- Caption = 'Quantity:'
- end
- object Label8: TLabel
- Left = 10
- Top = 20
- Width = 43
- Height = 13
- Caption = 'Duration:'
- end
- object Label5: TLabel
- Left = 10
- Top = 38
- Width = 38
- Height = 13
- Caption = 'Min Bid:'
- end
- object Label6: TLabel
- Left = 10
- Top = 56
- Width = 43
- Height = 13
- Caption = 'Reserve:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label3: TLabel
- Left = 10
- Top = 74
- Width = 52
- Height = 13
- Caption = 'Buy It Now'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Private_PT: TCheckBox
- Tag = 3
- Left = 10
- Top = 95
- Width = 97
- Height = 11
- HelpType = htKeyword
- HelpKeyword = 'Private'
- Alignment = taLeftJustify
- Caption = 'Private Auction'
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 5
- OnClick = Private_PTClick
- end
- object Duration: TwwDBComboBox
- Tag = 19
- Left = 66
- Top = 20
- Width = 57
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'Duration'
- ShowButton = True
- Style = csDropDownList
- MapList = False
- AllowClearKey = False
- Ctl3D = False
- DropDownCount = 8
- ItemHeight = 0
- Items.Strings = (
- '3'
- '5'
- '7'
- '10'
- 'GTC')
- ItemIndex = 2
- ParentCtl3D = False
- Sorted = False
- TabOrder = 1
- UnboundDataType = wwDefault
- OnChange = DurationChange
- end
- object Quantity: TwwDBEdit
- Tag = 19
- Left = 66
- Top = 2
- Width = 57
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'Quantity'
- Ctl3D = False
- EditAlignment = eaRightAlignEditing
- ParentCtl3D = False
- TabOrder = 0
- UnboundDataType = wwDefault
- WantReturns = False
- WordWrap = False
- OnChange = QuantityChange
- OnExit = QuantityExit
- end
- object MinimumBid: TwwDBEdit
- Tag = 19
- Left = 66
- Top = 38
- Width = 57
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'MinimumBid'
- Ctl3D = False
- EditAlignment = eaRightAlignEditing
- ParentCtl3D = False
- TabOrder = 2
- UnboundDataType = wwDefault
- UnboundAlignment = taRightJustify
- WantReturns = False
- WordWrap = False
- OnChange = MinimumBidChange
- OnExit = MinimumBidExit
- end
- object ReservePrice: TwwDBEdit
- Tag = 11
- Left = 66
- Top = 56
- Width = 57
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'ReservePrice'
- Ctl3D = False
- EditAlignment = eaRightAlignEditing
- ParentCtl3D = False
- TabOrder = 3
- UnboundDataType = wwDefault
- WantReturns = False
- WordWrap = False
- OnChange = ReservePriceChange
- OnExit = ReservePriceExit
- end
- object BuyItNowPrice: TwwDBEdit
- Tag = 11
- Left = 66
- Top = 74
- Width = 57
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'BuyItNowPrice'
- Ctl3D = False
- EditAlignment = eaRightAlignEditing
- ParentCtl3D = False
- TabOrder = 4
- UnboundDataType = wwDefault
- UnboundAlignment = taRightJustify
- WantReturns = False
- WordWrap = False
- OnChange = BuyItNowPriceChange
- OnExit = BuyItNowPriceExit
- end
- end
- object pnlPTSpecific: TPanel
- Left = 172
- Top = 227
- Width = 317
- Height = 62
- BevelOuter = bvNone
- BorderWidth = 1
- BorderStyle = bsSingle
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 7
- object Label26: TLabel
- Left = 2
- Top = 5
- Width = 48
- Height = 13
- Caption = 'Stock No:'
- end
- object Label11: TLabel
- Left = 3
- Top = 41
- Width = 24
- Height = 13
- Caption = 'Cost:'
- end
- object Label24: TLabel
- Left = 3
- Top = 23
- Width = 53
- Height = 13
- Caption = 'Consign Id:'
- end
- object StockNo: TwwDBEdit
- Left = 58
- Top = 3
- Width = 254
- Height = 19
- HelpType = htKeyword
- Color = clMoneyGreen
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 0
- UnboundDataType = wwDefault
- WantReturns = False
- WordWrap = False
- OnChange = StockNoChange
- end
- object Cost: TwwDBEdit
- Left = 58
- Top = 39
- Width = 57
- Height = 19
- Color = clMoneyGreen
- Ctl3D = False
- EditAlignment = eaRightAlignEditing
- ParentCtl3D = False
- TabOrder = 2
- UnboundDataType = wwDefault
- WantReturns = False
- WordWrap = False
- OnChange = CostChange
- end
- object edtConsignId: TwwDBEdit
- Left = 58
- Top = 21
- Width = 254
- Height = 19
- Color = clMoneyGreen
- MaxLength = 50
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- UnboundDataType = wwDefault
- WantReturns = False
- WordWrap = False
- OnChange = edtConsignIdChange
- end
- object chkStockFlag: TCheckBox
- Left = 122
- Top = 43
- Width = 175
- Height = 17
- Hint = 'Keep pictures on server after auction ends.'
- Alignment = taLeftJustify
- Caption = 'Keep pix on server after auction:'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- OnClick = chkStockFlagClick
- end
- end
- object pnlShippingCosts: TPanel
- Left = 7
- Top = 636
- Width = 485
- Height = 234
- BevelOuter = bvNone
- BorderWidth = 1
- BorderStyle = bsSingle
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 12
- object Label15: TLabel
- Left = 7
- Top = 3
- Width = 102
- Height = 13
- Caption = 'Shipping Rate Details'
- end
- object Label25: TLabel
- Left = 210
- Top = 122
- Width = 11
- Height = 13
- Caption = '% '
- end
- object Label23: TLabel
- Left = 86
- Top = 122
- Width = 47
- Height = 13
- Caption = 'Sales Tax'
- end
- object Label22: TLabel
- Left = 4
- Top = 98
- Width = 132
- Height = 13
- Caption = 'Shipping Insurance per Item'
- WordWrap = True
- end
- object Label12: TLabel
- Left = 8
- Top = 160
- Width = 181
- Height = 13
- Caption = 'Payment instructions and return policy:'
- end
- object Label19: TLabel
- Left = 374
- Top = 122
- Width = 37
- Height = 13
- Caption = 'Weight:'
- end
- object Label27: TLabel
- Left = 374
- Top = 98
- Width = 50
- Height = 13
- Caption = 'Insure For:'
- end
- object InsuranceFee: TwwDBEdit
- Tag = 11
- Left = 141
- Top = 98
- Width = 65
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'InsuranceFee'
- Ctl3D = False
- EditAlignment = eaRightAlignEditing
- Enabled = False
- ParentCtl3D = False
- TabOrder = 1
- UnboundDataType = wwDefault
- UnboundAlignment = taRightJustify
- WantReturns = False
- WordWrap = False
- OnChange = InsuranceFeeChange
- OnExit = InsuranceFeeExit
- end
- object InsuranceOption: TwwDBComboBox
- Tag = 11
- Left = 235
- Top = 98
- Width = 128
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'InsuranceOption'
- ShowButton = True
- Style = csDropDownList
- MapList = True
- AllowClearKey = False
- Ctl3D = False
- DropDownCount = 8
- Enabled = False
- ItemHeight = 0
- Items.Strings = (
- 'Insurance not offered.'#9'0'
- 'Insurance optional.'#9'1'
- 'Insurance required.'#9'2'
- 'Insurance included in Shipping and Handling costs.'#9'3')
- ItemIndex = 0
- ParentCtl3D = False
- Sorted = False
- TabOrder = 2
- UnboundDataType = wwDefault
- OnChange = InsuranceOptionChange
- end
- object SalesTaxPercent: TwwDBEdit
- Tag = 11
- Left = 141
- Top = 122
- Width = 65
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'SalesTaxPercent'
- Ctl3D = False
- EditAlignment = eaRightAlignEditing
- Enabled = False
- ParentCtl3D = False
- TabOrder = 3
- UnboundDataType = wwDefault
- WantReturns = False
- WordWrap = False
- OnChange = SalesTaxPercentChange
- OnExit = SalesTaxPercentExit
- end
- object CheckoutInstructions: TMemo
- Tag = 7
- Left = 16
- Top = 176
- Width = 436
- Height = 51
- HelpType = htKeyword
- HelpKeyword = 'CheckoutInstructions'
- MaxLength = 500
- ScrollBars = ssVertical
- TabOrder = 4
- OnChange = CheckoutInstructionsChange
- end
- object edtWeight: TwwDBEdit
- Left = 429
- Top = 122
- Width = 51
- Height = 19
- Color = clMoneyGreen
- TabOrder = 6
- UnboundDataType = wwDefault
- UnboundAlignment = taRightJustify
- WantReturns = False
- WordWrap = False
- OnChange = edtWeightChange
- end
- object edtInsureFor: TwwDBEdit
- Left = 429
- Top = 98
- Width = 51
- Height = 19
- Color = clMoneyGreen
- EditAlignment = eaRightAlignEditing
- TabOrder = 5
- UnboundDataType = wwDefault
- WantReturns = False
- WordWrap = False
- OnChange = edtInsureForChange
- end
- object pcCosts: TcxPageControl
- Left = 8
- Top = 16
- Width = 473
- Height = 81
- ActivePage = tabFlat
- TabOrder = 0
- ClientRectBottom = 81
- ClientRectRight = 473
- ClientRectTop = 0
- object tabFlat: TcxTabSheet
- Caption = 'tabFlat'
- ImageIndex = 0
- TabVisible = False
- object Label20: TLabel
- Left = 221
- Top = 3
- Width = 89
- Height = 13
- Caption = 'Shipping, Handling'
- end
- object lblEachAdditionalItem: TLabel
- Left = 327
- Top = 3
- Width = 97
- Height = 13
- Caption = 'Each Additional Item'
- end
- object Label45: TLabel
- Left = 224
- Top = 23
- Width = 6
- Height = 13
- Caption = '$'
- end
- object Label46: TLabel
- Left = 224
- Top = 41
- Width = 6
- Height = 13
- Caption = '$'
- end
- object Label47: TLabel
- Left = 224
- Top = 59
- Width = 6
- Height = 13
- Caption = '$'
- end
- object lblShippingServiceAdditionalCost1: TLabel
- Left = 321
- Top = 23
- Width = 12
- Height = 13
- Caption = '+$'
- end
- object lblShippingServiceAdditionalCost2: TLabel
- Left = 321
- Top = 41
- Width = 12
- Height = 13
- Caption = '+$'
- end
- object lblShippingServiceAdditionalCost3: TLabel
- Left = 321
- Top = 59
- Width = 12
- Height = 13
- Caption = '+$'
- end
- object Label21: TLabel
- Left = 16
- Top = 3
- Width = 80
- Height = 13
- Caption = 'Shipping Service'
- end
- object ShippingServiceCost1: TwwDBEdit
- Left = 234
- Top = 23
- Width = 65
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'ShippingServiceCost'
- Ctl3D = False
- EditAlignment = eaRightAlignEditing
- Enabled = False
- ParentCtl3D = False
- TabOrder = 1
- UnboundDataType = wwDefault
- UnboundAlignment = taRightJustify
- WantReturns = False
- WordWrap = False
- OnChange = ShippingServiceCost1Change
- OnExit = ShippingServiceCost1Exit
- end
- object ShippingServiceAdditionalCost1: TwwDBEdit
- Left = 342
- Top = 23
- Width = 65
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'ShippingServiceAdditionalCost'
- Ctl3D = False
- EditAlignment = eaRightAlignEditing
- Enabled = False
- ParentCtl3D = False
- TabOrder = 2
- UnboundDataType = wwDefault
- WantReturns = False
- WordWrap = False
- OnChange = ShippingServiceAdditionalCost1Change
- OnExit = ShippingServiceAdditionalCost1Exit
- end
- object ShippingServiceCost2: TwwDBEdit
- Left = 234
- Top = 41
- Width = 65
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'ShippingServiceCost'
- Ctl3D = False
- EditAlignment = eaRightAlignEditing
- Enabled = False
- ParentCtl3D = False
- TabOrder = 4
- UnboundDataType = wwDefault
- UnboundAlignment = taRightJustify
- WantReturns = False
- WordWrap = False
- OnChange = ShippingServiceCost2Change
- OnExit = ShippingServiceCost2Exit
- end
- object ShippingServiceCost3: TwwDBEdit
- Left = 234
- Top = 59
- Width = 65
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'ShippingServiceCost'
- Ctl3D = False
- EditAlignment = eaRightAlignEditing
- Enabled = False
- ParentCtl3D = False
- TabOrder = 7
- UnboundDataType = wwDefault
- UnboundAlignment = taRightJustify
- WantReturns = False
- WordWrap = False
- OnChange = ShippingServiceCost3Change
- OnExit = ShippingServiceCost3Exit
- end
- object ShippingServiceAdditionalCost2: TwwDBEdit
- Left = 342
- Top = 41
- Width = 65
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'ShippingServiceAdditionalCost'
- Ctl3D = False
- EditAlignment = eaRightAlignEditing
- Enabled = False
- ParentCtl3D = False
- TabOrder = 5
- UnboundDataType = wwDefault
- WantReturns = False
- WordWrap = False
- OnChange = ShippingServiceAdditionalCost2Change
- OnExit = ShippingServiceAdditionalCost2Exit
- end
- object ShippingServiceAdditionalCost3: TwwDBEdit
- Left = 342
- Top = 59
- Width = 65
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'ShippingServiceAdditionalCost'
- Ctl3D = False
- EditAlignment = eaRightAlignEditing
- Enabled = False
- ParentCtl3D = False
- TabOrder = 8
- UnboundDataType = wwDefault
- WantReturns = False
- WordWrap = False
- OnChange = ShippingServiceAdditionalCost3Change
- OnExit = ShippingServiceAdditionalCost3Exit
- end
- object ShippingServiceFlat1: TwwDBComboBox
- Left = 11
- Top = 23
- Width = 190
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'ShippingService'
- ShowButton = True
- Style = csDropDownList
- MapList = True
- AllowClearKey = True
- DropDownCount = 12
- Enabled = False
- ItemHeight = 0
- Items.Strings = (
- 'Royal Mail 1st Class Standard'#9'301'
- 'Royal Mail 2nd Class Standard'#9'302'
- 'Royal Mail 1st Class Recorded'#9'303'
- 'Royal Mail 2nd Class Recorded'#9'304'
- 'Royal Mail Special Delivery'#9'305'
- 'Royal Mail Standard Parcels'#9'306'
- 'Parcelforce 24'#9'307'
- 'Parcelforce 48'#9'308'
- 'Other Courier'#9'309')
- Sorted = False
- TabOrder = 0
- UnboundDataType = wwDefault
- OnChange = ShippingServiceFlat1Change
- end
- object ShippingServiceFlat2: TwwDBComboBox
- Left = 11
- Top = 41
- Width = 190
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'ShippingService'
- ShowButton = True
- Style = csDropDownList
- MapList = True
- AllowClearKey = True
- DropDownCount = 12
- Enabled = False
- ItemHeight = 0
- Items.Strings = (
- 'Royal Mail 1st Class Standard'#9'301'
- 'Royal Mail 2nd Class Standard'#9'302'
- 'Royal Mail 1st Class Recorded'#9'303'
- 'Royal Mail 2nd Class Recorded'#9'304'
- 'Royal Mail Special Delivery'#9'305'
- 'Royal Mail Standard Parcels'#9'306'
- 'Parcelforce 24'#9'307'
- 'Parcelforce 48'#9'308'
- 'Other Courier'#9'309')
- Sorted = False
- TabOrder = 3
- UnboundDataType = wwDefault
- OnChange = ShippingServiceFlat2Change
- end
- object ShippingServiceFlat3: TwwDBComboBox
- Left = 11
- Top = 59
- Width = 190
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'ShippingService'
- ShowButton = True
- Style = csDropDownList
- MapList = True
- AllowClearKey = True
- DropDownCount = 12
- Enabled = False
- ItemHeight = 0
- Items.Strings = (
- 'Royal Mail 1st Class Standard'#9'301'
- 'Royal Mail 2nd Class Standard'#9'302'
- 'Royal Mail 1st Class Recorded'#9'303'
- 'Royal Mail 2nd Class Recorded'#9'304'
- 'Royal Mail Special Delivery'#9'305'
- 'Royal Mail Standard Parcels'#9'306'
- 'Parcelforce 24'#9'307'
- 'Parcelforce 48'#9'308'
- 'Other Courier'#9'309')
- Sorted = False
- TabOrder = 6
- UnboundDataType = wwDefault
- OnChange = ShippingServiceFlat3Change
- end
- end
- end
- end
- object pnlShipToLocations: TPanel
- Left = 239
- Top = 484
- Width = 253
- Height = 153
- BevelOuter = bvNone
- BorderStyle = bsSingle
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 11
- OnExit = pnlShipToLocationsExit
- object Label4: TLabel
- Left = 3
- Top = 0
- Width = 86
- Height = 13
- Caption = 'Ship To Locations'
- end
- object ShippingOption: TwwRadioGroup
- Tag = 3
- Left = 8
- Top = 13
- Width = 241
- Height = 56
- HelpType = htKeyword
- HelpKeyword = 'ShippingOption'
- ItemIndex = 0
- ShowBorder = False
- NoSpacing = True
- Caption = 'Ship to Locations'
- Ctl3D = False
- Items.Strings = (
- 'UK Only'
- 'Internationally'
- 'Will arrange for local pickup only (no shipping)'
- 'UK and Regions below')
- ParentCtl3D = False
- TabOrder = 0
- Values.Strings = (
- 'SiteOnly'
- 'WorldWide'
- 'WillNotShip'
- 'SitePlusRegions'
- '')
- OnChange = ShippingOptionChange
- end
- object ShipToNorthAmerica: TCheckBox
- Tag = 11
- Left = 24
- Top = 72
- Width = 89
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'ShipToNorthAmerica'
- Caption = 'US && Canada'
- Enabled = False
- TabOrder = 1
- OnClick = ShipToNorthAmericaClick
- end
- object ShipToEurope: TCheckBox
- Tag = 11
- Left = 24
- Top = 88
- Width = 97
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'ShipToEurope'
- Caption = 'Europe'
- Enabled = False
- TabOrder = 2
- OnClick = ShipToEuropeClick
- end
- object ShipToMiddleEast: TCheckBox
- Tag = 11
- Left = 24
- Top = 104
- Width = 97
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'ShipToMiddleEast'
- Caption = 'Middle East'
- Enabled = False
- TabOrder = 3
- OnClick = ShipToMiddleEastClick
- end
- object ShipToAsia: TCheckBox
- Tag = 11
- Left = 24
- Top = 120
- Width = 97
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'ShipToAsia'
- Caption = 'Asia'
- Enabled = False
- TabOrder = 4
- OnClick = ShipToAsiaClick
- end
- object ShipToSouthAmerica: TCheckBox
- Tag = 11
- Left = 24
- Top = 136
- Width = 97
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'ShipToSouthAmerica'
- Caption = 'South America'
- Enabled = False
- TabOrder = 5
- OnClick = ShipToSouthAmericaClick
- end
- object ShipToAfrica: TCheckBox
- Tag = 11
- Left = 113
- Top = 72
- Width = 97
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'ShipToAfrica'
- Caption = 'Africa'
- Enabled = False
- TabOrder = 6
- OnClick = ShipToAfricaClick
- end
- object ShipToLatinAmerica: TCheckBox
- Tag = 11
- Left = 113
- Top = 88
- Width = 113
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'ShipToLatinAmerica'
- Caption = 'Mexico && Cent. Am.'
- Enabled = False
- TabOrder = 7
- OnClick = ShipToLatinAmericaClick
- end
- object ShipToOceania: TCheckBox
- Tag = 11
- Left = 113
- Top = 104
- Width = 97
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'ShipToOceania'
- Caption = 'Australasia'
- Enabled = False
- TabOrder = 8
- OnClick = ShipToOceaniaClick
- end
- object ShipToCaribbean: TCheckBox
- Tag = 11
- Left = 113
- Top = 120
- Width = 97
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'ShipToCaribbean'
- Caption = 'Caribbean'
- Enabled = False
- TabOrder = 9
- OnClick = ShipToCaribbeanClick
- end
- end
- object pnlShippingOptions: TPanel
- Left = 7
- Top = 484
- Width = 233
- Height = 153
- BevelOuter = bvNone
- BorderStyle = bsSingle
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 10
- object Label9: TLabel
- Left = 3
- Top = 1
- Width = 70
- Height = 13
- Caption = 'Shipping Costs'
- end
- object CheckoutDetailsSpecified: TCheckBox
- Tag = 3
- Left = 24
- Top = 19
- Width = 201
- Height = 17
- HelpType = htKeyword
- HelpKeyword = 'CheckoutDetailsSpecified'
- Caption = 'Yes, I'#39'm specifying shipping costs'
- TabOrder = 0
- OnClick = CheckoutDetailsSpecifiedClick
- end
- object ShippingType: TwwRadioGroup
- Tag = 43
- Left = 16
- Top = 43
- Width = 185
- Height = 57
- HelpType = htKeyword
- HelpKeyword = 'ShippingType'
- ItemIndex = 0
- Caption = 'ShippingType'
- Enabled = False
- Items.Strings = (
- 'Flat shipping rates'
- 'Calculated shipping rates')
- TabOrder = 1
- Values.Strings = (
- '1'
- '2')
- Visible = False
- end
- end
- object pnlStatus: TPanel
- Left = 4
- Top = 72
- Width = 485
- Height = 40
- BevelOuter = bvNone
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 3
- object Label32: TLabel
- Left = 4
- Top = 2
- Width = 57
- Height = 13
- Caption = 'Post Status:'
- end
- object Label31: TLabel
- Left = 326
- Top = 2
- Width = 43
- Height = 13
- Caption = 'Modified:'
- end
- object Label30: TLabel
- Left = 326
- Top = 20
- Width = 36
- Height = 13
- Caption = 'End Dt:'
- end
- object Label28: TLabel
- Left = 4
- Top = 21
- Width = 34
- Height = 13
- Caption = 'UserId:'
- end
- object Label29: TLabel
- Left = 166
- Top = 20
- Width = 39
- Height = 13
- Caption = 'Start Dt:'
- end
- object Label34: TLabel
- Left = 215
- Top = 2
- Width = 30
- Height = 13
- Caption = 'Item#:'
- end
- object Label37: TLabel
- Left = 132
- Top = 2
- Width = 27
- Height = 13
- Caption = 'AdID:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object edtModified: TEdit
- Left = 374
- Top = 2
- Width = 109
- Height = 19
- TabStop = False
- BorderStyle = bsNone
- Color = clBtnFace
- Ctl3D = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlue
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentCtl3D = False
- ParentFont = False
- ReadOnly = True
- TabOrder = 1
- Text = 'edtModified'
- end
- object edtEndDate: TEdit
- Left = 374
- Top = 20
- Width = 109
- Height = 19
- TabStop = False
- BorderStyle = bsNone
- Color = clBtnFace
- Ctl3D = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlue
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentCtl3D = False
- ParentFont = False
- ReadOnly = True
- TabOrder = 3
- Text = 'edtEndDate'
- end
- object dbcbUserID: TwwDBLookupCombo
- Tag = 16
- Left = 63
- Top = 21
- Width = 97
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'UserId'
- Ctl3D = False
- DropDownAlignment = taLeftJustify
- LookupTable = qryAuctionUser
- LookupField = 'AuctionUserID'
- ParentCtl3D = False
- TabOrder = 0
- AutoDropDown = True
- ShowButton = True
- AllowClearKey = False
- ShowMatchText = True
- OnChange = dbcbUserIDChange
- OnNotInList = dbcbUserIDNotInList
- end
- object edtPostStatus: TEdit
- Left = 62
- Top = 2
- Width = 53
- Height = 19
- TabStop = False
- BorderStyle = bsNone
- Color = clBtnFace
- Ctl3D = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentCtl3D = False
- ParentFont = False
- ReadOnly = True
- TabOrder = 4
- Text = 'edtPostStatus'
- end
- object edtStartDate: TEdit
- Left = 211
- Top = 20
- Width = 109
- Height = 19
- TabStop = False
- BorderStyle = bsNone
- Color = clBtnFace
- Ctl3D = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlue
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentCtl3D = False
- ParentFont = False
- ReadOnly = True
- TabOrder = 2
- Text = 'edtStartDate'
- end
- object edtEbayItemID: TEdit
- Left = 250
- Top = 2
- Width = 70
- Height = 19
- TabStop = False
- BorderStyle = bsNone
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlue
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- PopupMenu = PopupMenu1
- ReadOnly = True
- TabOrder = 5
- Text = 'edtEbayItemID'
- end
- object edtAdID: TwwDBEdit
- Left = 162
- Top = 1
- Width = 41
- Height = 19
- TabStop = False
- BorderStyle = bsNone
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlue
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ReadOnly = True
- TabOrder = 6
- UnboundDataType = wwDefault
- UnboundAlignment = taRightJustify
- WantReturns = False
- WordWrap = False
- end
- end
- object pnlCategory: TPanel
- Left = 6
- Top = 291
- Width = 484
- Height = 66
- BevelOuter = bvNone
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 8
- object Label2: TLabel
- Left = 133
- Top = 44
- Width = 73
- Height = 13
- Caption = 'Store Category:'
- end
- object edtCategory1: TEdit
- Left = 131
- Top = 1
- Width = 353
- Height = 19
- TabStop = False
- Color = clBtnFace
- Ctl3D = False
- ParentCtl3D = False
- ReadOnly = True
- TabOrder = 4
- end
- object btnCategory: TButton
- Left = 0
- Top = 1
- Width = 56
- Height = 19
- Caption = 'Category'
- TabOrder = 0
- OnClick = btnCategoryClick
- end
- object btnCategory2: TButton
- Left = 0
- Top = 21
- Width = 56
- Height = 19
- Caption = 'Category2'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- OnClick = btnCategory2Click
- end
- object Category2: TEdit
- Tag = 3
- Left = 60
- Top = 21
- Width = 65
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'Category2'
- Ctl3D = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentCtl3D = False
- ParentFont = False
- TabOrder = 3
- OnChange = Category2Change
- OnEnter = Category2Enter
- OnExit = Category2Exit
- end
- object Category: TEdit
- Tag = 19
- Left = 60
- Top = 1
- Width = 65
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'Category'
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 1
- OnChange = CategoryChange
- OnEnter = CategoryEnter
- OnExit = CategoryExit
- end
- object edtCategory2: TEdit
- Left = 131
- Top = 21
- Width = 353
- Height = 19
- TabStop = False
- Color = clBtnFace
- Ctl3D = False
- ParentCtl3D = False
- ReadOnly = True
- TabOrder = 5
- end
- object btnItemSpecifics: TButton
- Left = 0
- Top = 42
- Width = 125
- Height = 17
- Caption = 'Item Specifics'
- Enabled = False
- TabOrder = 6
- OnClick = btnItemSpecificsClick
- end
- object StoreCategory: TwwDBLookupCombo
- Tag = 3
- Left = 221
- Top = 44
- Width = 180
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'StoreCategory'
- DropDownAlignment = taLeftJustify
- Selected.Strings = (
- 'StoreCategoryDescr'#9'30'#9'StoreCategoryDescr'#9'F')
- LookupTable = qryStoreCategory
- LookupField = 'StoreCategory'
- Style = csDropDownList
- DropDownCount = 21
- TabOrder = 7
- AutoDropDown = False
- ShowButton = True
- AllowClearKey = True
- OnChange = StoreCategoryChange
- OnNotInList = StoreCategoryNotInList
- end
- end
- object dtpSchedule: TwwDBDateTimePicker
- Left = 13
- Top = 235
- Width = 147
- Height = 21
- Hint = 'incurs a fee from eBay'
- CalendarAttributes.Font.Charset = DEFAULT_CHARSET
- CalendarAttributes.Font.Color = clWindowText
- CalendarAttributes.Font.Height = -11
- CalendarAttributes.Font.Name = 'MS Sans Serif'
- CalendarAttributes.Font.Style = []
- CalendarAttributes.PopupYearOptions.YearsPerColumn = 2
- CalendarAttributes.PopupYearOptions.NumberColumns = 1
- CalendarAttributes.PopupYearOptions.StartYear = 2003
- Epoch = 1950
- Interval.RoundMinutes = True
- ShowButton = True
- TabOrder = 20
- DisplayFormat = 'ddddd hh:nn ampm'
- OnChange = dtpScheduleChange
- end
- object edtCat2CSID: TEdit
- Left = 359
- Top = 208
- Width = 9
- Height = 19
- Color = clRed
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 22
- Visible = False
- end
- object edtCat1CSID: TEdit
- Left = 351
- Top = 208
- Width = 9
- Height = 19
- Color = clRed
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 21
- Visible = False
- end
- object edtSiteId: TEdit
- Left = 367
- Top = 208
- Width = 17
- Height = 19
- Color = clRed
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 19
- Text = '3'
- Visible = False
- end
- object edtAuctionID: TEdit
- Left = 383
- Top = 208
- Width = 17
- Height = 19
- Color = clRed
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 17
- Text = '3'
- Visible = False
- end
- object dbmAttrXML: TDBMemo
- Left = 399
- Top = 208
- Width = 17
- Height = 19
- Color = clRed
- Ctl3D = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentCtl3D = False
- ParentFont = False
- TabOrder = 15
- Visible = False
- WordWrap = False
- end
- object dbmXML: TDBMemo
- Left = 415
- Top = 208
- Width = 17
- Height = 19
- Color = clRed
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 14
- Visible = False
- WordWrap = False
- end
- object Currency: TEdit
- Tag = 2
- Left = 431
- Top = 208
- Width = 9
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'Currency'
- Color = clRed
- Ctl3D = False
- ParentCtl3D = False
- ReadOnly = True
- TabOrder = 18
- Text = '3'
- Visible = False
- end
- object edtOldCategory: TEdit
- Left = 439
- Top = 208
- Width = 9
- Height = 19
- Color = clRed
- Ctl3D = False
- ParentCtl3D = False
- TabOrder = 16
- Visible = False
- end
- object SubtitleText: TwwDBEdit
- Tag = 7
- Left = 66
- Top = 27
- Width = 423
- Height = 19
- HelpType = htKeyword
- HelpKeyword = 'SubtitleText'
- Ctl3D = False
- MaxLength = 55
- ParentCtl3D = False
- TabOrder = 1
- UnboundDataType = wwDefault
- WantReturns = False
- WordWrap = False
- OnChange = TitleChange
- end
- end
- object tblCountry: TAdsTable
- DatabaseName = 'frmPosterMain.AdsConnection1'
- IndexDefs = <
- item
- Name = 'COUNTRY'
- Fields = 'CODE'
- Options = [ixUnique]
- end
- item
- Name = 'ABBR'
- Fields = 'ABBR'
- end
- item
- Name = 'CODECOUNTRY'
- Fields = 'CODE;COUNTRY;ABBR'
- end>
- IndexName = 'CODECOUNTRY'
- StoreActive = True
- Version = '6.2 (ACE 6.20)'
- AdsConnection = frmPosterMain.AdsConnection1
- FieldDefs = <
- item
- Name = 'Country'
- DataType = ftString
- Size = 50
- end
- item
- Name = 'Code'
- DataType = ftInteger
- end
- item
- Name = 'Abbr'
- DataType = ftString
- Size = 2
- end>
- StoreDefs = True
- TableName = 'EbayCountry'
- Left = 435
- Top = 296
- end
- object qryRegions: TAdsQuery
- DatabaseName = 'frmPosterMain.AdsConnection1'
- StoreActive = True
- Version = '6.2 (ACE 6.20)'
- ReadAllColumns = False
- SQL.Strings = (
- 'SELECT RegionName, RegionID FROM EbayRegions'
- 'WHERE AuctionID = 3'
- 'ORDER BY MajorSort, RegionName')
- Left = 314
- Top = 298
- ParamData = <>
- object qryRegionsRegionName: TStringField
- DisplayWidth = 30
- FieldName = 'RegionName'
- Size = 50
- end
- object qryRegionsRegionID: TIntegerField
- DisplayWidth = 10
- FieldName = 'RegionID'
- Visible = False
- end
- end
- object qryCategory: TAdsQuery
- DatabaseName = 'frmPosterMain.AdsConnection1'
- StoreActive = True
- Version = '6.2 (ACE 6.20)'
- ReadAllColumns = False
- SQL.Strings = (
- 'SELECT DISTINCT A.FullName,B.SiteId,B.CSId'
- 'From EbayCategories A LEFT JOIN'
-
- 'EbayCategory2CS B ON (A.SiteId = B.SiteId and A.CategoryId = B.C' +
- 'ategoryId)'
- 'WHERE A.CategoryId = :pCategoryId'
- 'AND A.SiteId = :pSiteId')
- Left = 355
- Top = 298
- ParamData = <
- item
- DataType = ftUnknown
- Name = 'pCategoryId'
- ParamType = ptUnknown
- end
- item
- DataType = ftUnknown
- Name = 'pSiteId'
- ParamType = ptUnknown
- end>
- end
- object qryAuction: TAdsQuery
- DatabaseName = 'frmPosterMain.AdsConnection1'
- StoreActive = True
- Version = '6.2 (ACE 6.20)'
- ReadAllColumns = False
- SQL.Strings = (
- 'SELECT A.*,B.CurrencyName,B.CurrencySymbol'
-
- 'FROM Auction A INNER JOIN EbayCurrency B ON A.CurrencyId = B.Cur' +
- 'rencyId'
- 'WHERE AuctionID = 3')
- Left = 393
- Top = 298
- ParamData = <>
- end
- object PopupMenu1: TPopupMenu
- OnPopup = PopupMenu1Popup
- Left = 302
- Top = 264
- object Undo1: TMenuItem
- end
- object Cut1: TMenuItem
- end
- object Copy1: TMenuItem
- end
- object Paste1: TMenuItem
- end
- object N3: TMenuItem
- Caption = '-'
- end
- object Title1: TMenuItem
- Caption = 'Title'
- OnClick = Title1Click
- end
- object Category1: TMenuItem
- Caption = 'Category'
- OnClick = Category1Click
- end
- object AuctionType1: TMenuItem
- Caption = 'Auction Type'
- OnClick = AuctionType1Click
- end
- object Quantity1: TMenuItem
- Caption = 'Qty,Duration,MinBid...'
- OnClick = Quantity1Click
- end
- object Location1: TMenuItem
- Caption = 'Location'
- OnClick = Location1Click
- end
- object CostStockNoConsign1: TMenuItem
- Caption = 'StockNo, Consign, Cost'
- OnClick = CostStockNoConsign1Click
- end
- object DisplayOptions1: TMenuItem
- Caption = 'Display Options'
- OnClick = DisplayOptions1Click
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object ShippingOptions1: TMenuItem
- Caption = 'Shipping Options'
- OnClick = ShippingOptions1Click
- end
- object ShipToLocations1: TMenuItem
- Caption = 'Ship To Locations'
- OnClick = ShipToLocations1Click
- end
- object ShippingCosts1: TMenuItem
- Caption = 'Shipping Costs'
- OnClick = ShippingCosts1Click
- end
- object N2: TMenuItem
- Caption = '-'
- end
- object Payments1: TMenuItem
- Caption = 'Payment'
- OnClick = Payments1Click
- end
- end
- object qryAuctionUser: TAdsQuery
- DatabaseName = 'frmPosterMain.AdsConnection1'
- IndexName = 'AUCTIONIDUSERID'
- StoreActive = True
- Version = '6.2 (ACE 6.20)'
- ReadAllColumns = False
- RequestLive = True
- SQL.Strings = (
- 'SELECT *'
- 'FROM AuctionUser'
- 'WHERE AuctionId = 0')
- Left = 236
- Top = 298
- ParamData = <>
- end
- object qryStoreCategory: TAdsQuery
- DatabaseName = 'frmPosterMain.AdsConnection1'
- StoreActive = True
- Version = '6.2 (ACE 6.20)'
- ReadAllColumns = False
- SQL.Strings = (
- 'Select *'
- 'FROM EbayStoreCategory'
- 'WHERE AuctionId = 3'
- 'ORDER BY StoreCategory')
- Left = 273
- Top = 296
- ParamData = <>
- end
- end
-