home *** CD-ROM | disk | FTP | other *** search
/ PC World 2003 February / PCWorld_2003-02_cd.bin / Software / Topware / devpascal / devpas.exe / 0 / RCDATA / TMESSAGEBOXFORM / TMESSAGEBOXFORM.txt < prev   
Text File  |  2002-07-15  |  11KB  |  409 lines
  1. object MessageBoxForm: TMessageBoxForm
  2.   Left = 152
  3.   Top = 64
  4.   BorderIcons = [biSystemMenu]
  5.   BorderStyle = bsSingle
  6.   Caption = 'MessageBox Editor'
  7.   ClientHeight = 375
  8.   ClientWidth = 578
  9.   Color = clBtnFace
  10.   Font.Charset = DEFAULT_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -11
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Style = []
  15.   Icon.Data = {<image000.ico>}
  16.   OldCreateOrder = True
  17.   Position = poScreenCenter
  18.   OnCreate = FormCreate
  19.   PixelsPerInch = 96
  20.   TextHeight = 13
  21.   object Label1: TLabel
  22.     Left = 8
  23.     Top = 8
  24.     Width = 56
  25.     Height = 13
  26.     Caption = 'Dialog &Title:'
  27.     FocusControl = Title
  28.     Font.Charset = DEFAULT_CHARSET
  29.     Font.Color = 6684774
  30.     Font.Height = -11
  31.     Font.Name = 'MS Sans Serif'
  32.     Font.Style = []
  33.     ParentFont = False
  34.   end
  35.   object Label2: TLabel
  36.     Left = 8
  37.     Top = 56
  38.     Width = 57
  39.     Height = 13
  40.     Caption = 'Dialog &Text:'
  41.     FocusControl = TextMemo
  42.     Font.Charset = DEFAULT_CHARSET
  43.     Font.Color = 6684774
  44.     Font.Height = -11
  45.     Font.Name = 'MS Sans Serif'
  46.     Font.Style = []
  47.     ParentFont = False
  48.   end
  49.   object Bevel1: TBevel
  50.     Left = 8
  51.     Top = 326
  52.     Width = 561
  53.     Height = 3
  54.     Shape = bsBottomLine
  55.   end
  56.   object Title: TEdit
  57.     Left = 8
  58.     Top = 24
  59.     Width = 233
  60.     Height = 21
  61.     Font.Charset = DEFAULT_CHARSET
  62.     Font.Color = 21760
  63.     Font.Height = -11
  64.     Font.Name = 'MS Sans Serif'
  65.     Font.Style = []
  66.     ParentFont = False
  67.     TabOrder = 0
  68.   end
  69.   object TextMemo: TMemo
  70.     Left = 8
  71.     Top = 72
  72.     Width = 233
  73.     Height = 241
  74.     ScrollBars = ssBoth
  75.     TabOrder = 1
  76.   end
  77.   object GroupBox1: TGroupBox
  78.     Left = 256
  79.     Top = 8
  80.     Width = 161
  81.     Height = 113
  82.     Caption = 'Dialog Buttons'
  83.     TabOrder = 2
  84.     object Label4: TLabel
  85.       Left = 8
  86.       Top = 16
  87.       Width = 39
  88.       Height = 13
  89.       Caption = '&Buttons:'
  90.       FocusControl = DialogButtons
  91.       Font.Charset = DEFAULT_CHARSET
  92.       Font.Color = 6684774
  93.       Font.Height = -11
  94.       Font.Name = 'MS Sans Serif'
  95.       Font.Style = []
  96.       ParentFont = False
  97.     end
  98.     object Label5: TLabel
  99.       Left = 8
  100.       Top = 64
  101.       Width = 71
  102.       Height = 13
  103.       Caption = '&Default Button:'
  104.       FocusControl = DefButton
  105.       Font.Charset = DEFAULT_CHARSET
  106.       Font.Color = 6684774
  107.       Font.Height = -11
  108.       Font.Name = 'MS Sans Serif'
  109.       Font.Style = []
  110.       ParentFont = False
  111.     end
  112.     object DialogButtons: TComboBox
  113.       Left = 8
  114.       Top = 32
  115.       Width = 145
  116.       Height = 21
  117.       Style = csDropDownList
  118.       Font.Charset = DEFAULT_CHARSET
  119.       Font.Color = clMaroon
  120.       Font.Height = -11
  121.       Font.Name = 'MS Sans Serif'
  122.       Font.Style = []
  123.       ItemHeight = 13
  124.       ParentFont = False
  125.       TabOrder = 0
  126.       Items.Strings = (
  127.         'OK'
  128.         'OK, Cancel'
  129.         'Yes, No'
  130.         'Yes, No, Cancel'
  131.         'Retry, Cancel'
  132.         'Abort, Retry, Ignore')
  133.     end
  134.     object DefButton: TComboBox
  135.       Left = 8
  136.       Top = 80
  137.       Width = 145
  138.       Height = 21
  139.       Style = csDropDownList
  140.       ItemHeight = 13
  141.       TabOrder = 1
  142.       Items.Strings = (
  143.         'Button 1'
  144.         'Button 2'
  145.         'Button 3'
  146.         'Button 4')
  147.     end
  148.   end
  149.   object GroupBox2: TGroupBox
  150.     Left = 256
  151.     Top = 128
  152.     Width = 161
  153.     Height = 129
  154.     Caption = 'Dialog Icon'
  155.     TabOrder = 3
  156.     object Panel1: TPanel
  157.       Left = 44
  158.       Top = 24
  159.       Width = 73
  160.       Height = 57
  161.       BevelOuter = bvLowered
  162.       TabOrder = 0
  163.       object Image1: TImage
  164.         Left = 1
  165.         Top = 1
  166.         Width = 71
  167.         Height = 55
  168.         Align = alClient
  169.         Center = True
  170.       end
  171.     end
  172.     object DialogIcon: TComboBox
  173.       Left = 8
  174.       Top = 96
  175.       Width = 145
  176.       Height = 21
  177.       Style = csDropDownList
  178.       Font.Charset = DEFAULT_CHARSET
  179.       Font.Color = clMaroon
  180.       Font.Height = -11
  181.       Font.Name = 'MS Sans Serif'
  182.       Font.Style = []
  183.       ItemHeight = 13
  184.       ParentFont = False
  185.       TabOrder = 1
  186.       OnChange = DialogIconChange
  187.       Items.Strings = (
  188.         'None'
  189.         'Warning'
  190.         'Information'
  191.         'Question'
  192.         'Stop')
  193.     end
  194.   end
  195.   object DialogType: TRadioGroup
  196.     Left = 256
  197.     Top = 264
  198.     Width = 161
  199.     Height = 49
  200.     Caption = 'Modal Type'
  201.     ItemIndex = 0
  202.     Items.Strings = (
  203.       '&Application Modal'
  204.       '&System Modal')
  205.     TabOrder = 4
  206.   end
  207.   object OK: TBitBtn
  208.     Left = 264
  209.     Top = 336
  210.     Width = 97
  211.     Height = 33
  212.     Caption = '&OK'
  213.     ModalResult = 1
  214.     TabOrder = 7
  215.     Glyph.Data = {
  216.       DE010000424DDE01000000000000760000002800000024000000120000000100
  217.       0400000000006801000000000000000000001000000000000000000000000000
  218.       80000080000000808000800000008000800080800000C0C0C000808080000000
  219.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  220.       3333333333333333333333330000333333333333333333333333F33333333333
  221.       00003333344333333333333333388F3333333333000033334224333333333333
  222.       338338F3333333330000333422224333333333333833338F3333333300003342
  223.       222224333333333383333338F3333333000034222A22224333333338F338F333
  224.       8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
  225.       33333338F83338F338F33333000033A33333A222433333338333338F338F3333
  226.       0000333333333A222433333333333338F338F33300003333333333A222433333
  227.       333333338F338F33000033333333333A222433333333333338F338F300003333
  228.       33333333A222433333333333338F338F00003333333333333A22433333333333
  229.       3338F38F000033333333333333A223333333333333338F830000333333333333
  230.       333A333333333333333338330000333333333333333333333333333333333333
  231.       0000}
  232.     NumGlyphs = 2
  233.   end
  234.   object Cancel: TBitBtn
  235.     Left = 368
  236.     Top = 336
  237.     Width = 97
  238.     Height = 33
  239.     Caption = '&Cancel'
  240.     TabOrder = 8
  241.     Kind = bkCancel
  242.   end
  243.   object Preview: TBitBtn
  244.     Left = 472
  245.     Top = 336
  246.     Width = 97
  247.     Height = 33
  248.     Caption = '&Preview'
  249.     TabOrder = 9
  250.     OnClick = PreviewClick
  251.     Glyph.Data = {
  252.       76010000424D7601000000000000760000002800000020000000100000000100
  253.       04000000000000010000120B0000120B00001000000000000000000000000000
  254.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  255.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  256.       333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
  257.       333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
  258.       C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
  259.       F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
  260.       F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
  261.       00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
  262.       3333333373FF7333333333333000333333333333377733333333333333333333
  263.       3333333333333333333333333333333333333333333333333333}
  264.     NumGlyphs = 2
  265.   end
  266.   object AdvGroup: TGroupBox
  267.     Left = 428
  268.     Top = 32
  269.     Width = 141
  270.     Height = 281
  271.     Caption = 'Advanced'
  272.     Enabled = False
  273.     Font.Charset = DEFAULT_CHARSET
  274.     Font.Color = clGray
  275.     Font.Height = -11
  276.     Font.Name = 'MS Sans Serif'
  277.     Font.Style = []
  278.     ParentFont = False
  279.     ParentShowHint = False
  280.     ShowHint = True
  281.     TabOrder = 6
  282.     object Label3: TLabel
  283.       Left = 8
  284.       Top = 261
  285.       Width = 114
  286.       Height = 13
  287.       Caption = '* = Windows 95/98 only'
  288.       Font.Charset = DEFAULT_CHARSET
  289.       Font.Color = clRed
  290.       Font.Height = -11
  291.       Font.Name = 'MS Sans Serif'
  292.       Font.Style = []
  293.       ParentFont = False
  294.     end
  295.     object HelpButton: TCheckBox
  296.       Left = 8
  297.       Top = 104
  298.       Width = 129
  299.       Height = 17
  300.       Hint = 
  301.         'Turn on this option will add a button with'#13#10'the text "Help" to t' +
  302.         'he message box.'
  303.       Caption = 'Add &Help Button*'
  304.       TabOrder = 1
  305.     end
  306.     object RJText: TCheckBox
  307.       Left = 8
  308.       Top = 122
  309.       Width = 129
  310.       Height = 17
  311.       Hint = 'All text in the message box is right-justified.'
  312.       Caption = '&Right-Justified Text*'
  313.       TabOrder = 2
  314.     end
  315.     object RTLRead: TCheckBox
  316.       Left = 8
  317.       Top = 140
  318.       Width = 129
  319.       Height = 17
  320.       Hint = 
  321.         'Displays message and caption text using right-to-left'#13#10'reading o' +
  322.         'rder on Hebrew and Arabic systems.'
  323.       Caption = 'Right-&To-Left Reading*'
  324.       TabOrder = 3
  325.     end
  326.     object Forground: TCheckBox
  327.       Left = 8
  328.       Top = 167
  329.       Width = 129
  330.       Height = 17
  331.       Hint = 'The message box becomes the foreground window.'
  332.       Caption = 'Display As &Foreground'
  333.       TabOrder = 4
  334.     end
  335.     object Panel2: TPanel
  336.       Left = 8
  337.       Top = 16
  338.       Width = 126
  339.       Height = 83
  340.       BevelOuter = bvLowered
  341.       Color = 14811135
  342.       TabOrder = 0
  343.       object Label6: TLabel
  344.         Left = 2
  345.         Top = 2
  346.         Width = 123
  347.         Height = 79
  348.         AutoSize = False
  349.         Caption = 
  350.           'If you want more information about an option, just move your mou' +
  351.           'se over that checkbox and you will get information about it!'
  352.         WordWrap = True
  353.       end
  354.     end
  355.     object TaskModal: TCheckBox
  356.       Left = 8
  357.       Top = 184
  358.       Width = 129
  359.       Height = 17
  360.       Hint = 
  361.         'Same as an System Modal message box except that all'#13#10'the top-lev' +
  362.         'el windows belonging to the current task are'#13#10'disabled if the hW' +
  363.         'nd parameter is NULL. Use this flag'#13#10'when the calling applicatio' +
  364.         'n or library does not have a'#13#10'window handle available but still ' +
  365.         'needs to prevent input'#13#10'to other windows in the current applicat' +
  366.         'ion without'#13#10'suspending other applications.'
  367.       Caption = '&Task Modal'
  368.       TabOrder = 5
  369.     end
  370.   end
  371.   object CheckBox1: TCheckBox
  372.     Left = 428
  373.     Top = 8
  374.     Width = 133
  375.     Height = 17
  376.     Caption = 'Use &Advanced Options'
  377.     Font.Charset = DEFAULT_CHARSET
  378.     Font.Color = clBlue
  379.     Font.Height = -11
  380.     Font.Name = 'MS Sans Serif'
  381.     Font.Style = []
  382.     ParentFont = False
  383.     TabOrder = 5
  384.     OnClick = CheckBox1Click
  385.   end
  386.   object MarsCaption1: TMarsCaption
  387.     ActiveBeginColor = clBlack
  388.     ActiveEndColor = clYellow
  389.     ActiveFontColor = clWhite
  390.     InactiveBeginColor = clBlack
  391.     InactiveEndColor = clSilver
  392.     InactiveFontColor = clSilver
  393.     ApplicationNameFont.Charset = DEFAULT_CHARSET
  394.     ApplicationNameFont.Color = clWindowText
  395.     ApplicationNameFont.Height = -11
  396.     ApplicationNameFont.Name = 'MS Sans Serif'
  397.     ApplicationNameFont.Style = [fsBold]
  398.     CaptionFont.Charset = DEFAULT_CHARSET
  399.     CaptionFont.Color = clWindowText
  400.     CaptionFont.Height = -11
  401.     CaptionFont.Name = 'MS Sans Serif'
  402.     CaptionFont.Style = []
  403.     NumColors = 64
  404.     AutoSize = False
  405.     Left = 104
  406.     Top = 152
  407.   end
  408. end
  409.