Allow only one selection (this tests settability of selFlags)

This commit is contained in:
Jack Jansen 1996-07-26 16:04:29 +00:00
parent 16038ee18e
commit 8431733c07
1 changed files with 2 additions and 0 deletions

View File

@ -11,6 +11,7 @@ from FrameWork import *
import Win
import Qd
import List
import Lists
import os
class ListWindow(Window):
@ -22,6 +23,7 @@ class ListWindow(Window):
Qd.SetPort(w)
self.wid = w
self.list = List.LNew(r2, (0, 0, 1, 1), (0,0), 0, w, 0, 1, 1, 1)
self.list.selFlags = Lists.lOnlyOne
self.filllist()
w.DrawGrowIcon()
self.do_postopen()