home *** CD-ROM | disk | FTP | other *** search
/ .net - The Best of 1999/2000 / netCD Special01.iso / pc / Software / We-Blocker / weblock.exe / WebSafe.exe / 0 / RCDATA / TUSEREDITFORM / TUSEREDITFORM.txt < prev   
Encoding:
Text File  |  2000-06-22  |  10.6 KB  |  406 lines
  1. object UserEditForm: TUserEditForm
  2.   Left = 363
  3.   Top = 114
  4.   BorderIcons = []
  5.   BorderStyle = bsDialog
  6.   Caption = 'Edit User Information'
  7.   ClientHeight = 402
  8.   ClientWidth = 401
  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.   OnShow = FormShow
  19.   PixelsPerInch = 96
  20.   TextHeight = 13
  21.   object Panel1: TPanel
  22.     Left = 0
  23.     Top = 360
  24.     Width = 401
  25.     Height = 42
  26.     Align = alBottom
  27.     BevelOuter = bvNone
  28.     TabOrder = 0
  29.     object SaveButton: TBitBtn
  30.       Left = 304
  31.       Top = 6
  32.       Width = 85
  33.       Height = 31
  34.       Caption = '&Save'
  35.       Default = True
  36.       Font.Charset = DEFAULT_CHARSET
  37.       Font.Color = clWindowText
  38.       Font.Height = -11
  39.       Font.Name = 'MS Sans Serif'
  40.       Font.Style = []
  41.       ParentFont = False
  42.       TabOrder = 0
  43.       OnClick = SaveButtonClick
  44.       NumGlyphs = 2
  45.     end
  46.     object BitBtn2: TBitBtn
  47.       Left = 208
  48.       Top = 6
  49.       Width = 85
  50.       Height = 31
  51.       Caption = '&Cancel'
  52.       Font.Charset = DEFAULT_CHARSET
  53.       Font.Color = clWindowText
  54.       Font.Height = -11
  55.       Font.Name = 'MS Sans Serif'
  56.       Font.Style = []
  57.       ParentFont = False
  58.       TabOrder = 1
  59.       OnClick = BitBtn2Click
  60.       NumGlyphs = 2
  61.     end
  62.   end
  63.   object PageControl1: TPageControl
  64.     Left = 8
  65.     Top = 8
  66.     Width = 385
  67.     Height = 347
  68.     ActivePage = tabsheetEditUser
  69.     TabOrder = 1
  70.     object tabsheetEditUser: TTabSheet
  71.       Caption = 'Edit User'
  72.       object lblParentChange: TLabel
  73.         Left = 22
  74.         Top = 296
  75.         Width = 325
  76.         Height = 13
  77.         Caption = 
  78.           'You will need to log out and log back in for changes to go into ' +
  79.           'effect.'
  80.         Font.Charset = DEFAULT_CHARSET
  81.         Font.Color = clWindowText
  82.         Font.Height = -11
  83.         Font.Name = 'MS Sans Serif'
  84.         Font.Style = []
  85.         ParentFont = False
  86.       end
  87.       object Categorybox1: TGroupBox
  88.         Left = 192
  89.         Top = 4
  90.         Width = 177
  91.         Height = 285
  92.         Caption = 'User is blocked from'
  93.         Font.Charset = DEFAULT_CHARSET
  94.         Font.Color = clWindowText
  95.         Font.Height = -11
  96.         Font.Name = 'MS Sans Serif'
  97.         Font.Style = []
  98.         ParentFont = False
  99.         TabOrder = 0
  100.         object DBCheckBox3: TDBCheckBox
  101.           Left = 10
  102.           Top = 30
  103.           Width = 159
  104.           Height = 20
  105.           Alignment = taLeftJustify
  106.           Caption = 'Pornography'
  107.           DataField = 'PORN'
  108.           DataSource = Form1.UsersSource
  109.           Font.Charset = DEFAULT_CHARSET
  110.           Font.Color = clWindowText
  111.           Font.Height = -11
  112.           Font.Name = 'MS Sans Serif'
  113.           Font.Style = []
  114.           ParentFont = False
  115.           TabOrder = 0
  116.           ValueChecked = 'T'
  117.           ValueUnchecked = 'F'
  118.         end
  119.         object DBCheckBox4: TDBCheckBox
  120.           Left = 10
  121.           Top = 62
  122.           Width = 159
  123.           Height = 19
  124.           Alignment = taLeftJustify
  125.           Caption = 'Adult Subjects'
  126.           DataField = 'ADULT'
  127.           DataSource = Form1.UsersSource
  128.           Font.Charset = DEFAULT_CHARSET
  129.           Font.Color = clWindowText
  130.           Font.Height = -11
  131.           Font.Name = 'MS Sans Serif'
  132.           Font.Style = []
  133.           ParentFont = False
  134.           TabOrder = 1
  135.           ValueChecked = 'Y'
  136.           ValueUnchecked = 'N'
  137.         end
  138.         object DBCheckBox5: TDBCheckBox
  139.           Left = 10
  140.           Top = 94
  141.           Width = 159
  142.           Height = 19
  143.           Alignment = taLeftJustify
  144.           Caption = 'Violence/Criminal Activity'
  145.           DataField = 'VIOLENCE'
  146.           DataSource = Form1.UsersSource
  147.           Font.Charset = DEFAULT_CHARSET
  148.           Font.Color = clWindowText
  149.           Font.Height = -11
  150.           Font.Name = 'MS Sans Serif'
  151.           Font.Style = []
  152.           ParentFont = False
  153.           TabOrder = 2
  154.           ValueChecked = 'Y'
  155.           ValueUnchecked = 'N'
  156.         end
  157.         object DBCheckBox6: TDBCheckBox
  158.           Left = 10
  159.           Top = 126
  160.           Width = 159
  161.           Height = 19
  162.           Alignment = taLeftJustify
  163.           Caption = 'Hate/Persecution'
  164.           DataField = 'HATE'
  165.           DataSource = Form1.UsersSource
  166.           Font.Charset = DEFAULT_CHARSET
  167.           Font.Color = clWindowText
  168.           Font.Height = -11
  169.           Font.Name = 'MS Sans Serif'
  170.           Font.Style = []
  171.           ParentFont = False
  172.           TabOrder = 3
  173.           ValueChecked = 'Y'
  174.           ValueUnchecked = 'N'
  175.         end
  176.         object DBCheckBox7: TDBCheckBox
  177.           Left = 10
  178.           Top = 158
  179.           Width = 159
  180.           Height = 19
  181.           Alignment = taLeftJustify
  182.           Caption = 'Drugs/Alcohol'
  183.           DataField = 'DRUGS'
  184.           DataSource = Form1.UsersSource
  185.           Font.Charset = DEFAULT_CHARSET
  186.           Font.Color = clWindowText
  187.           Font.Height = -11
  188.           Font.Name = 'MS Sans Serif'
  189.           Font.Style = []
  190.           ParentFont = False
  191.           TabOrder = 4
  192.           ValueChecked = 'Y'
  193.           ValueUnchecked = 'N'
  194.         end
  195.         object DBCheckBox8: TDBCheckBox
  196.           Left = 10
  197.           Top = 190
  198.           Width = 159
  199.           Height = 19
  200.           Alignment = taLeftJustify
  201.           Caption = 'Gambling'
  202.           DataField = 'GAMBLE'
  203.           DataSource = Form1.UsersSource
  204.           Font.Charset = DEFAULT_CHARSET
  205.           Font.Color = clWindowText
  206.           Font.Height = -11
  207.           Font.Name = 'MS Sans Serif'
  208.           Font.Style = []
  209.           ParentFont = False
  210.           TabOrder = 5
  211.           ValueChecked = 'Y'
  212.           ValueUnchecked = 'N'
  213.         end
  214.         object DBCheckBox9: TDBCheckBox
  215.           Left = 10
  216.           Top = 222
  217.           Width = 159
  218.           Height = 19
  219.           Alignment = taLeftJustify
  220.           Caption = 'Weaponry'
  221.           DataField = 'WEAPON'
  222.           DataSource = Form1.UsersSource
  223.           Font.Charset = DEFAULT_CHARSET
  224.           Font.Color = clWindowText
  225.           Font.Height = -11
  226.           Font.Name = 'MS Sans Serif'
  227.           Font.Style = []
  228.           ParentFont = False
  229.           TabOrder = 6
  230.           ValueChecked = 'Y'
  231.           ValueUnchecked = 'N'
  232.         end
  233.       end
  234.       object GroupBox1: TGroupBox
  235.         Left = 12
  236.         Top = 4
  237.         Width = 173
  238.         Height = 285
  239.         Caption = 'User Information'
  240.         Font.Charset = DEFAULT_CHARSET
  241.         Font.Color = clWindowText
  242.         Font.Height = -11
  243.         Font.Name = 'MS Sans Serif'
  244.         Font.Style = []
  245.         ParentFont = False
  246.         TabOrder = 1
  247.         object Label1: TLabel
  248.           Left = 18
  249.           Top = 22
  250.           Width = 28
  251.           Height = 13
  252.           Caption = 'Name'
  253.           Font.Charset = DEFAULT_CHARSET
  254.           Font.Color = clWindowText
  255.           Font.Height = -11
  256.           Font.Name = 'MS Sans Serif'
  257.           Font.Style = []
  258.           ParentFont = False
  259.         end
  260.         object Label2: TLabel
  261.           Left = 18
  262.           Top = 64
  263.           Width = 46
  264.           Height = 13
  265.           Caption = 'Password'
  266.           Font.Charset = DEFAULT_CHARSET
  267.           Font.Color = clWindowText
  268.           Font.Height = -11
  269.           Font.Name = 'MS Sans Serif'
  270.           Font.Style = []
  271.           ParentFont = False
  272.         end
  273.         object Label3: TLabel
  274.           Left = 18
  275.           Top = 150
  276.           Width = 19
  277.           Height = 13
  278.           Caption = 'Age'
  279.           Font.Charset = DEFAULT_CHARSET
  280.           Font.Color = clWindowText
  281.           Font.Height = -11
  282.           Font.Name = 'MS Sans Serif'
  283.           Font.Style = []
  284.           ParentFont = False
  285.         end
  286.         object lblConfirm: TLabel
  287.           Left = 18
  288.           Top = 106
  289.           Width = 135
  290.           Height = 13
  291.           Caption = 'Confirm Password (Re-Enter)'
  292.         end
  293.         object UserNameEdit: TDBEdit
  294.           Left = 18
  295.           Top = 38
  296.           Width = 139
  297.           Height = 21
  298.           CharCase = ecUpperCase
  299.           DataField = 'USERNAME'
  300.           DataSource = Form1.UsersSource
  301.           Font.Charset = DEFAULT_CHARSET
  302.           Font.Color = clWindowText
  303.           Font.Height = -11
  304.           Font.Name = 'MS Sans Serif'
  305.           Font.Style = []
  306.           MaxLength = 10
  307.           ParentFont = False
  308.           TabOrder = 0
  309.         end
  310.         object AgeCombo: TDBComboBox
  311.           Left = 18
  312.           Top = 166
  313.           Width = 145
  314.           Height = 21
  315.           Style = csDropDownList
  316.           DataField = 'age'
  317.           DataSource = Form1.UsersSource
  318.           Font.Charset = DEFAULT_CHARSET
  319.           Font.Color = clWindowText
  320.           Font.Height = -11
  321.           Font.Name = 'MS Sans Serif'
  322.           Font.Style = []
  323.           ItemHeight = 13
  324.           Items.Strings = (
  325.             'Preschool'
  326.             'Grade 1'
  327.             'Grade 2'
  328.             'Grade 3'
  329.             'Grade 4'
  330.             'Grade 5'
  331.             'Grade 6'
  332.             'Grade 7'
  333.             'Grade 8'
  334.             'Grade 9'
  335.             'Grade 10'
  336.             'Grade 11'
  337.             'Grade 12'
  338.             'Age 18-24'
  339.             'Age 25-34'
  340.             'Age 35-49'
  341.             'Age 50-64'
  342.             'Age 65+')
  343.           ParentFont = False
  344.           TabOrder = 3
  345.         end
  346.         object edtConfirm: TEdit
  347.           Left = 18
  348.           Top = 124
  349.           Width = 139
  350.           Height = 21
  351.           PasswordChar = '*'
  352.           TabOrder = 2
  353.         end
  354.         object UserPassEdit: TEdit
  355.           Left = 18
  356.           Top = 82
  357.           Width = 139
  358.           Height = 21
  359.           PasswordChar = '*'
  360.           TabOrder = 1
  361.         end
  362.         object dbcbLogHistory: TDBCheckBox
  363.           Left = 18
  364.           Top = 226
  365.           Width = 79
  366.           Height = 17
  367.           Caption = 'Log history'
  368.           DataField = 'LOGIT'
  369.           DataSource = Form1.UsersSource
  370.           Font.Charset = DEFAULT_CHARSET
  371.           Font.Color = clWindowText
  372.           Font.Height = -11
  373.           Font.Name = 'MS Sans Serif'
  374.           Font.Style = []
  375.           ParentFont = False
  376.           TabOrder = 5
  377.           ValueChecked = 'T'
  378.           ValueUnchecked = 'F'
  379.         end
  380.         object dbcbSiteSubmission: TDBCheckBox
  381.           Left = 18
  382.           Top = 200
  383.           Width = 121
  384.           Height = 17
  385.           Caption = 'Allow site submission'
  386.           DataField = 'SUBMIT'
  387.           DataSource = Form1.UsersSource
  388.           TabOrder = 4
  389.           ValueChecked = 'True'
  390.           ValueUnchecked = 'False'
  391.         end
  392.         object CBWordBlock: TCheckBox
  393.           Left = 18
  394.           Top = 252
  395.           Width = 97
  396.           Height = 17
  397.           Caption = 'Block By Word'
  398.           TabOrder = 6
  399.           OnClick = CBWordBlockClick
  400.           OnEnter = CBWordBlockEnter
  401.         end
  402.       end
  403.     end
  404.   end
  405. end
  406.