⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 unit5.dfm

📁 Delphi网络应用开发的源代码
💻 DFM
字号:
object DataGrid: TDataGrid
  OldCreateOrder = False
  PageProducer = AdapterPageProducer
  Left = 254
  Top = 107
  Height = 150
  Width = 215
  object AdapterPageProducer: TAdapterPageProducer
    Styles.Strings = (
      'AdapterPageProducer'#30340'Styles'#23646#24615#20013#36755#20837#20197#19979'CSS'#21629#20196#65306
      '.id'
      ' {'
      '   WIDTH: 30;'
      ' }'
      '.Product'
      ' {'
      '   WIDTH: 50;'
      ' }'
      '.Price'
      ' {'
      '   WIDTH: 60;'
      ' }'
      '.Memo'
      ' {'
      '   WIDTH: 100;'
      ' }')
    HTMLDoc.Strings = (
      '<html>'
      '<head>'
      '</head>'
      '<body>'
      '<#STYLES><#WARNINGS><#SERVERSCRIPT>'
      '</body>'
      '</html>')
    Left = 48
    Top = 8
    object AdapterForm1: TAdapterForm
      object AdapterGrid1: TAdapterGrid
        Adapter = DSAdapterProduct
        AdapterMode = 'Browse'
        object Colid: TAdapterDisplayColumn
          FieldName = 'id'
          StyleRule = 'id'
        end
        object ColProduct: TAdapterDisplayColumn
          FieldName = 'Product'
          StyleRule = 'Product'
        end
        object ColPrice: TAdapterDisplayColumn
          FieldName = 'Price'
          StyleRule = 'Price'
        end
        object ColMemo: TAdapterDisplayColumn
          FieldName = 'Memo'
          StyleRule = 'Memo'
        end
        object AdapterCommandColumn1: TAdapterCommandColumn
          object CmdEditRow: TAdapterActionButton
            ActionName = 'EditRow'
            PageName = 'EditData'
            HideOptions = []
          end
        end
      end
    end
  end
  object DSAdapterProduct: TDataSetAdapter
    DataSet = DataAdapterModule.Table1
    Left = 64
    Top = 64
    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 + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -