object frmActivity: TfrmActivity Left = 191 Top = 60 Width = 410 Height = 326 ActiveControl = edtActivity BorderIcons = [biSystemMenu, biMaximize] Caption = 'Activity' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} Position = poScreenCenter OnActivate = FormActivate PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 0 Top = 258 Width = 402 Height = 41 Align = alBottom TabOrder = 0 object BitBtn1: TBitBtn Left = 308 Top = 8 Width = 75 Height = 25 TabOrder = 0 Kind = bkCancel end object BitBtn2: TBitBtn Left = 220 Top = 8 Width = 75 Height = 25 TabOrder = 1 Kind = bkOK end end object Panel2: TPanel Left = 0 Top = 0 Width = 402 Height = 258 Align = alClient BevelInner = bvLowered BorderWidth = 4 Caption = 'Panel2' TabOrder = 1 object ScrollBox: TScrollBox Left = 6 Top = 6 Width = 390 Height = 246 HorzScrollBar.Margin = 6 HorzScrollBar.Range = 348 VertScrollBar.Margin = 6 VertScrollBar.Range = 160 Align = alClient AutoScroll = False BorderStyle = bsNone TabOrder = 0 object Label1: TLabel Left = 8 Top = 4 Width = 43 Height = 13 Caption = 'Activity' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 230 Top = 4 Width = 34 Height = 13 Caption = 'When' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 8 Top = 48 Width = 40 Height = 13 Caption = 'Details' FocusControl = EditDetailes Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 8 Top = 94 Width = 34 Height = 13 Caption = 'Notes' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 10 Top = 216 Width = 76 Height = 13 Caption = 'Date Created' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 326 Top = 216 Width = 31 Height = 13 Caption = 'Done' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 226 Top = 216 Width = 40 Height = 13 Caption = 'Priority' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object SpeedButton1: TSpeedButton Left = 152 Top = 20 Width = 17 Height = 21 Hint = 'Edit Activity List' Glyph.Data = { AE040000424DAE0400000000000036040000280000000B0000000A0000000100 0800000000007800000000000000000000000001000000010000000000000000 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA A6000000330000006600000099000000CC000033000000333300003366000033 99000033CC000033FF00006600000066330000666600006699000066CC000066 FF00009900000099330000996600009999000099CC000099FF0000CC000000CC 330000CC660000CC990000CCCC0000CCFF0000FF330000FF660000FF990000FF CC00330000003300330033006600330099003300CC003300FF00333300003333 330033336600333399003333CC003333FF003366000033663300336666003366 99003366CC003366FF00339900003399330033996600339999003399CC003399 FF0033CC000033CC330033CC660033CC990033CCCC0033CCFF0033FF000033FF 330033FF660033FF990033FFCC0033FFFF006600000066003300660066006600 99006600CC006600FF00663300006633330066336600663399006633CC006633 FF00666600006666330066666600666699006666CC006666FF00669900006699 330066996600669999006699CC006699FF0066CC000066CC330066CC660066CC 990066CCCC0066CCFF0066FF000066FF330066FF660066FF990066FFCC0066FF FF00990000009900330099006600990099009900CC009900FF00993300009933 330099336600993399009933CC009933FF009966000099663300996666009966 99009966CC009966FF00999900009999330099996600999999009999CC009999 FF0099CC000099CC330099CC660099CC990099CCCC0099CCFF0099FF000099FF 330099FF660099FF990099FFCC0099FFFF00CC000000CC003300CC006600CC00 9900CC00CC00CC00FF00CC330000CC333300CC336600CC339900CC33CC00CC33 FF00CC660000CC663300CC666600CC669900CC66CC00CC66FF00CC990000CC99 3300CC996600CC999900CC99CC00CC99FF00CCCC0000CCCC3300CCCC6600CCCC 9900CCCCCC00CCCCFF00CCFF0000CCFF3300CCFF6600CCFF9900CCFFCC00CCFF FF00FF003300FF006600FF009900FF00CC00FF330000FF333300FF336600FF33 9900FF33CC00FF33FF00FF660000FF663300FF666600FF669900FF66CC00FF66 FF00FF990000FF993300FF996600FF999900FF99CC00FF99FF00FFCC0000FFCC 3300FFCC6600FFCC9900FFCCCC00FFCCFF00FFFF3300FFFF6600FFFF9900FFFF CC000D0D0D001A1A1A00282828003535350043434300505050005D5D5D006B6B 6B00787878008686860093939300A1A1A100AEAEAE00BBBBBB00C9C9C900D6D6 D600E4E4E400F1F1F1000400010001000100CBCBCB00B2B2B200D7D7D700DDDD DD00E3E3E300EAEAEA00F8F8F8001C1C1C00F0FBFF00A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00070707070707 0707070707000707070704040404070707F00707070404040404040707000707 0404040404040404070007070404040404040404070007070404040404040404 0700070704040404040404040700070707040404040404070700070707070404 0404070707A0070707070707070707070700} ParentShowHint = False ShowHint = True OnClick = SpeedButton1Click end object EditDetailes: TDBEdit Left = 8 Top = 65 Width = 363 Height = 24 DataField = 'Detailes' DataSource = frmDataModule.dsActivity Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [] MaxLength = 100 ParentFont = False TabOrder = 2 end object DBCheckBox1: TDBCheckBox Left = 360 Top = 214 Width = 17 Height = 17 DataField = 'Done' DataSource = frmDataModule.dsActivity TabOrder = 6 ValueChecked = 'True' ValueUnchecked = 'False' end object DBMemo1: TDBMemo Left = 8 Top = 111 Width = 365 Height = 89 DataField = 'Notes' DataSource = frmDataModule.dsActivity Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 5 OnDblClick = DBMemo1DblClick end object edtWhen: TwwDBComboDlg Left = 230 Top = 20 Width = 141 Height = 21 OnCustomDlg = edtWhenCustomDlg ShowButton = True Style = csDropDown DataField = 'DateOf' DataSource = frmDataModule.dsActivity MaxLength = 0 TabOrder = 1 end object edtDateCreated: TwwDBComboDlg Left = 96 Top = 212 Width = 121 Height = 21 OnCustomDlg = edtDateCreatedCustomDlg ShowButton = True Style = csDropDown DataField = 'DateCreated' DataSource = frmDataModule.dsActivity MaxLength = 0 TabOrder = 3 end object edtActivity: TDBLookupComboBox Left = 8 Top = 20 Width = 145 Height = 21 DataField = 'Activity' DataSource = frmDataModule.dsActivity KeyField = 'ActDesc' ListSource = frmDataModule.DSActDesc TabOrder = 0 end object DBComboBox1: TDBComboBox Left = 272 Top = 212 Width = 41 Height = 21 DataField = 'Priority' DataSource = frmDataModule.dsActivity ItemHeight = 13 Items.Strings = ( 'A' 'B' 'C' 'D' '') TabOrder = 4 end end end object wwComments: TwwMemoDialog DataSource = frmDataModule.dsActivity DataField = 'Notes' Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [] Caption = 'Site Description' DlgLeft = 0 DlgTop = 0 DlgWidth = 500 DlgHeight = 350 Left = 84 Top = 117 end end