glfycx.dfm

来自「应对服装行业的生产成本控制系统」· DFM 代码 · 共 711 行 · 第 1/2 页

DFM
711 行
字号
12
object Frmglfycx: TFrmglfycx
  Left = 80
  Top = -14
  Width = 1027
  Height = 743
  Align = alClient
  Caption = #12304#36153#29992#26597#35810#12305
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  WindowState = wsMaximized
  OnActivate = FormActivate
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object Pz: TPanel
    Left = 0
    Top = 0
    Width = 1019
    Height = 709
    Align = alClient
    Alignment = taRightJustify
    BevelInner = bvLowered
    BevelOuter = bvLowered
    BorderStyle = bsSingle
    Color = clSkyBlue
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    object help: TLabel
      Left = 2
      Top = 624
      Width = 1011
      Height = 25
      Align = alBottom
      AutoSize = False
      Color = clGradientActiveCaption
      Font.Charset = GB2312_CHARSET
      Font.Color = clWhite
      Font.Height = -16
      Font.Name = #26999#20307'_GB2312'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
      Layout = tlCenter
    end
    object Pd: TPanel
      Left = 2
      Top = 649
      Width = 1011
      Height = 54
      Align = alBottom
      BevelInner = bvLowered
      BorderStyle = bsSingle
      Color = clWhite
      TabOrder = 0
      object bprint: TBitBtn
        Left = 717
        Top = 9
        Width = 89
        Height = 33
        Caption = #25171'    '#21360
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnClick = bprintClick
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          04000000000080000000120B0000120B00001000000010000000000000000084
          840084848400C6C6C6000000FF0000FFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00333333333333
          3333330000000000033330313131313010330000000000000103013131355531
          0003031313122213010300000000000001100131313131301010300000000003
          0100330666666660301044446000002203033333066666663033444444000002
          2203333333066666633044444444000000003333333333333333}
      end
      object breturn: TBitBtn
        Left = 811
        Top = 9
        Width = 89
        Height = 33
        Caption = #36820'    '#22238
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = breturnClick
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          04000000000080000000120B0000120B00001000000010000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00DADADA0ADADA
          DADAADADA00DADADADADDADA0A007ADADADAADA0ADAD707DADADDAD0DADADA07
          DADAADAD0D007DA0ADADDADAD00A70DA0ADAADADAD0DAD0D0DADDADADADADAD0
          0ADAADADADADADA00DADDADADADAD70A0ADAADADADA707AD0DADDADA0007DAD0
          DADAADAD0DADA707ADADDADA0AD7077ADADAADAD00077DADADAD}
      end
      object Bquery: TBitBtn
        Left = 153
        Top = 9
        Width = 89
        Height = 33
        Caption = #26597'  '#35810
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = BqueryClick
        Glyph.Data = {
          66010000424D6601000000000000760000002800000014000000140000000100
          040000000000F0000000CE0E0000C40E00001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
          FFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFF000FFFFF000FF0000FFFF
          FFF080FFFFF080FF0000FFFFFFF0007FFF7000FF0000FFFFFFF00000000000FF
          0000FF0000008000080000FF0000FF0FFFF08000080000FF0000FF0F00F00000
          000000FF0000FF0FFFFF0000F0000FFF0000FF0CCCCCC00CCC00FFFF0000FFFC
          FFFFF00FFF00FFFF0000FFFCF00F00080F00FFFF0000FFFCFFFFFFFFFFCFFFFF
          0000FFFCCCCCCCCCCCCFFFFF0000FFFC8CC8CC8CC8CFFFFF0000FFFCCCCCCCCC
          CCCFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF
          FFFFFFFFFFFFFFFF0000}
      end
      object bprintc: TBitBtn
        Left = 623
        Top = 9
        Width = 89
        Height = 33
        Caption = 'EXCEL'#34920
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -9
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        OnClick = bprintcClick
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          04000000000080000000120B0000120B00001000000010000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00DADADADADADA
          DADAADADADAD00000000DADA4ADA0FFFFFF0ADAD44AD0F7777F04444444A0FFF
          FFF0ADAD44AD0F7777F0DADA4ADA0FFFFFF0ADADADAD0F7777F0DA00000A0FFF
          FFF0AD0FFF0D0000000000000F0ADADADADA0FFF0F0DADADADAD0F7F000ADADA
          DADA0F7F00ADADADADAD0FF00ADADADADADA0000ADADADADADAD}
      end
      object Bfbhz: TBitBtn
        Left = 341
        Top = 9
        Width = 89
        Height = 33
        Caption = #20998#37096#27719#24635
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        OnClick = BfbhzClick
        Glyph.Data = {
          66010000424D6601000000000000760000002800000014000000140000000100
          040000000000F0000000CE0E0000C40E00001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
          FFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFF000FFFFF000FF0000FFFF
          FFF080FFFFF080FF0000FFFFFFF0007FFF7000FF0000FFFFFFF00000000000FF
          0000FF0000008000080000FF0000FF0FFFF08000080000FF0000FF0F00F00000
          000000FF0000FF0FFFFF0000F0000FFF0000FF0CCCCCC00CCC00FFFF0000FFFC
          FFFFF00FFF00FFFF0000FFFCF00F00080F00FFFF0000FFFCFFFFFFFFFFCFFFFF
          0000FFFCCCCCCCCCCCCFFFFF0000FFFC8CC8CC8CC8CFFFFF0000FFFCCCCCCCCC
          CCCFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF
          FFFFFFFFFFFFFFFF0000}
      end
      object Bkshz: TBitBtn
        Left = 435
        Top = 9
        Width = 89
        Height = 33
        Caption = #31185#23460#27719#24635
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 5
        OnClick = BkshzClick
        Glyph.Data = {
          66010000424D6601000000000000760000002800000014000000140000000100
          040000000000F0000000CE0E0000C40E00001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
          FFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFF000FFFFF000FF0000FFFF
          FFF080FFFFF080FF0000FFFFFFF0007FFF7000FF0000FFFFFFF00000000000FF
          0000FF0000008000080000FF0000FF0FFFF08000080000FF0000FF0F00F00000
          000000FF0000FF0FFFFF0000F0000FFF0000FF0CCCCCC00CCC00FFFF0000FFFC
          FFFFF00FFF00FFFF0000FFFCF00F00080F00FFFF0000FFFCFFFFFFFFFFCFFFFF
          0000FFFCCCCCCCCCCCCFFFFF0000FFFC8CC8CC8CC8CFFFFF0000FFFCCCCCCCCC
          CCCFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF
          FFFFFFFFFFFFFFFF0000}
      end
      object Bkhhz: TBitBtn
        Left = 529
        Top = 9
        Width = 89
        Height = 33
        Caption = #25253#38144#20154#27719#24635
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 6
        OnClick = BkhhzClick
        Glyph.Data = {
          66010000424D6601000000000000760000002800000014000000140000000100
          040000000000F0000000CE0E0000C40E00001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
          FFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFF000FFFFF000FF0000FFFF
          FFF080FFFFF080FF0000FFFFFFF0007FFF7000FF0000FFFFFFF00000000000FF
          0000FF0000008000080000FF0000FF0FFFF08000080000FF0000FF0F00F00000
          000000FF0000FF0FFFFF0000F0000FFF0000FF0CCCCCC00CCC00FFFF0000FFFC
          FFFFF00FFF00FFFF0000FFFCF00F00080F00FFFF0000FFFCFFFFFFFFFFCFFFFF
          0000FFFCCCCCCCCCCCCFFFFF0000FFFC8CC8CC8CC8CFFFFF0000FFFCCCCCCCCC
          CCCFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF
          FFFFFFFFFFFFFFFF0000}
      end
      object Bddhhz: TBitBtn
        Left = 247
        Top = 9
        Width = 89
        Height = 33
        Caption = #35746#21333#27719#24635
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 7
        OnClick = BddhhzClick
        Glyph.Data = {
          66010000424D6601000000000000760000002800000014000000140000000100
          040000000000F0000000CE0E0000C40E00001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
          FFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFF000FFFFF000FF0000FFFF
          FFF080FFFFF080FF0000FFFFFFF0007FFF7000FF0000FFFFFFF00000000000FF
          0000FF0000008000080000FF0000FF0FFFF08000080000FF0000FF0F00F00000
          000000FF0000FF0FFFFF0000F0000FFF0000FF0CCCCCC00CCC00FFFF0000FFFC
          FFFFF00FFF00FFFF0000FFFCF00F00080F00FFFF0000FFFCFFFFFFFFFFCFFFFF
          0000FFFCCCCCCCCCCCCFFFFF0000FFFC8CC8CC8CC8CFFFFF0000FFFCCCCCCCCC
          CCCFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF
          FFFFFFFFFFFFFFFF0000}
      end
    end
    object GroupBox4: TGroupBox
      Left = 0
      Top = 72
      Width = 1013
      Height = 552
      Caption = #36153#29992#35760#24405
      Color = clSkyBlue
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
      TabOrder = 1
      object DBGrid1: TDBGrid
        Left = 2
        Top = 15
        Width = 1009
        Height = 535
        Align = alClient
        Color = clWhite
        DataSource = DataModule1.DataSource26
        FixedColor = clWhite
        Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clBlue
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnKeyPress = DBGrid1KeyPress
        OnTitleClick = DBGrid1TitleClick
        Columns = <
          item
            Expanded = False
            FieldName = 'fyh'
            Title.Alignment = taCenter
            Title.Caption = #32534#21495
            Title.Color = clMoneyGreen
            Width = 92
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ddh'
            Title.Alignment = taCenter
            Title.Caption = #35746#21333#21495
            Title.Color = clMoneyGreen
            Width = 80
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'fb'
            Title.Alignment = taCenter
            Title.Caption = #20998#37096
            Title.Color = clMoneyGreen
            Width = 72
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'fz'
            Title.Alignment = taCenter
            Title.Caption = #20998#32452
            Title.Color = clMoneyGreen
            Width = 65
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'bxr'
            Title.Alignment = taCenter
            Title.Caption = #25253#38144#20154
12

glfycx.dfm - 源码说明

本页面展示了「应对服装行业的生产成本控制系统」中的 glfycx.dfm 源码文件，采用 DFM 编程语言编写，共 711 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与服装相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?