home *** CD-ROM | disk | FTP | other *** search
/ Delphi Anthology / aDELPHI.iso / Runimage / Delphi50 / Lib / pendlg.dfm / pendlg.txt
Text File  |  1999-08-11  |  2KB  |  120 lines

  1. object PenDialog: TPenDialog
  2.   Left = 247
  3.   Top = 149
  4.   ActiveControl = CBVisible
  5.   BorderIcons = [biSystemMenu]
  6.   BorderStyle = bsDialog
  7.   Caption = 'Border Color Editor'
  8.   ClientHeight = 191
  9.   ClientWidth = 213
  10.   ParentFont = True
  11.   Position = poScreenCenter
  12.   OnClose = FormClose
  13.   OnCreate = FormCreate
  14.   OnShow = FormShow
  15.   PixelsPerInch = 96
  16.   TextHeight = 13
  17.   object LWidth: TLabel
  18.     Left = 87
  19.     Top = 9
  20.     Width = 66
  21.     Height = 13
  22.     Alignment = taRightJustify
  23.     AutoSize = False
  24.     Caption = '&Width:'
  25.     FocusControl = SEWidth
  26.   end
  27.   object CBVisible: TCheckBox
  28.     Left = 14
  29.     Top = 8
  30.     Width = 64
  31.     Height = 17
  32.     HelpContext = 680
  33.     Caption = '&Visible'
  34.     TabOrder = 0
  35.     OnClick = CBVisibleClick
  36.   end
  37.   object SEWidth: TEdit
  38.     Left = 157
  39.     Top = 5
  40.     Width = 33
  41.     Height = 21
  42.     HelpContext = 690
  43.     TabOrder = 1
  44.     Text = '1'
  45.     OnChange = SEWidthChange
  46.   end
  47.   object RGStyle: TRadioGroup
  48.     Left = 5
  49.     Top = 32
  50.     Width = 100
  51.     Height = 153
  52.     HelpContext = 445
  53.     Caption = '&Style:'
  54.     Items.Strings = (
  55.       'Solid'
  56.       'Dash'
  57.       'Dot'
  58.       'Dash Dot'
  59.       'Dash Dot Dot')
  60.     TabOrder = 2
  61.     OnClick = RGStyleClick
  62.   end
  63.   object Button1: TButton
  64.     Left = 122
  65.     Top = 128
  66.     Width = 75
  67.     Height = 25
  68.     Caption = 'OK'
  69.     Default = True
  70.     ModalResult = 1
  71.     TabOrder = 3
  72.   end
  73.   object GroupBox1: TGroupBox
  74.     Left = 112
  75.     Top = 32
  76.     Width = 94
  77.     Height = 73
  78.     TabOrder = 4
  79.     object SHColor: TShape
  80.       Left = 33
  81.       Top = 45
  82.       Width = 26
  83.       Height = 22
  84.       OnMouseUp = SHColorMouseUp
  85.     end
  86.     object BColor: TButton
  87.       Left = 9
  88.       Top = 13
  89.       Width = 75
  90.       Height = 25
  91.       HelpContext = 161
  92.       Caption = '&Color...'
  93.       TabOrder = 0
  94.       OnClick = BColorClick
  95.     end
  96.   end
  97.   object Button3: TButton
  98.     Left = 122
  99.     Top = 159
  100.     Width = 75
  101.     Height = 25
  102.     Cancel = True
  103.     Caption = 'Cancel'
  104.     ModalResult = 2
  105.     TabOrder = 5
  106.     OnClick = Button3Click
  107.   end
  108.   object UDWidth: TUpDown
  109.     Left = 190
  110.     Top = 5
  111.     Width = 15
  112.     Height = 21
  113.     Associate = SEWidth
  114.     Min = 1
  115.     Position = 1
  116.     TabOrder = 6
  117.     Wrap = False
  118.   end
  119. end
  120.