DL_ShowPartList

Revision
Revised on

Description

Code

on DL_ShowPartList
  global DL_PartWindow
  
  put "Card Parts" into DL_PartWindow
  
  if there is not a window DL_PartWindow then
    TextView DL_PartWindow,true,"Grey,2"
    if there is a window DL_PartWindow then
      set the editable of window DL_PartWindow to false
      set the wholeLine of window DL_PartWindow to true
      set the clickMessage of window DL_PartWindow to DL_PartClick
      set the dontWrap of window DL_PartWindow to false
      set the scrollbar of window DL_PartWindow to 8
    end if
  end if
  
  if there is a window DL_PartWindow then
    DL_UpdatePartWindow
    show window DL_PartWindow
  end if
  
end DL_ShowPartList