object frmParamSet: TfrmParamSet Left = 0 Top = 0 BorderIcons = [biSystemMenu, biMinimize] Caption = #21442#25968#35774#32622 ClientHeight = 593 ClientWidth = 775 Color = clBtnFace Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [] OldCreateOrder = False Position = poDesktopCenter OnClose = FormClose OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 21 object Label33: TLabel Left = 13 Top = 69 Width = 60 Height = 20 Caption = #37325#37327#20445#30041 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -15 Font.Name = #24494#36719#38597#40657 Font.Style = [] ParentFont = False end inline FrameParam1: TFrameParam Left = 0 Top = 50 Width = 775 Height = 519 Align = alTop Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -19 Font.Name = #24494#36719#38597#40657 Font.Style = [] ParentFont = False TabOrder = 0 ExplicitTop = 50 ExplicitWidth = 775 ExplicitHeight = 519 inherited pnlSet: TPanel Width = 775 Height = 519 ExplicitWidth = 775 ExplicitHeight = 519 inherited cxGroupBox1: TcxGroupBox Style.Font.Charset = GB2312_CHARSET Style.IsFontAssigned = True ExplicitTop = 2 ExplicitWidth = 771 Width = 771 inherited Label34: TLabel Visible = True end inherited edtMaBiao: TcxTextEdit ExplicitHeight = 38 end inherited edtMBDW: TcxTextEdit ExplicitHeight = 38 end inherited edtChen: TcxTextEdit ExplicitHeight = 38 end inherited outPage: TcxTextEdit ExplicitHeight = 38 end inherited AddwetPresent: TcxTextEdit ExplicitHeight = 31 end inherited AddLenPresent: TcxTextEdit ExplicitHeight = 31 end inherited presentNumFlag: TcxComboBox ExplicitHeight = 31 end end inherited cxGroupBox2: TcxGroupBox Style.Font.Charset = GB2312_CHARSET Style.IsFontAssigned = True ExplicitWidth = 771 Width = 771 inherited MinLen: TcxTextEdit Left = 53 Top = 27 Touch.ParentTabletOptions = False Touch.TabletOptions = [] ExplicitLeft = 53 ExplicitTop = 27 ExplicitHeight = 31 end inherited MaxLen: TcxTextEdit ExplicitHeight = 31 end inherited MinWeight: TcxTextEdit ExplicitHeight = 31 end inherited MaxWeight: TcxTextEdit ExplicitHeight = 31 end inherited BeginPieceNo: TcxTextEdit Top = 64 Properties.OnChange = FrameParam1BeginPieceNoPropertiesChange ExplicitTop = 64 ExplicitHeight = 31 end inherited EndPieceNo: TcxTextEdit Properties.OnChange = FrameParam1EndPieceNoPropertiesChange ExplicitHeight = 31 end end inherited cxGroupBox3: TcxGroupBox ExplicitWidth = 771 Width = 771 inherited MPlace: TcxTextEdit ExplicitHeight = 31 end inherited YPlace: TcxTextEdit ExplicitHeight = 31 end inherited KgPlace: TcxTextEdit ExplicitHeight = 31 end end inherited cxGroupBox4: TcxGroupBox ExplicitWidth = 771 ExplicitHeight = 133 Height = 133 Width = 771 inherited edtdabao: TcxTextEdit Style.Font.Height = -16 Style.IsFontAssigned = True ExplicitHeight = 34 end inherited packRolls: TcxTextEdit ExplicitHeight = 31 end inherited rollnoMake: TcxComboBox Properties.DropDownListStyle = lsEditFixedList Style.Font.Charset = GB2312_CHARSET Style.IsFontAssigned = True ExplicitHeight = 31 end inherited packNoMake: TcxComboBox ExplicitHeight = 31 end inherited packPrintPreview: TCheckBox Top = 74 Width = 128 ExplicitTop = 74 ExplicitWidth = 128 end inherited packlabNumber: TcxComboBox Style.Font.Charset = GB2312_CHARSET Style.IsFontAssigned = True ExplicitHeight = 25 end inherited packPrintAction: TcxComboBox ExplicitHeight = 31 end end end inherited weightRule: TcxComboBox ExplicitHeight = 34 end end object dxPanel1: TdxPanel Left = 0 Top = 0 Width = 775 Height = 50 Align = alTop TabOrder = 1 object cxButton1: TcxButton Left = 14 Top = 3 Width = 87 Height = 38 Caption = #30830#23450 TabOrder = 0 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentFont = False OnClick = cxButton1Click end object cxButton2: TcxButton Left = 107 Top = 3 Width = 83 Height = 38 Caption = #20851#38381 TabOrder = 1 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentFont = False OnClick = cxButton2Click end end object TouchKeyboard1: TTouchKeyboard Left = 504 Top = 135 Width = 200 Height = 218 Color = clBtnFace DrawingStyle = dsGradient GradientEnd = clSilver GradientStart = clGray Layout = 'NumPad' ParentColor = False end object cds_params: TClientDataSet Aggregates = <> Params = <> Left = 280 Top = 8 end end