... <- Viewable <- Box <- GridView <- ListView <- EditableList |
|
|
AutoMove CanDrawIn CanExtendBottom IsCheckList List List |
instance EditableList tag; relativeOrigin: <0.0,0.0>; contentSize: <0.0,0.0>; viewFlags: 0x00000000; labelStyle: nilObject; color: 0; altColor: 0; shadow: nilObject; sound: nilObject; border: nilObject; scrollOffset: <0.0,0.0>; selectMode: false; showCount: false; useContainerList: false; showColumnTitles: false; keyboardScroll: false; scrollToSelected: false; showColumnLines: false; showRowLines: false; showExtraRowLines: false; showTitleLines: false; menuResizeH: false; alwaysOneSelected: false; setCurrentContact: false; dontTrack: false; showRemaining: false; showColumnTitleAsLetter: false; showColumnTitleAsNumber: false; showRowTitles: false; showRowTitleAsLetter: false; showRowTitleAsNumber: false; useListElementPerCell: false; noPartialCell: false; grayTitleBackground: false; gridViewCenteredTitle: false; forPrinting: false; emboldenGroups: false; confirmOnSelect: false; removePlural: false; listViewArrow: false; cellTextStyle: nilObject; columnTitles: nilObject; emptyMessage: nilObject; selectedColumn: 0; selectedRow: 0; titleTextStyle: nilObject; columnKeysList: nilObject; columnOffsetsList: nilObject; columnFlagsList: nilObject; list: nilObject; summaryString: nilObject; ownedList: nilObject; isCheckList: false; gapIndex: 0; gapEntry: nilObject; editCell: nilObject; end instance;
Define Class EditableList; inherits from ListView; field ownedList: ObjectList; field isCheckList: Boolean, getter, setter; field gapIndex: Unsigned; field gapEntry: ListEntry, weak; field editCell: ListEditCell; attribute IsCheckList: Boolean; operation AddGapEntry(lineNumber: Unsigned); operation AddListEntry(entry: Object; location: Dot); operation AddNewEntryAt(row: Unsigned); operation ChangeCheckValue(row: Unsigned); operation EditNextCell(row: Unsigned; column: Unsigned); operation MakeItemAtDot(location: Dot): Unsigned; operation MakeTitlesFromText(text: HasText): Text; operation ShowListEditCell(column: Unsigned; row: Unsigned): Boolean; operation ShowTitleListEditCell(column: Unsigned): Boolean; operation FirstEditableColumn(): Unsigned; overrides ActivateForTyping; overrides AdjustSize; // if list is on a card, make its min height be same as card overrides CanAcceptCoupon; overrides CanDrawIn; overrides CanExtendBottom; overrides DrawCell; overrides RowHeight; overrides List, SetList; overrides SelectFirstTextField; // activate and return first list item overrides ApplyText; // Touch overrides AutoMove; overrides DragTrack; overrides SwallowFeedback; overrides Tap; overrides Touch; overrides Press; end class;