unit6.dfm

来自「Delphi网络应用开发的源代码」· DFM 代码 · 共 76 行

DFM
76
字号
object EditData: TEditData
  OldCreateOrder = False
  PageProducer = AdapterPageProducer
  Left = 250
  Top = 173
  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 AdapterFieldGroup1: TAdapterFieldGroup
        Adapter = DataSetAdapter1
        AdapterMode = 'Edit'
        object Fldid: TAdapterDisplayField
          DisplayWidth = 10
          FieldName = 'id'
          ViewMode = vmInput
        end
        object FldProduct: TAdapterDisplayField
          DisplayWidth = 50
          FieldName = 'Product'
          ViewMode = vmInput
        end
        object FldPrice: TAdapterDisplayField
          DisplayWidth = 10
          FieldName = 'Price'
          ViewMode = vmInput
        end
        object FldMemo: TAdapterDisplayField
          DisplayWidth = 10
          FieldName = 'Memo'
          ViewMode = vmInput
        end
      end
      object AdapterCommandGroup1: TAdapterCommandGroup
        DisplayComponent = AdapterFieldGroup1
        object CmdApply: TAdapterActionButton
          ActionName = 'Apply'
          PageName = 'DataGrid'
          HideOptions = []
        end
      end
    end
  end
  object DataSetAdapter1: TDataSetAdapter
    DataSet = DataAdapterModule.Table1
    Left = 96
    Top = 72
    object TAdapterDefaultActions
    end
    object TAdapterDefaultFields
      object Adaptid: TDataSetAdapterField
        DataSetField = 'id'
      end
      object AdaptProduct: TDataSetAdapterField
        DataSetField = 'Product'
      end
      object AdaptPrice: TDataSetAdapterField
        DataSetField = 'Price'
      end
      object AdaptMemo: TDataSetAdapterMemoField
        DataSetField = 'Memo'
      end
    end
  end
end

⌨️ 快捷键说明

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