REBOL [
  Title: "Demo 6 - List view with simple filtering"
  Short: "Advanced Filtering"
  Author: ["Henrik Mikael Kristensen"]
  Copyright: "2006 - HMK Design"
  Filename: %demo06.r
  Version: 0.0.1
  Created: 11-Jul-2007
  Date: 11-Jul-2007
  License: {
    BSD (www.opensource.org/licenses/bsd-license.php)
    Use at your own risk.
  }
  Purpose: {
    List view with simple filtering.
  }
  History: []
  Keywords: [data filtering]
]

do http://www.hmkdesign.dk/rebol/list-view/list-view.r

view layout [
  text bold {List view with simple filtering.}
  text bold {Type a part of a word, a full word or multiple words to filter the list view.}
  across space 2
  ; ---------- Global filter

  f-global-search: field 150 [lv/set-filter value]
  button "Clear" 50 [
    clear-face f-global-search
    do-face f-global-search none
  ]
  return

  ; ---------- Lots of different data in our list view

  lv: list-view 600x200 with [
    data-columns: [Firstname Lastname Age Color Height Gender Occupation]
    data: [
      ["James"   "Kirk"      36 red    175 male   "Captain"]
      ["Jim"     "Belushi"   25 blue   182 male   "Actor"]
      ["Jill"    "McGill"    17 blue   171 female "Unknown"]
      ["Jane"    "Doe"       35 green  167 female "Unknown"]
      ["Joe"     "DiMaggio"  46 red    167 male   "Player"]
      ["John"    "Rambo"     42 blue   177 male   "Soldier"]
      ["Jamie"   "Oliver"    21 yellow 177 male   "Cook"]
      ["Judy"    "Dench"     21 yellow 159 female "Actress"]
      ["Jack"    "Nicholson" 41 blue   171 male   "Actor"]
      ["Jack"    "Lemmon"    55 red    169 male   "Actor"]
      ["Jack"    "Bauer"     34 red    178 male   "Agent"]
      ["Henry"   "Ford"      56 yellow 183 male   "Boss"]
      ["Audrey"  "Hepburn"   23 blue   168 female "Actress"]
      ["Ford"    "Fairlane"  33 green  186 male   "Detective"]
      ["Walther" "Matthau"   67 green  191 male   "Actor"]
    ]
  ]
]