object checkpmsgs: Tcheckpmsgs Left = 280 Top = 113 BorderStyle = bsToolWindow Caption = 'Check Private Msgs' ClientHeight = 148 ClientWidth = 200 Color = 14547961 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 40 Top = 64 Width = 121 Height = 15 Alignment = taCenter Caption = 'Enter your password:' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 64 Top = 8 Width = 69 Height = 15 Alignment = taCenter Caption = 'Select User:' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object combobox1: TComboBox Left = 40 Top = 24 Width = 121 Height = 27 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Comic Sans MS' Font.Style = [fsBold] ItemHeight = 19 Items.Strings = ( '') ParentFont = False TabOrder = 0 Text = 'Select a name' OnChange = combobox1Change OnKeyPress = combobox1KeyPress end object Edit1: TEdit Left = 32 Top = 80 Width = 137 Height = 24 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Comic Sans MS' Font.Style = [fsBold] MaxLength = 5 ParentFont = False PasswordChar = '*' TabOrder = 1 OnKeyPress = Edit1KeyPress end object Button1: TButton Left = 48 Top = 112 Width = 105 Height = 25 Caption = 'Check messages' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnClick = Button1Click end object ListBox1: TListBox Left = 56 Top = 272 Width = 89 Height = 1 ItemHeight = 13 TabOrder = 3 Visible = False end object Edit2: TEdit Left = 40 Top = 252 Width = 105 Height = 21 TabOrder = 4 Visible = False OnChange = Edit2Change end end