object fra_commentary: Tfra_commentary
  Left = 0
  Top = 0
  Width = 470
  Height = 416
  AutoScroll = False
  TabOrder = 0
  object dbgrd_commentary: TCRDBGrid
    Left = 0
    Top = 0
    Width = 470
    Height = 246
    OptionsEx = [dgeEnableSort, dgeLocalFilter, dgeLocalSorting, dgeRecordCount, dgeSummary]
    Align = alClient
    DataSource = dm_DB.my_ds_comm
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnCellClick = dbgrd_commentaryCellClick
    OnDrawColumnCell = dbgrd_commentaryDrawColumnCell
    Columns = <
      item
        Expanded = False
        FieldName = 'usr_name'
        Title.Caption = 'Name'
        Width = 60
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'com_txt'
        Title.Caption = 'Text'
        Width = 60
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'tstamp'
        Title.Caption = 'Datum'
        Width = 60
        Visible = True
      end>
  end
  object pnl_input: TPanel
    Left = 0
    Top = 246
    Width = 470
    Height = 170
    Align = alBottom
    TabOrder = 1
    DesignSize = (
      470
      170)
    object lbl_komm: TLabel
      Left = 10
      Top = 10
      Width = 56
      Height = 13
      Caption = 'Kommentar:'
    end
    object btn_AddCommentary: TButton
      Left = 385
      Top = 25
      Width = 75
      Height = 25
      Anchors = [akTop, akRight]
      Caption = '&Hinzuf'#252'gen'
      TabOrder = 0
      OnClick = btn_AddCommentaryClick
    end
    object memo_comm: TMemo
      Left = 10
      Top = 25
      Width = 365
      Height = 130
      Anchors = [akLeft, akTop, akRight, akBottom]
      Lines.Strings = (
        '')
      TabOrder = 1
      OnChange = memo_commChange
    end
    object btn_ModifyCommentary: TButton
      Left = 385
      Top = 60
      Width = 75
      Height = 25
      Anchors = [akTop, akRight]
      Caption = #196'ndern'
      Enabled = False
      TabOrder = 2
      OnClick = btn_ModifyCommentaryClick
    end
    object btn_DeleteCommentary: TButton
      Left = 385
      Top = 95
      Width = 75
      Height = 25
      Hint = 'Kommentar l'#246'schen'
      Anchors = [akTop, akRight]
      Caption = 'L'#246'schen'
      Enabled = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 3
      OnClick = btn_DeleteCommentaryClick
    end
  end
end
