home *** CD-ROM | disk | FTP | other *** search
/ PC Format Collection 48 / SENT14D.ISO / tech / delphi / disk15 / experts.pak / DLG.DFM / DLG.txt
Encoding:
Text File  |  1995-08-24  |  4.5 KB  |  188 lines

  1. object DlgExpert: TDlgExpert
  2.   Left = 247
  3.   Top = 150
  4.   ActiveControl = NextButton
  5.   BorderStyle = bsDialog
  6.   Caption = 'Dialog Expert'
  7.   ClientHeight = 174
  8.   ClientWidth = 430
  9.   Font.Color = clBlack
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = [fsBold]
  13.   PixelsPerInch = 96
  14.   Position = poScreenCenter
  15.   OnCreate = FormCreate
  16.   OnDestroy = FormDestroy
  17.   TextHeight = 13
  18.   object Sample: TPaintBox
  19.     Left = 8
  20.     Top = 12
  21.     Width = 92
  22.     Height = 73
  23.     OnPaint = SamplePaint
  24.   end
  25.   object Notebook: TNotebook
  26.     Left = 112
  27.     Top = 8
  28.     Width = 309
  29.     Height = 121
  30.     TabOrder = 0
  31.     object TPage
  32.       Left = 0
  33.       Top = 0
  34.       Caption = 'Style'
  35.       object Label1: TLabel
  36.         Left = 20
  37.         Top = 8
  38.         Width = 109
  39.         Height = 13
  40.         AutoSize = False
  41.         Caption = 'Select dialog style:'
  42.       end
  43.       object rbSinglePage: TRadioButton
  44.         Left = 36
  45.         Top = 36
  46.         Width = 197
  47.         Height = 17
  48.         Caption = 'Single page dialog'
  49.         Checked = True
  50.         TabOrder = 0
  51.         TabStop = True
  52.         OnClick = StyleClick
  53.       end
  54.       object rbTabNot: TRadioButton
  55.         Left = 36
  56.         Top = 60
  57.         Width = 253
  58.         Height = 17
  59.         Caption = 'Multipage, using TabbedNotebook'
  60.         TabOrder = 1
  61.         OnClick = StyleClick
  62.       end
  63.       object rbTabs: TRadioButton
  64.         Left = 36
  65.         Top = 84
  66.         Width = 241
  67.         Height = 17
  68.         Caption = 'Multipage, using Tabs + Notebook'
  69.         TabOrder = 2
  70.         OnClick = StyleClick
  71.       end
  72.     end
  73.     object TPage
  74.       Left = 0
  75.       Top = 0
  76.       Caption = 'Pages'
  77.       object Label3: TLabel
  78.         Left = 20
  79.         Top = 12
  80.         Width = 254
  81.         Height = 13
  82.         AutoSize = False
  83.         Caption = 'Enter pages names for the mulit-page dialog:'
  84.         FocusControl = PageNames
  85.       end
  86.       object PageNames: TMemo
  87.         Left = 20
  88.         Top = 28
  89.         Width = 221
  90.         Height = 81
  91.         TabOrder = 0
  92.       end
  93.     end
  94.     object TPage
  95.       Left = 0
  96.       Top = 0
  97.       Caption = 'Buttons'
  98.       object Label2: TLabel
  99.         Left = 20
  100.         Top = 8
  101.         Width = 143
  102.         Height = 13
  103.         AutoSize = False
  104.         Caption = 'Select button placement:'
  105.       end
  106.       object rbBtnsV: TRadioButton
  107.         Left = 36
  108.         Top = 60
  109.         Width = 213
  110.         Height = 17
  111.         Caption = 'Vertical along right edge'
  112.         TabOrder = 0
  113.         OnClick = BtnClick
  114.       end
  115.       object rbBtnsH: TRadioButton
  116.         Left = 36
  117.         Top = 84
  118.         Width = 205
  119.         Height = 17
  120.         Caption = 'Horizontal along bottom'
  121.         TabOrder = 1
  122.         OnClick = BtnClick
  123.       end
  124.       object RadioButton1: TRadioButton
  125.         Left = 36
  126.         Top = 36
  127.         Width = 121
  128.         Height = 17
  129.         Caption = 'No buttons'
  130.         Checked = True
  131.         TabOrder = 2
  132.         TabStop = True
  133.         OnClick = BtnClick
  134.       end
  135.     end
  136.   end
  137.   object NextButton: TBitBtn
  138.     Left = 340
  139.     Top = 140
  140.     Width = 77
  141.     Height = 27
  142.     Caption = '&Next'
  143.     TabOrder = 1
  144.     OnClick = NextClick
  145.     Margin = 2
  146.     Spacing = -1
  147.   end
  148.   object PrevButton: TBitBtn
  149.     Left = 256
  150.     Top = 140
  151.     Width = 77
  152.     Height = 27
  153.     Caption = '&Prev'
  154.     Enabled = False
  155.     TabOrder = 2
  156.     OnClick = PrevClick
  157.     Glyph.Data = {
  158.       B6010000424DB601000000000000760000002800000028000000100000000100
  159.       0400000000004001000000000000000000001000000000000000000000000000
  160.       80000080000000808000800000008000800080800000C0C0C000808080000000
  161.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  162.       44777777777777777777FF7777777777777777746477777777777777777F7F77
  163.       7777777777777746647777777777777777F77F77777777777777746664777777
  164.       777777777F777F7777777777777746666477777777777777F7777F7777777777
  165.       77746666647777777777777F77777F77777777777746666664777777777777F7
  166.       77777F7777777777746666666477777777777F7777777F77777777777E666666
  167.       647777777777787777777F777777777777E66666647777777777778777777F77
  168.       77777777777E6666647777777777777877777F77777777777777E66664777777
  169.       7777777787777F777777777777777E66647777777777777778777F7777777777
  170.       777777E6647777777777777777877F77777777777777777E6477777777777777
  171.       77787F777777777777777777E677777777777777777787777777}
  172.     Margin = 2
  173.     NumGlyphs = 2
  174.     Spacing = -1
  175.   end
  176.   object BitBtn3: TBitBtn
  177.     Left = 8
  178.     Top = 140
  179.     Width = 77
  180.     Height = 27
  181.     TabOrder = 3
  182.     OnClick = CancelClick
  183.     Kind = bkCancel
  184.     Margin = 2
  185.     Spacing = -1
  186.   end
  187. end
  188.