viewgoodspricefrm.~dfm

来自「群星医药系统源码」· ~DFM 代码 · 共 241 行

~DFM
241
字号
object FmViewGoodsPrice: TFmViewGoodsPrice
  Left = 418
  Top = 207
  BorderStyle = bsToolWindow
  Caption = #20215#26684#20449#24687
  ClientHeight = 293
  ClientWidth = 444
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poOwnerFormCenter
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object dbgGoodsPrices: TxDBGridEh
    Left = 0
    Top = 0
    Width = 444
    Height = 252
    Align = alClient
    AutoFitColWidths = True
    DataSource = dsGoodsPrices
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = GB2312_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -12
    FooterFont.Name = #23435#20307
    FooterFont.Style = []
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
    OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghRowHighlight]
    ReadOnly = True
    RowHeight = 16
    TabOrder = 0
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    TitleHeight = 15
    OnDblClick = dbgGoodsPricesDblClick
    RowColorsUse = True
    RowColor1 = 16772846
  end
  object RzPanel2: TRzPanel
    Left = 0
    Top = 252
    Width = 444
    Height = 41
    Align = alBottom
    BorderOuter = fsNone
    ParentColor = True
    TabOrder = 1
    object BtnOK: TRzBitBtn
      Left = 280
      Top = 8
      Default = True
      Caption = #30830#23450'(&O)'
      Color = 15791348
      HighlightColor = 16026986
      HotTrack = True
      HotTrackColor = 3983359
      ParentColor = False
      TabOrder = 0
      OnClick = BtnOKClick
      Glyph.Data = {
        36060000424D3606000000000000360400002800000020000000100000000100
        08000000000000020000630B0000630B00000001000000000000000000003300
        00006600000099000000CC000000FF0000000033000033330000663300009933
        0000CC330000FF33000000660000336600006666000099660000CC660000FF66
        000000990000339900006699000099990000CC990000FF99000000CC000033CC
        000066CC000099CC0000CCCC0000FFCC000000FF000033FF000066FF000099FF
        0000CCFF0000FFFF000000003300330033006600330099003300CC003300FF00
        330000333300333333006633330099333300CC333300FF333300006633003366
        33006666330099663300CC663300FF6633000099330033993300669933009999
        3300CC993300FF99330000CC330033CC330066CC330099CC3300CCCC3300FFCC
        330000FF330033FF330066FF330099FF3300CCFF3300FFFF3300000066003300
        66006600660099006600CC006600FF0066000033660033336600663366009933
        6600CC336600FF33660000666600336666006666660099666600CC666600FF66
        660000996600339966006699660099996600CC996600FF99660000CC660033CC
        660066CC660099CC6600CCCC6600FFCC660000FF660033FF660066FF660099FF
        6600CCFF6600FFFF660000009900330099006600990099009900CC009900FF00
        990000339900333399006633990099339900CC339900FF339900006699003366
        99006666990099669900CC669900FF6699000099990033999900669999009999
        9900CC999900FF99990000CC990033CC990066CC990099CC9900CCCC9900FFCC
        990000FF990033FF990066FF990099FF9900CCFF9900FFFF99000000CC003300
        CC006600CC009900CC00CC00CC00FF00CC000033CC003333CC006633CC009933
        CC00CC33CC00FF33CC000066CC003366CC006666CC009966CC00CC66CC00FF66
        CC000099CC003399CC006699CC009999CC00CC99CC00FF99CC0000CCCC0033CC
        CC0066CCCC0099CCCC00CCCCCC00FFCCCC0000FFCC0033FFCC0066FFCC0099FF
        CC00CCFFCC00FFFFCC000000FF003300FF006600FF009900FF00CC00FF00FF00
        FF000033FF003333FF006633FF009933FF00CC33FF00FF33FF000066FF003366
        FF006666FF009966FF00CC66FF00FF66FF000099FF003399FF006699FF009999
        FF00CC99FF00FF99FF0000CCFF0033CCFF0066CCFF0099CCFF00CCCCFF00FFCC
        FF0000FFFF0033FFFF0066FFFF0099FFFF00CCFFFF00FFFFFF00000080000080
        000000808000800000008000800080800000C0C0C00080808000191919004C4C
        4C00B2B2B200E5E5E500C8AC2800E0CC6600F2EABF00B59B2400D8E9EC009933
        6600D075A300ECC6D900646F710099A8AC00E2EFF10000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000E8E8E8E8E8E8
        E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
        E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8180C
        E8E8E8E8E8E8E8E8E8E8E8E8E8E8E2DFE8E8E8E8E8E8E8E8E8E8E8E8E8181212
        0CE8E8E8E8E8E8E8E8E8E8E8E8E28181DFE8E8E8E8E8E8E8E8E8E8E818121212
        120CE8E8E8E8E8E8E8E8E8E8E281818181DFE8E8E8E8E8E8E8E8E81812121212
        12120CE8E8E8E8E8E8E8E8E2818181818181DFE8E8E8E8E8E8E8E81812120C18
        1212120CE8E8E8E8E8E8E8E28181DFE2818181DFE8E8E8E8E8E8E818120CE8E8
        181212120CE8E8E8E8E8E8E281DFE8E8E2818181DFE8E8E8E8E8E8180CE8E8E8
        E8181212120CE8E8E8E8E8E2DFE8E8E8E8E2818181DFE8E8E8E8E8E8E8E8E8E8
        E8E8181212120CE8E8E8E8E8E8E8E8E8E8E8E2818181DFE8E8E8E8E8E8E8E8E8
        E8E8E8181212120CE8E8E8E8E8E8E8E8E8E8E8E2818181DFE8E8E8E8E8E8E8E8
        E8E8E8E81812120CE8E8E8E8E8E8E8E8E8E8E8E8E28181DFE8E8E8E8E8E8E8E8
        E8E8E8E8E818120CE8E8E8E8E8E8E8E8E8E8E8E8E8E281DFE8E8E8E8E8E8E8E8
        E8E8E8E8E8E8180CE8E8E8E8E8E8E8E8E8E8E8E8E8E8E2DFE8E8E8E8E8E8E8E8
        E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
        E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8}
      NumGlyphs = 2
    end
    object RzBitBtn2: TRzBitBtn
      Left = 360
      Top = 8
      Cancel = True
      ModalResult = 2
      Caption = #36864#20986'(&X)'
      Color = 15791348
      HighlightColor = 16026986
      HotTrack = True
      HotTrackColor = 3983359
      ParentColor = False
      TabOrder = 1
      Glyph.Data = {
        36060000424D3606000000000000360400002800000020000000100000000100
        08000000000000020000C40E0000C40E00000001000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        00000000000000000000000000000000000000000000000000000D0D0D0D0D00
        0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D040D0D0D0D0D0D0D0D0D0D0D0D0D0D0000
        0D0D0D0D0D0D0D0D0D0D0D0D0D0D04040D0D0D0D0D0D0D0D0D0D0D0D0D000300
        0D0D0D0D0D0D0D0D0D0D0D0D0D0407040D0D0D0D0D0D0D0D0D0D0D0D00030300
        0D0D0D0D0D0D0D0D0D0D0D0D040707040D0D0D0D0D0D0D0D0D0D000003030300
        000000000000000D0D0D040407070704040404040404040D0D0D0D0003030300
        0F0F000D0D0D0D0D0D0D0D04070707040808040D0D0D0D0D0D0D0D0003030000
        0F0F000D0D0D0D040D0D0D04070704040808040D0D0D0D070D0D0D0003030300
        0F0F000D0D0D04040D0D0D04070707040808040D0D0D07070D0D0D0003030300
        0F0F000D0D04040404040D04070707040808040D0D07070707070D0003030300
        0F0F000D0404040404040D04070707040808040D0707070707070D0003030300
        0F0F000D0D04040404040D04070707040808040D0D07070707070D000303000F
        0F0F000D0D0D04040D0D0D04070704080808040D0D0D07070D0D0D0003000F0F
        0F0F000D0D0D0D040D0D0D04070408080808040D0D0D0D070D0D0D00000F0F0F
        0F0F000D0D0D0D0D0D0D0D04040808080808040D0D0D0D0D0D0D0D0000000000
        0000000D0D0D0D0D0D0D0D04040404040404040D0D0D0D0D0D0D0D0D0D0D0D0D
        0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D}
      NumGlyphs = 2
    end
    object ckCustomPrice: TRzCheckBox
      Left = 4
      Top = 14
      Width = 97
      Height = 17
      Caption = #33258#23450#20215#26684'(&C)'#65306
      HotTrack = True
      State = cbUnchecked
      TabOrder = 2
      OnClick = ckCustomPriceClick
    end
    object edCustomPrice: TRzNumericEdit
      Left = 100
      Top = 12
      Width = 85
      Height = 20
      Text = '0'
      FrameVisible = True
      TabOrder = 3
      OnChange = edCustomPriceChange
      AllowBlank = True
      IntegersOnly = False
      DisplayFormat = ',0;-,0'
    end
  end
  object cdsGoodsPrices: TckClientDataSet
    Aggregates = <>
    FetchOnDemand = False
    Params = <
      item
        DataType = ftString
        Name = 'GoodsID'
        ParamType = ptInput
        Value = ' '
      end>
    ProviderName = 'dspCommon'
    RemoteServer = DCOMConn
    Left = 200
    Top = 100
  end
  object dsGoodsPrices: TDataSource
    DataSet = cdsGoodsPrices
    Left = 300
    Top = 100
  end
  object DCOMConn: TDCOMConnection
    ServerGUID = '{8D141DF9-E99C-4C06-876D-F18CBE11DB75}'
    ServerName = 'CommonSvr.CommonRDM'
    Left = 100
    Top = 100
  end
end

⌨️ 快捷键说明

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