case WM_NOTIFY  'handling notifications (i.e. for the listview)

    dim as NMLVDISPINFO ptr pdi = cptr(NMLVDISPINFO ptr, lParam )
    dim as LVITEM ptr pi = @pdi->item
    select case pdi->hdr.code
    case LVN_GETDISPINFO 'want info about an item

      static as zstring*64 zTemp

      if pi->iSubItem = 1 then 'column 1
        sprintf( zTemp , "[%i]Filename%i.ext" , pi->iSubItem , pi->iItem )
      else                     'column 0
        sprintf( zTemp , "[%i]%i" , pi->iSubItem , pi->iItem )
      end if

      pi->mask = LVIF_TEXT
      pi->pszText = @zTemp

    end select