Chip 2004 November

home *** CD-ROM | disk | FTP | other *** search

/ Chip 2004 November / CMCD1104.ISO / Software / Freeware / Comunicatii / poster / tptinstall.exe / %MAINDIR% / Toaster.exe / 0 / RCDATA / TFRMBATCHSUMMARY / TFRMBATCHSUMMARY.txt < prev

Wrap

Text File | 2004-09-23 | 19.2 KB | 913 lines

object frmBatchSummary: TfrmBatchSummary Left = 568 Top = 471 BorderStyle = bsDialog Caption = 'Batch Summary' ClientHeight = 221 ClientWidth = 429 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop OldCreateOrder = False Visible = True OnClose = FormClose OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 14 Top = 7 Width = 45 Height = 13 Cursor = crHandPoint Caption = 'Batch ID:' OnClick = Label1Click end object Label2: TLabel Left = 14 Top = 56 Width = 36 Height = 13 Caption = 'Auction' end object Label3: TLabel Left = 142 Top = 56 Width = 33 Height = 13 Caption = 'Posted' end object Label4: TLabel Left = 197 Top = 45 Width = 33 Height = 13 Caption = 'Posted' end object Label5: TLabel Left = 256 Top = 56 Width = 27 Height = 13 Caption = 'Errors' end object Label6: TLabel Left = 307 Top = 56 Width = 30 Height = 13 Caption = 'Total' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 195 Top = 56 Width = 40 Height = 13 Caption = 'No Fees' end object imgPosted: TImage Left = 149 Top = 29 Width = 18 Height = 19 Cursor = crHandPoint Picture.Data = {<image000.ico>} OnClick = imgPostedClick end object imgPostNoFee: TImage Left = 210 Top = 29 Width = 15 Height = 19 Cursor = crHandPoint Picture.Data = {<image001.ico>} OnClick = imgPostNoFeeClick end object imgError: TImage Left = 260 Top = 29 Width = 19 Height = 20 Cursor = crHandPoint Picture.Data = {<image002.ico>} OnClick = imgErrorClick end object Label8: TLabel Left = 221 Top = 163 Width = 71 Height = 13 Caption = 'Batch Total:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label9: TLabel Left = 41 Top = 167 Width = 148 Height = 13 Caption = 'Click grid to filter records.' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label10: TLabel Left = 353 Top = 54 Width = 61 Height = 13 Caption = 'Total Fees' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object dbcbBatchID: TwwDBLookupCombo Left = 63 Top = 6 Width = 170 Height = 19 Ctl3D = False DropDownAlignment = taLeftJustify LookupTable = qryBatchID LookupField = 'BatchID' ParentCtl3D = False TabOrder = 0 AutoDropDown = False ShowButton = True AllowClearKey = False OnChange = dbcbBatchIDChange end object edtAuction1: TEdit Left = 12 Top = 71 Width = 121 Height = 19 Cursor = crNo TabStop = False Ctl3D = False ParentCtl3D = False ReadOnly = True TabOrder = 1 OnClick = edtAuction1Click end object edtAuction2: TEdit Left = 12 Top = 89 Width = 121 Height = 19 Cursor = crNo TabStop = False Ctl3D = False ParentCtl3D = False ReadOnly = True TabOrder = 2 OnClick = edtAuction2Click end object edtAuction3: TEdit Left = 12 Top = 107 Width = 121 Height = 19 Cursor = crNo TabStop = False Ctl3D = False ParentCtl3D = False ReadOnly = True TabOrder = 3 OnClick = edtAuction3Click end object edtAuction4: TEdit Left = 12 Top = 125 Width = 121 Height = 19 Cursor = crNo TabStop = False Ctl3D = False ParentCtl3D = False ReadOnly = True TabOrder = 4 OnClick = edtAuction4Click end object edtPosted1: TwwDBEdit Left = 132 Top = 71 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing ParentCtl3D = False ReadOnly = True TabOrder = 5 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False OnClick = edtPosted1Click end object edtPostNoFee1: TwwDBEdit Left = 187 Top = 71 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing ParentCtl3D = False ReadOnly = True TabOrder = 6 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False OnClick = edtPostNoFee1Click end object edtErrors1: TwwDBEdit Left = 242 Top = 71 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing ParentCtl3D = False ReadOnly = True TabOrder = 7 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False OnClick = edtErrors1Click end object edtTotal1: TwwDBEdit Left = 297 Top = 71 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing Enabled = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 8 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False end object edtPosted2: TwwDBEdit Left = 132 Top = 89 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing ParentCtl3D = False ReadOnly = True TabOrder = 9 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False OnClick = edtPosted2Click end object edtPostNoFee2: TwwDBEdit Left = 187 Top = 89 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing ParentCtl3D = False ReadOnly = True TabOrder = 10 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False OnClick = edtPostNoFee2Click end object edtErrors2: TwwDBEdit Left = 242 Top = 89 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing ParentCtl3D = False ReadOnly = True TabOrder = 11 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False OnClick = edtErrors2Click end object edtTotal2: TwwDBEdit Left = 297 Top = 89 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing Enabled = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 12 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False end object edtPosted3: TwwDBEdit Left = 132 Top = 107 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing ParentCtl3D = False ReadOnly = True TabOrder = 13 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False OnClick = edtPosted3Click end object edtPostNoFee3: TwwDBEdit Left = 187 Top = 107 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing ParentCtl3D = False ReadOnly = True TabOrder = 14 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False OnClick = edtPostNoFee3Click end object edtErrors3: TwwDBEdit Left = 242 Top = 107 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing ParentCtl3D = False ReadOnly = True TabOrder = 15 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False OnClick = edtErrors3Click end object edtTotal3: TwwDBEdit Left = 297 Top = 107 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing Enabled = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 16 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False end object edtPosted4: TwwDBEdit Left = 132 Top = 125 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing ParentCtl3D = False ReadOnly = True TabOrder = 17 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False OnClick = edtPosted4Click end object edtPostNoFee4: TwwDBEdit Left = 187 Top = 125 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing ParentCtl3D = False ReadOnly = True TabOrder = 18 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False OnClick = edtPostNoFee4Click end object edtErrors4: TwwDBEdit Left = 242 Top = 125 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing ParentCtl3D = False ReadOnly = True TabOrder = 19 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False OnClick = edtErrors4Click end object edtTotal4: TwwDBEdit Left = 297 Top = 125 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing Enabled = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 20 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False end object edtAuctionID1: TEdit Left = 2 Top = 71 Width = 11 Height = 19 TabStop = False Color = clRed Ctl3D = False ParentCtl3D = False TabOrder = 21 Text = 'edtAuctionID1' Visible = False end object edtAuctionID2: TEdit Left = 2 Top = 89 Width = 11 Height = 19 TabStop = False Color = clRed Ctl3D = False ParentCtl3D = False TabOrder = 22 Text = 'edtAuctionID2' Visible = False end object edtAuctionID3: TEdit Left = 2 Top = 107 Width = 11 Height = 19 TabStop = False Color = clRed Ctl3D = False ParentCtl3D = False TabOrder = 23 Text = 'edtAuctionID3' Visible = False end object edtAuctionID4: TEdit Left = 2 Top = 125 Width = 11 Height = 19 TabStop = False Color = clRed Ctl3D = False ParentCtl3D = False TabOrder = 24 Text = 'edtAuctionID4' Visible = False end object edtGrandTotal: TwwDBEdit Left = 297 Top = 159 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing Enabled = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 25 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False end object btnPost: TButton Left = 34 Top = 190 Width = 83 Height = 25 Caption = '&Re-Post Batch' TabOrder = 26 OnClick = btnPostClick end object btnVerify: TButton Left = 122 Top = 190 Width = 83 Height = 25 Caption = '&Verify Batch' TabOrder = 27 OnClick = btnVerifyClick end object btnClose: TButton Left = 298 Top = 190 Width = 83 Height = 25 Caption = '&Close' TabOrder = 28 OnClick = btnCloseClick end object edtBatchID: TEdit Left = 241 Top = 4 Width = 34 Height = 19 Color = clRed Ctl3D = False ParentCtl3D = False TabOrder = 29 Visible = False end object edtFees1: TwwDBEdit Left = 352 Top = 71 Width = 68 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing Enabled = 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 = 30 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False end object edtFees4: TwwDBEdit Left = 352 Top = 125 Width = 68 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing Enabled = 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 = 31 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False end object edtFees3: TwwDBEdit Left = 352 Top = 107 Width = 68 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing Enabled = 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 = 32 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False end object edtFees2: TwwDBEdit Left = 352 Top = 89 Width = 68 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing Enabled = 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 = 33 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False end object edtAuction5: TEdit Left = 12 Top = 141 Width = 121 Height = 19 Cursor = crNo TabStop = False Ctl3D = False ParentCtl3D = False ReadOnly = True TabOrder = 34 OnClick = edtAuction4Click end object edtPosted5: TwwDBEdit Left = 132 Top = 141 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing ParentCtl3D = False ReadOnly = True TabOrder = 35 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False OnClick = edtPosted4Click end object edtPostNoFee5: TwwDBEdit Left = 187 Top = 141 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing ParentCtl3D = False ReadOnly = True TabOrder = 36 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False OnClick = edtPostNoFee4Click end object edtErrors5: TwwDBEdit Left = 242 Top = 141 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing ParentCtl3D = False ReadOnly = True TabOrder = 37 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False OnClick = edtErrors4Click end object edtTotal5: TwwDBEdit Left = 297 Top = 141 Width = 56 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing Enabled = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 38 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False end object edtAuctionID5: TEdit Left = 2 Top = 141 Width = 11 Height = 19 TabStop = False Color = clRed Ctl3D = False ParentCtl3D = False TabOrder = 39 Text = 'edtAuctionID4' Visible = False end object edtFees5: TwwDBEdit Left = 352 Top = 141 Width = 68 Height = 19 Cursor = crNo TabStop = False Ctl3D = False EditAlignment = eaRightAlignEditing Enabled = 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 = 40 UnboundDataType = wwDefault UnboundAlignment = taRightJustify WantReturns = False WordWrap = False end object qryBatchID: TAdsQuery StoreActive = True Version = '6.2 (ACE 6.20)' ReadAllColumns = False SQL.Strings = ( 'SELECT BatchID' 'FROM Ads' 'WHERE BatchID is not null' 'GROUP BY BatchID' 'ORDER BY BatchID desc') Left = 60 Top = 32 ParamData = <> object qryBatchIDBatchID: TStringField FieldName = 'BatchID' end end object qryBatchSummary: TAdsQuery StoreActive = True Version = '6.2 (ACE 6.20)' ReadAllColumns = False SQL.Strings = ( 'SELECT A.BatchID,A.AuctionID,B.AuctionName,' 'A.PostStatus,A.IconIndex,Count(*) RecCount,' 'SUM(A.ListingFee) Fees' 'FROM Ads A INNER JOIN Auction B ON A.AuctionID = B.AuctionID' 'WHERE A.BatchID = :pBatchID' 'GROUP BY A.BatchID,A.AuctionID,B.AuctionName,A.PostStatus,A.Icon' + 'Index') Left = 320 Top = 5 ParamData = < item DataType = ftUnknown Name = 'pBatchID' ParamType = ptUnknown end> end object dsBatchID: TDataSource DataSet = qryBatchID Left = 10 Top = 29 end object dsBatchSummary: TDataSource DataSet = qryBatchSummary Left = 285 Top = 4 end end