home *** CD-ROM | disk | FTP | other *** search
- object frmTemplates: TfrmTemplates
- Left = 346
- Top = 211
- Width = 635
- Height = 371
- BorderIcons = [biSystemMenu, biMaximize]
- Caption = 'Template Tags'
- Color = clBtnFace
- Constraints.MinHeight = 371
- Constraints.MinWidth = 635
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- PopupMenu = pmTemplateTags
- Position = poOwnerFormCenter
- OnClose = FormClose
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object cxGrid1: TcxGrid
- Left = 0
- Top = 0
- Width = 249
- Height = 344
- Align = alLeft
- PopupMenu = pmTemplateTags
- TabOrder = 0
- object cxGrid1DBTableView1: TcxGridDBTableView
- DataController.DataSource = dsTemplates
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- NavigatorButtons.ConfirmDelete = False
- NavigatorButtons.PriorPage.Visible = False
- NavigatorButtons.NextPage.Visible = False
- NavigatorButtons.SaveBookmark.Visible = False
- NavigatorButtons.GotoBookmark.Visible = False
- NavigatorButtons.Filter.Visible = False
- OptionsBehavior.FocusCellOnTab = True
- OptionsBehavior.FocusCellOnCycle = True
- OptionsSelection.InvertSelect = False
- OptionsView.GroupByBox = False
- OptionsView.Indicator = True
- OptionsView.RowSeparatorColor = clBlack
- Styles.Background = cxStyle1
- Styles.Content = cxStyle1
- object cxGrid1DBTableView1DBColumn1: TcxGridDBColumn
- Options.Editing = False
- Options.Filtering = False
- Width = 152
- DataBinding.FieldName = 'Tag'
- end
- object cxGrid1DBTableView1DBColumn2: TcxGridDBColumn
- Caption = 'Order'
- Options.Filtering = False
- SortOrder = soAscending
- Width = 50
- DataBinding.FieldName = 'RepOrder'
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = cxGrid1DBTableView1
- end
- end
- object pnlMain: TPanel
- Left = 249
- Top = 0
- Width = 378
- Height = 344
- Align = alClient
- BevelOuter = bvNone
- Constraints.MinHeight = 337
- Constraints.MinWidth = 378
- TabOrder = 1
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 378
- Height = 319
- Align = alClient
- Constraints.MinHeight = 310
- Constraints.MinWidth = 376
- TabOrder = 0
- OnResize = Panel1Resize
- object Label3: TLabel
- Left = 7
- Top = 60
- Width = 25
- Height = 13
- Caption = 'Field:'
- end
- object Label2: TLabel
- Left = 7
- Top = 37
- Width = 27
- Height = 13
- Caption = 'Type:'
- end
- object Label1: TLabel
- Left = 7
- Top = 8
- Width = 22
- Height = 13
- Caption = 'Tag:'
- end
- object Label4: TLabel
- Left = 7
- Top = 104
- Width = 24
- Height = 13
- Caption = 'Text:'
- end
- object Label5: TLabel
- Left = 7
- Top = 86
- Width = 95
- Height = 13
- Caption = 'Replacement Order:'
- end
- object dbcbFieldName: TwwDBComboBox
- Left = 50
- Top = 60
- Width = 207
- Height = 19
- TabStop = False
- ShowButton = True
- Style = csDropDown
- MapList = True
- AllowClearKey = False
- AutoDropDown = True
- ShowMatchText = True
- Ctl3D = False
- DataField = 'FieldName'
- DataSource = dsTemplates
- DropDownCount = 8
- ItemHeight = 0
- Items.Strings = (
- 'AuctionUserID'#9'AuctionUserID'
- 'ConsignId'#9'ConsignId'
- 'Flat Shipping, Each Additional 1'#9'ShippingServiceAdditionalCost1'
- 'Flat Shipping, Each Additional 2'#9'ShippingServiceAdditionalCost2'
- 'Flat Shipping, Each Additional 3'#9'ShippingServiceAdditionalCost3'
- 'Flat Shipping, Handling 1'#9'ShippingServiceCost1'
- 'Flat Shipping, Handling 2'#9'ShippingServiceCost2'
- 'Flat Shipping, Handling 3'#9'ShippingServiceCost3'
- 'GalleryURL'#9'GalleryURL'
- 'InsuranceFee'#9'InsuranceFee'
- 'InsureFor'#9'InsureFor'
- 'Lot Size'#9'LotSize'
- 'Packaging and Handling Fee'#9'PackagingHandlingCosts'
- 'Payment Instructions'#9'CheckoutInstructions'
- 'PictureURL'#9'PictureURL'
- 'Quantity'#9'Quantity'
- 'Shipping Service 1'#9'ShippingService1'
- 'Shipping Service 2'#9'ShippingService2'
- 'Shipping Service 3'#9'ShippingService3'
- 'StockNo'#9'StockNo'
- 'Subtitle'#9'SubtitleText'
- 'Title'#9'Title'
- 'User Defined Memo 1'#9'UDFMemo01'
- 'User Defined Memo 2'#9'UDFMemo02'
- 'User Defined Memo 3'#9'UDFMemo03'
- 'User Defined Memo 4'#9'UDFMemo04'
- 'User Defined Text 01'#9'UDFText01'
- 'User Defined Text 02'#9'UDFText02'
- 'User Defined Text 03'#9'UDFText03'
- 'User Defined Text 04'#9'UDFText04'
- 'User Defined Text 05'#9'UDFText05'
- 'User Defined Text 06'#9'UDFText06'
- 'User Defined Text 07'#9'UDFText07'
- 'User Defined Text 08'#9'UDFText08'
- 'User Defined Text 09'#9'UDFText09'
- 'User Defined Text 10'#9'UDFText10'
- 'UserDescr'#9'UserDescr'
- 'Weight - User Field'#9'Weight'
- 'WeightMajor'#9'WeightMajor'
- 'WeightMinor'#9'WeightMinor')
- ParentCtl3D = False
- Picture.PictureMaskFromDataSet = False
- Sorted = True
- TabOrder = 2
- UnboundDataType = wwDefault
- end
- object memText: TDBMemo
- Left = 50
- Top = 104
- Width = 315
- Height = 190
- Constraints.MinHeight = 190
- Constraints.MinWidth = 315
- Ctl3D = False
- DataField = 'Text'
- DataSource = dsTemplates
- ParentCtl3D = False
- ScrollBars = ssVertical
- TabOrder = 4
- end
- object edtRepOrder: TwwDBEdit
- Left = 112
- Top = 82
- Width = 49
- Height = 19
- Ctl3D = False
- DataField = 'RepOrder'
- DataSource = dsTemplates
- ParentCtl3D = False
- TabOrder = 3
- UnboundDataType = wwDefault
- WantReturns = False
- WordWrap = False
- end
- object rgType: TDBRadioGroup
- Left = 50
- Top = 24
- Width = 161
- Height = 33
- Columns = 2
- Ctl3D = False
- DataField = 'Type'
- DataSource = dsTemplates
- Items.Strings = (
- 'Text'
- 'FieldName')
- ParentCtl3D = False
- TabOrder = 1
- Values.Strings = (
- '0'
- '1')
- OnChange = rgTypeChange
- end
- object edtTag: TwwDBEdit
- Left = 50
- Top = 8
- Width = 311
- Height = 19
- Ctl3D = False
- DataField = 'Tag'
- DataSource = dsTemplates
- ParentCtl3D = False
- TabOrder = 0
- UnboundDataType = wwDefault
- WantReturns = False
- WordWrap = False
- OnExit = edtTagExit
- end
- end
- object cxDBNavigator1: TcxDBNavigator
- Left = 0
- Top = 319
- Width = 370
- Height = 25
- Buttons.PriorPage.Visible = False
- Buttons.NextPage.Visible = False
- Buttons.SaveBookmark.Visible = False
- Buttons.GotoBookmark.Visible = False
- Buttons.Filter.Visible = False
- DataSource = dsTemplates
- LookAndFeel.Kind = lfFlat
- Align = alBottom
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- end
- end
- object tblTemplates: TAdsTable
- DatabaseName = 'frmPosterMain.AdsConnection1'
- IndexDefs = <
- item
- Name = 'TAG'
- Fields = 'TAG'
- Options = [ixUnique]
- end>
- IndexName = 'TAG'
- StoreActive = True
- Version = '6.2 (ACE 6.20)'
- BeforeInsert = tblTemplatesBeforeInsert
- AfterInsert = tblTemplatesAfterInsert
- BeforePost = tblTemplatesBeforePost
- OnPostError = tblTemplatesPostError
- FieldDefs = <
- item
- Name = 'Tag'
- DataType = ftString
- Size = 30
- end
- item
- Name = 'Type'
- DataType = ftSmallint
- end
- item
- Name = 'Text'
- DataType = ftMemo
- Size = 1
- end
- item
- Name = 'FieldName'
- DataType = ftString
- Size = 40
- end
- item
- Name = 'RepOrder'
- DataType = ftInteger
- end>
- StoreDefs = True
- TableName = 'PTTemplates'
- Left = 49
- Top = 178
- object tblTemplatesTag: TStringField
- FieldName = 'Tag'
- Size = 30
- end
- object tblTemplatesType: TSmallintField
- FieldName = 'Type'
- end
- object tblTemplatesText: TMemoField
- FieldName = 'Text'
- BlobType = ftMemo
- Size = 1
- end
- object tblTemplatesFieldName: TStringField
- FieldName = 'FieldName'
- Size = 40
- end
- object tblTemplatesRepOrder: TIntegerField
- FieldName = 'RepOrder'
- end
- end
- object dsTemplates: TDataSource
- DataSet = tblTemplates
- Left = 53
- Top = 122
- end
- object cxStyleRepository1: TcxStyleRepository
- Left = 64
- Top = 24
- object cxStyle1: TcxStyle
- AssignedValues = [svColor, svTextColor]
- Color = clMoneyGreen
- TextColor = clWindowText
- end
- end
- object pmTemplateTags: TPopupMenu
- Left = 176
- Top = 144
- object Undo1: TMenuItem
- end
- object EmptyTrash1: TMenuItem
- end
- object Copy1: TMenuItem
- end
- object Paste1: TMenuItem
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object menCopy: TMenuItem
- Caption = 'Create new tag from selected'
- ShortCut = 16468
- OnClick = menCopyClick
- end
- object N2: TMenuItem
- Caption = '-'
- end
- object SelectAll1: TMenuItem
- end
- end
- end
-