NameValForm.dfm
上传用户:fh681027
上传日期:2022-07-23
资源大小:1959k
文件大小:1k
源码类别:

Delphi控件源码

开发平台:

Delphi

  1. object Form1: TForm1
  2.   Left = 192
  3.   Top = 107
  4.   Width = 696
  5.   Height = 480
  6.   Caption = 'NameValues'
  7.   Color = clBtnFace
  8.   Font.Charset = DEFAULT_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   OldCreateOrder = False
  14.   OnCreate = FormCreate
  15.   PixelsPerInch = 96
  16.   TextHeight = 13
  17.   object Label1: TLabel
  18.     Left = 40
  19.     Top = 8
  20.     Width = 76
  21.     Height = 13
  22.     HelpType = htKeyword
  23.     Caption = 'Value List Editor'
  24.   end
  25.   object Label2: TLabel
  26.     Left = 40
  27.     Top = 224
  28.     Width = 55
  29.     Height = 13
  30.     HelpType = htKeyword
  31.     Caption = 'Plain Memo'
  32.   end
  33.   object ValueListEditor1: TValueListEditor
  34.     Left = 40
  35.     Top = 32
  36.     Width = 561
  37.     Height = 169
  38.     Strings.Strings = (
  39.       'one=1'
  40.       'two=2'
  41.       'three=3')
  42.     TabOrder = 0
  43.     OnStringsChange = ValueListEditor1StringsChange
  44.     ColWidths = (
  45.       150
  46.       405)
  47.   end
  48.   object Memo1: TMemo
  49.     Left = 40
  50.     Top = 248
  51.     Width = 561
  52.     Height = 169
  53.     Lines.Strings = (
  54.       'Memo1')
  55.     TabOrder = 1
  56.   end
  57.   object btnUp: TButton
  58.     Left = 248
  59.     Top = 216
  60.     Width = 75
  61.     Height = 25
  62.     Caption = 'Copy Up'
  63.     TabOrder = 2
  64.     OnClick = btnUpClick
  65.   end
  66.   object btnDown: TButton
  67.     Left = 336
  68.     Top = 216
  69.     Width = 75
  70.     Height = 25
  71.     Caption = 'Copy Down'
  72.     TabOrder = 3
  73.     OnClick = btnDownClick
  74.   end
  75. end