home *** CD-ROM | disk | FTP | other *** search
/ Needle Craft Plus / NeedleCraftPlusVolume1.iso / win / dotmat / dotmat2a.exe / dotmat.exe / 0 / RCDATA / TCUSTCLRDLG / TCUSTCLRDLG.txt < prev   
Text File  |  1996-05-03  |  3KB  |  148 lines
  1. object CustClrDlg: TCustClrDlg
  2.   Left = 243
  3.   Top = 135
  4.   ActiveControl = DrawGrid2
  5.   BorderStyle = bsDialog
  6.   Caption = 'Custom Colors'
  7.   ClientHeight = 271
  8.   ClientWidth = 376
  9.   Font.Color = clBlack
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = [fsBold]
  13.   Icon.Data = {<image000.ico>}
  14.   Position = poScreenCenter
  15.   OnActivate = FormActivate
  16.   OnCreate = FormCreate
  17.   OnDestroy = FormDestroy
  18.   PixelsPerInch = 96
  19.   TextHeight = 13
  20.   object Panel1: TPanel
  21.     Left = 0
  22.     Top = 0
  23.     Width = 376
  24.     Height = 271
  25.     Align = alClient
  26.     BevelOuter = bvNone
  27.     ParentShowHint = False
  28.     ShowHint = True
  29.     TabOrder = 0
  30.     object Panel2: TPanel
  31.       Left = 7
  32.       Top = 7
  33.       Width = 180
  34.       Height = 21
  35.       Hint = '|Selected floss DMC color name'
  36.       BevelOuter = bvLowered
  37.       TabOrder = 0
  38.     end
  39.     object Panel3: TPanel
  40.       Left = 190
  41.       Top = 7
  42.       Width = 180
  43.       Height = 21
  44.       Hint = '|Selected DMC color name'
  45.       BevelOuter = bvLowered
  46.       TabOrder = 1
  47.     end
  48.     object DrawGrid2: TDrawGrid
  49.       Left = 190
  50.       Top = 32
  51.       Width = 180
  52.       Height = 212
  53.       Hint = '|Floss that are going to be tweeded'
  54.       ColCount = 8
  55.       DefaultColWidth = 15
  56.       DefaultRowHeight = 15
  57.       FixedCols = 0
  58.       FixedRows = 0
  59.       Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goThumbTracking]
  60.       TabOrder = 2
  61.       OnClick = DrawGrid2Click
  62.       OnDblClick = DrawGrid2DblClick
  63.       OnDrawCell = DrawGrid2DrawCell
  64.     end
  65.     object DrawGrid1: TDrawGrid
  66.       Left = 7
  67.       Top = 32
  68.       Width = 180
  69.       Height = 212
  70.       Hint = '|Pure floss available for tweeding'
  71.       ColCount = 8
  72.       DefaultColWidth = 15
  73.       DefaultRowHeight = 15
  74.       FixedCols = 0
  75.       FixedRows = 0
  76.       Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goThumbTracking]
  77.       TabOrder = 3
  78.       OnClick = DrawGrid1Click
  79.       OnDblClick = DrawGrid1DblClick
  80.       OnDrawCell = DrawGrid1DrawCell
  81.     end
  82.     object reset: TButton
  83.       Left = 7
  84.       Top = 247
  85.       Width = 58
  86.       Height = 22
  87.       Hint = '|Empty the right list box '
  88.       Caption = '&Reset'
  89.       TabOrder = 4
  90.       OnClick = resetClick
  91.     end
  92.     object addall: TButton
  93.       Left = 69
  94.       Top = 247
  95.       Width = 58
  96.       Height = 22
  97.       Hint = '|Add every pure floss from right to left'
  98.       Caption = '&Add All'
  99.       TabOrder = 5
  100.       OnClick = addallClick
  101.     end
  102.     object tweed: TButton
  103.       Left = 130
  104.       Top = 247
  105.       Width = 58
  106.       Height = 22
  107.       Hint = '|Create colors by tweeding pure floss in the right listbox'
  108.       Caption = '&Tweed'
  109.       Default = True
  110.       Enabled = False
  111.       TabOrder = 6
  112.       OnClick = tweedClick
  113.     end
  114.     object Button1: TButton
  115.       Left = 315
  116.       Top = 248
  117.       Width = 58
  118.       Height = 20
  119.       Caption = '&Ok'
  120.       Default = True
  121.       ModalResult = 1
  122.       TabOrder = 7
  123.     end
  124.     object Button2: TButton
  125.       Left = 253
  126.       Top = 248
  127.       Width = 58
  128.       Height = 20
  129.       Cancel = True
  130.       Caption = '&Cancel'
  131.       ModalResult = 2
  132.       TabOrder = 8
  133.     end
  134.     object HelpButton: TButton
  135.       Left = 192
  136.       Top = 247
  137.       Width = 58
  138.       Height = 22
  139.       Hint = '|Create colors by tweeding pure floss in the right listbox'
  140.       Caption = '&Help'
  141.       Default = True
  142.       Enabled = False
  143.       TabOrder = 9
  144.       OnClick = HelpButtonClick
  145.     end
  146.   end
  147. end
  148.