OnDragDrop = archivefileDragDrop
        OnDragOver = archivefileDragOver
      end
      object Memo4: TMemo
        Left = 4
        Top = 227
        Width = 154
        Height = 33
        Cursor = crArrow
        TabStop = False
        Alignment = taCenter
        BorderStyle = bsNone
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        Lines.Strings = (
          'Drag these files to the file list,'
          'trashcan, images or memo')
        ParentFont = False
        ReadOnly = True
        TabOrder = 2
      end
    end
    object Fishname: TDBEdit
      Left = 56
      Top = 326
      Width = 121
      Height = 20
      TabStop = False
      AutoSize = False
      BorderStyle = bsNone
      Color = clBtnFace
      Ctl3D = False
      DataField = 'Common_Name'
      DataSource = DataSource1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 6
      Visible = False
    end
    object Memo5: TMemo
      Left = 9
      Top = 480
      Width = 186
      Height = 14
      Cursor = crArrow
      TabStop = False
      Alignment = taCenter
      BorderStyle = bsNone
      Color = clBtnFace
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      Lines.Strings = (
        'Drag this to the archive or file list')
      ParentFont = False
      ReadOnly = True
      TabOrder = 7
    end
    object Memo6: TMemo
      Left = 312
      Top = 480
      Width = 186
      Height = 14
      Cursor = crArrow
      TabStop = False
      Alignment = taCenter
      BorderStyle = bsNone
      Color = clBtnFace
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      Lines.Strings = (
        'Drag to the archive, file list or image')
      ParentFont = False
      ReadOnly = True
      TabOrder = 8
    end
    object Button1: TButton
      Left = 453
      Top = 286
      Width = 50
      Height = 29
      Caption = 'About'
      TabOrder = 9
      OnClick = Button1Click
    end
    object Panel1: TPanel
      Left = 202
      Top = 85
      Width = 102
      Height = 121
      BevelInner = bvRaised
      BevelOuter = bvLowered
      TabOrder = 10
      OnClick = Panel1Click
      object Bevel1: TBevel
        Left = 37
        Top = 83
        Width = 28
        Height = 31
        ParentShowHint = False
        ShowHint = False
      end
      object Time: TLabel
        Left = 16
        Top = 58
        Width = 73
        Height = 16
        Alignment = taCenter
        AutoSize = False
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object Percentage: TLabel
        Left = 6
        Top = 22
        Width = 89
        Height = 16
        Alignment = taCenter
        AutoSize = False
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object TimeLabel: TLabel
        Left = 18
        Top = 43
        Width = 67
        Height = 14
        Alignment = taCenter
        AutoSize = False
        Caption = 'Time'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object Label7: TLabel
        Left = 6
        Top = 5
        Width = 89
        Height = 16
        Caption = '% Compressed'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object Trashcan: TImage
        Left = 38
        Top = 84
        Width = 26
        Height = 29
        Hint = 'Drag files here to delete them'
        DragMode = dmAutomatic
        ParentShowHint = False
        Picture.Data = {
          07544269746D617076020000424D760200000000000076000000280000001E00
          0000200000000100040000000000000200000000000000000000100000001000
          000000000000000080000080000000808000800000008000800080800000C0C0
          C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
          FF00EEEEEE000000000000000000EEEEEE00EEEEEE000000000000000000EEEE
          EE00EEEEEE00FF88888888888800EEEEEE00EEEEEE00FF88888888888800EEEE
          EE00EEEEEE00FF00770077008800EEEEEE00EEEEEE00FF00770077008800EEEE
          EE00EEEEEE00FF00770088008800EEEEEE00EEEEEE00FF00770088008800EEEE
          EE00EEEEEE00FF00770077008800EEEEEE00EEEEEE00FF00770077008800EEEE
          EE00EEEEEE00FF00770088008800EEEEEE00EEEEEE00FF00770088008800EEEE
          EE00EEEEEE00FF00770077008800EEEEEE00EEEEEE00FF00770077008800EEEE
          EE00EE00EE00FF00770088008800EE00EE00EE00EE00FF00770088008800EE00
          EE00EEEE0000FF0077007700880000EEEE00EEEE0000FF0077007700880000EE
          EE00EEEEEE00FF00770088008800EEEEEE00EEEEEE00FF00770088008800EEEE
          EE00EEEEEE008800880088008800EEEEEE00EEEEEE008800880088008800EEEE
          EE00EEEE0000000000000000000000EEEE00EEEE0000000000000000000000EE
          EE00EEEE00FF777777888888888800EEEE00EEEE00FF777777888888888800EE
          EE00EEEE0000000000000000000000EEEE00EEEE0000000000000000000000EE
          EE00EEEEEEEEEE0088888800EEEEEEEEEE00EEEEEEEEEE0088888800EEEEEEEE
          EE00EEEEEEEEEE0000000000EEEEEEEEEE00EEEEEEEEEE0000000000EEEEEEEE
          EE00}
        ShowHint = True
        Stretch = True
        OnDragDrop = TrashcanDragDrop
        OnDragOver = TrashcanDragOver
      end
    end
    object Button2: TButton
      Left = 340
      Top = 286
      Width = 50
      Height = 29
      Caption = 'Help'
      TabOrder = 11
      OnClick = Button2Click
    end
    object CDBImage1: TCDBImage
      Left = 256
      Top = 354
      Width = 241
      Height = 113
      DataField = 'Graphic'
      DataSource = DataSource1
      DragMode = dmAutomatic
      TabOrder = 12
      OnDragDrop = CDBImage1DragDrop
      OnDragOver = CDBImage1DragOver
      CompressionMethod = coNone
      CompressSource = Compress1
    end
    object CDBMemo1: TCDBMemo
      Left = 8
      Top = 354
      Width = 241
      Height = 113
      CompressionMethod = coNone
      CompressSource = Compress1
      DataField = 'Notes'
      DataSource = DataSource1
      DragMode = dmAutomatic
      TabOrder = 13
      OnDragDrop = CDBMemo1DragDrop
      OnDragOver = CDBMemo1DragOver
    end
    object Button3: TButton
      Left = 397
      Top = 286
      Width = 50
      Height = 29
      Hint = 'Registration information'
      Caption = 'Reg'#39'n'
      TabOrder = 14
      OnClick = Button3Click
    end
  end
  object Table1: TTable
    AfterPost = Table1AfterPost
    DatabaseName = 'DBDEMOS'
    TableName = 'BIOLIFE.DB'
    Left = 51
    Top = 284
    object Table1SpeciesNo: TFloatField
      FieldName = 'Species No'
    end
    object Table1Category: TStringField
      FieldName = 'Category'
      Size = 15
    end
    object Table1Common_Name: TStringField
      FieldName = 'Common_Name'
      Size = 30
    end
    object Table1SpeciesName: TStringField
      FieldName = 'Species Name'
      Size = 40
    end
    object Table1Lengthcm: TFloatField
      FieldName = 'Length (cm)'
    end
    object Table1Length_In: TFloatField
      FieldName = 'Length_In'
    end
    object CDBImage1Graphic: TCGraphicField
      FieldName = 'Graphic'
      BlobType = ftGraphic
      CompressSource = Compress1
      CompressionMethod = coNone
    end
    object CDBMemo1Notes: TCMemoField
      FieldName = 'Notes'
      BlobType = ftMemo
      Size = 50
      CompressSource = Compress1
      CompressionMethod = coNone
    end
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 83
    Top = 284
  end
  object Compress1: TCompress
    RegNumber = 0
    OnCheckFile = Compress1CheckFile
    OnShowProgress = Compress1ShowProgress
    MakeDirectories = False
    ExceptionOnFileError = False
    Key = 0
    CheckSpaceBeforeExpand = False
    Left = 20
    Top = 283
  end
end