📄 unit8.dfm

📁 Delphi网络应用开发的源代码

💻 DFM

字号:

object MyAdapter: TMyAdapter
  OldCreateOrder = False
  PageProducer = AdapterPageProducer
  Left = 254
  Top = 107
  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 AdapterGrid1: TAdapterGrid
        Adapter = Adapter1
        object ColInfoName: TAdapterDisplayColumn
          FieldName = 'InfoName'
        end
        object ColInfoValue: TAdapterDisplayColumn
          FieldName = 'InfoValue'
        end
      end
    end
  end
  object Adapter1: TAdapter
    OnIterateRecords = Adapter1IterateRecords
    Left = 32
    Top = 72
    object TAdapterActions
    end
    object TAdapterFields
      object InfoName: TAdapterField
        OnGetValue = InfoNameGetValue
      end
      object InfoValue: TAdapterField
        OnGetValue = InfoValueGetValue
      end
    end
  end
  object svUserInfo: TStringsValuesList
    Strings.Strings = (
      'name='#26417#20896#23431
      'Address=HUST_D11_311'
      'Phone=87549482')
    Left = 120
    Top = 67
    object TAdapterDefaultActions
    end
    object TAdapterDefaultFields
      object AdaptNameField: TValuesListNameField
      end
      object AdaptValueField: TValuesListValueField
      end
    end
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -