📄 uedtres.dfm

📁 关于利用DELPHI来进行企业级方案解决的著作的附书源码
💻 DFM
字号:
object EdtRES: TEdtRES
  OldCreateOrder = False
  PageProducer = AdapterPageProducer
  Left = 454
  Top = 254
  Height = 150
  Width = 215
  object AdapterPageProducer: TAdapterPageProducer
    HTMLDoc.Strings = (
      '<html>'
      '<head>'
      '</head>'
      '<body>'
      '<#STYLES><#WARNINGS><#SERVERSCRIPT>'
      '</body>'
      '</html>')
    Left = 48
    Top = 8
    object AdapterForm1: TAdapterForm
      object LayoutGroup1: TLayoutGroup
        DisplayColumns = 1
        Custom = 'border="1"'
        object AdapterFieldGroup1: TAdapterFieldGroup
          Adapter = WDM.dsaBasicInfo
          object FldEMPID: TAdapterDisplayField
            Caption = #24037#21495':'
            DisplayWidth = 10
            FieldName = 'EMPID'
            ViewMode = vmDisplay
          end
          object FldNAME: TAdapterDisplayField
            Caption = #22995#21517':'
            DisplayWidth = 10
            FieldName = 'NAME'
            ViewMode = vmDisplay
          end
        end
        object AdapterFieldGroup2: TAdapterFieldGroup
          Adapter = WDM.dsaRES
          AdapterMode = 'Edit'
          object FldTIMEBEGIN: TAdapterDisplayField
            Caption = #36215#22987#26102#38388
            DisplayWidth = 18
            FieldName = 'TIMEBEGIN'
          end
          object FldTIMEEND: TAdapterDisplayField
            Caption = #25130#27490#26102#38388
            DisplayWidth = 18
            FieldName = 'TIMEEND'
          end
          object FldUNIT: TAdapterDisplayField
            Caption = #25152#22312#21333#20301
            DisplayWidth = 30
            FieldName = 'UNIT'
          end
          object FldDEP: TAdapterDisplayField
            Caption = #25152#22312#37096#38376
            DisplayWidth = 30
            FieldName = 'DEP'
          end
          object FldJOB: TAdapterDisplayField
            Caption = #32844#21153
            DisplayWidth = 30
            FieldName = 'JOB'
          end
          object FldRANK: TAdapterDisplayField
            Caption = #32423#21035
            DisplayWidth = 10
            FieldName = 'RANK'
          end
          object FldPOST: TAdapterDisplayField
            Caption = #23703#20301
            DisplayWidth = 30
            FieldName = 'POST'
          end
          object FldTYPEOFWORK: TAdapterDisplayField
            Caption = #24037#31181
            DisplayWidth = 20
            FieldName = 'TYPEOFWORK'
          end
        end
        object AdapterCommandGroup1: TAdapterCommandGroup
          DisplayComponent = AdapterFieldGroup2
          object CmdApply: TAdapterActionButton
            ActionName = 'Apply'
            Caption = #20445#23384
            PageName = 'BasicInfo'
          end
          object CmdCancel: TAdapterActionButton
            ActionName = 'Cancel'
            Caption = #21462#28040
            PageName = 'BasicInfo'
          end
        end
      end
    end
  end
end
⌨️ 快捷键说明

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