cbhc_unit.dfm

仿速达进销存系统,系统在单据打印上作了灵活的自定义.可供借鉴

object cbhc_form: Tcbhc_form
  Left = -3
  Top = 140
  Width = 812
  Height = 447
  BorderIcons = [biSystemMenu, biMaximize]
  Caption = #25104#26412#26680#31639
  Color = 13031127
  Ctl3D = False
  Font.Charset = GB2312_CHARSET
  Font.Color = clBlue
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Scaled = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 804
    Height = 413
    ActivePage = TabSheet1
    Align = alClient
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #25104#26412
      object GroupBox1: TGroupBox
        Left = 0
        Top = 0
        Width = 796
        Height = 45
        Align = alTop
        TabOrder = 0
        object Label1: TLabel
          Left = 10
          Top = 18
          Width = 60
          Height = 12
          Caption = #26680#31639#26102#38388#27573
        end
        object Label2: TLabel
          Left = 216
          Top = 18
          Width = 24
          Height = 12
          Caption = #20171#20110
        end
        object SpeedButton1: TSpeedButton
          Left = 395
          Top = 13
          Width = 80
          Height = 22
          Caption = #30830#23450
          Flat = True
          OnClick = SpeedButton1Click
        end
        object SpeedButton2: TSpeedButton
          Left = 479
          Top = 13
          Width = 80
          Height = 22
          Caption = #25171#21360#39044#35272
          Flat = True
          OnClick = SpeedButton2Click
        end
        object SpeedButton3: TSpeedButton
          Left = 647
          Top = 13
          Width = 80
          Height = 22
          Caption = #36864#20986
          Flat = True
          OnClick = SpeedButton3Click
        end
        object SpeedButton4: TSpeedButton
          Left = 563
          Top = 13
          Width = 80
          Height = 22
          Caption = #23548#20837#24211#23384#20449#24687
          Flat = True
          OnClick = SpeedButton4Click
        end
        object DateTimePicker1: TDateTimePicker
          Left = 71
          Top = 14
          Width = 140
          Height = 20
          Date = 37625.856613888900000000
          Time = 37625.856613888900000000
          TabOrder = 0
        end
        object DateTimePicker2: TDateTimePicker
          Left = 244
          Top = 14
          Width = 140
          Height = 20
          Date = 37625.856925347200000000
          Time = 37625.856925347200000000
          TabOrder = 1
        end
      end
      object GroupBox2: TGroupBox
        Left = 0
        Top = 45
        Width = 796
        Height = 34
        Align = alTop
        TabOrder = 1
        object RadioButton1: TRadioButton
          Left = 20
          Top = 12
          Width = 78
          Height = 17
          Caption = #36827#36135#25104#26412
          TabOrder = 0
          OnClick = RadioButton1Click
        end
        object RadioButton2: TRadioButton
          Left = 133
          Top = 12
          Width = 113
          Height = 17
          Caption = #38144#21806#25104#26412
          TabOrder = 1
          OnClick = RadioButton2Click
        end
        object RadioButton3: TRadioButton
          Left = 246
          Top = 12
          Width = 113
          Height = 17
          Caption = #36827#36135#36864#36135#25104#26412
          TabOrder = 2
          OnClick = RadioButton3Click
        end
        object RadioButton4: TRadioButton
          Left = 369
          Top = 12
          Width = 113
          Height = 17
          Caption = #23458#25143#36864#36135#25104#26412
          TabOrder = 3
          OnClick = RadioButton4Click
        end
        object RadioButton5: TRadioButton
          Left = 513
          Top = 12
          Width = 73
          Height = 17
          Caption = #24211#23384#25104#26412
          TabOrder = 4
          OnClick = RadioButton5Click
        end
      end
      object DBGrid1: TDBGrid
        Left = 0
        Top = 79
        Width = 796
        Height = 285
        Align = alClient
        BorderStyle = bsNone
        TabOrder = 2
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clBlue
        TitleFont.Height = -12
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
      end
      object StatusBar1: TStatusBar
        Left = 0
        Top = 364
        Width = 796
        Height = 22
        Panels = <
          item
            Alignment = taRightJustify
            Text = #35760#24405#24635#25968
            Width = 100
          end
          item
            Alignment = taRightJustify
            Width = 150
          end
          item
            Alignment = taRightJustify
            Text = #21830#21697#24635#25968#37327
            Width = 100
          end
          item
            Width = 150
          end
          item
            Alignment = taRightJustify
            Text = #21830#21697#24635#37329#39069
            Width = 100
          end
          item
            Width = 150
          end>
      end
      object Edit1: TEdit
        Left = 240
        Top = 112
        Width = 121
        Height = 18
        TabOrder = 4
        Visible = False
      end
      object Edit2: TEdit
        Left = 376
        Top = 112
        Width = 121
        Height = 18
        TabOrder = 5
        Visible = False
      end
      object Edit3: TEdit
        Left = 144
        Top = 168
        Width = 121
        Height = 18
        TabOrder = 6
        Visible = False
      end
      object Edit4: TEdit
        Left = 288
        Top = 176
        Width = 121
        Height = 18
        TabOrder = 7
        Visible = False
      end
      object Edit5: TEdit
        Left = 424
        Top = 176
        Width = 121
        Height = 18
        TabOrder = 8
        Visible = False
      end
    end
    object TabSheet2: TTabSheet
      Caption = #27611#21033#28070
      ImageIndex = 1
      object GroupBox3: TGroupBox
        Left = 0
        Top = 0
        Width = 796
        Height = 45
        Align = alTop
        TabOrder = 0
        object Label3: TLabel
          Left = 10
          Top = 18
          Width = 60
          Height = 12
          Caption = #26680#31639#26102#38388#27573
        end
        object Label4: TLabel
          Left = 216
          Top = 18
          Width = 24
          Height = 12
          Caption = #20171#20110
        end
        object SpeedButton5: TSpeedButton
          Left = 395
          Top = 13
          Width = 80
          Height = 22
          Caption = #30830#23450
          Flat = True
        end
        object SpeedButton6: TSpeedButton
          Left = 478
          Top = 13
          Width = 80
          Height = 22
          Caption = #23548#20837#25968#25454
          Flat = True
        end
        object SpeedButton7: TSpeedButton
          Left = 560
          Top = 13
          Width = 80
          Height = 22
          Caption = #25171#21360#39044#35272
          Flat = True
        end
        object SpeedButton8: TSpeedButton
          Left = 642
          Top = 13
          Width = 80
          Height = 22
          Caption = #36864#20986
          Flat = True
          OnClick = SpeedButton8Click
        end
        object DateTimePicker3: TDateTimePicker
          Left = 71
          Top = 14
          Width = 140
          Height = 20
          Date = 37625.856613888900000000
          Time = 37625.856613888900000000
          TabOrder = 0
        end
        object DateTimePicker4: TDateTimePicker
          Left = 244
          Top = 14
          Width = 140
          Height = 20
          Date = 37625.856925347200000000
          Time = 37625.856925347200000000
          TabOrder = 1
        end
      end
      object DBGrid2: TDBGrid
        Left = 0
        Top = 45
        Width = 796
        Height = 318
        Align = alClient
        BorderStyle = bsNone
        TabOrder = 1
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clBlue
        TitleFont.Height = -12
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
      end
      object StatusBar2: TStatusBar
        Left = 0
        Top = 363
        Width = 796
        Height = 23
        Panels = <
          item
            Alignment = taRightJustify
            Text = #27611#21033#28070#39069
            Width = 100
          end
          item
            Width = 50
          end>
      end
      object Edit6: TEdit
        Left = 344
        Top = 152
        Width = 121
        Height = 18
        TabOrder = 3
        Visible = False
      end
      object Edit7: TEdit
        Left = 496
        Top = 152
        Width = 121
        Height = 18
        TabOrder = 4
        Visible = False
      end
      object Edit8: TEdit
        Left = 400
        Top = 208
        Width = 121
        Height = 18
        TabOrder = 5
        Visible = False
      end
      object Edit9: TEdit
        Left = 112
        Top = 72
        Width = 121
        Height = 18
        TabOrder = 6
        Visible = False
      end
      object Edit10: TEdit
        Left = 264
        Top = 72
        Width = 121
        Height = 18
        TabOrder = 7
        Visible = False
      end
      object Edit11: TEdit
        Left = 112
        Top = 96
        Width = 121
        Height = 18
        TabOrder = 8
        Visible = False
      end
      object Edit12: TEdit
        Left = 264
        Top = 96
        Width = 121
        Height = 18
        TabOrder = 9
        Visible = False
      end
      object Edit13: TEdit
        Left = 104
        Top = 120
        Width = 121
        Height = 18
        TabOrder = 10
        Visible = False
      end
    end
  end
end