object fmGrpPicker: TfmGrpPicker Left = 230 Top = 140 BorderIcons = [biSystemMenu] BorderStyle = bsSingle ClientHeight = 377 ClientWidth = 517 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = True Position = poScreenCenter OnShow = FormShow PixelsPerInch = 120 TextHeight = 16 object Label1: TLabel Left = 3 Top = 1 Width = 3 Height = 16 Visible = False end object bPoster: TButton Left = 280 Top = 344 Width = 121 Height = 25 Hint = 'Click here if you want followup to go to you by email' Caption = 'Followup to poster' ModalResult = 1 ParentShowHint = False ShowHint = True TabOrder = 3 OnClick = bPosterClick end object bOkay: TButton Left = 16 Top = 344 Width = 75 Height = 25 Caption = 'Okay' Default = True ModalResult = 1 TabOrder = 1 OnClick = bOkayClick end object bCancel: TButton Left = 120 Top = 344 Width = 75 Height = 25 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 2 end object bClear: TButton Left = 424 Top = 344 Width = 75 Height = 25 Hint = 'Do not set followup-to' Caption = 'Clear all' ParentShowHint = False ShowHint = True TabOrder = 4 OnClick = bClearClick end object LV: TListView Left = 0 Top = 23 Width = 517 Height = 313 Checkboxes = True Columns = < item Caption = 'Newsgroup' Width = 400 end> GridLines = True HideSelection = False HotTrackStyles = [] ReadOnly = True TabOrder = 0 ViewStyle = vsReport end end