Equinox Online Help - Language Reference - A to Z
PickSelect |
| Applies to |  |
| Syntax | PickSelect [0=clear, 1=add, 2=query] default=add |
| Action | Selects/deselects/queries the current record to be highlighted in a forthcoming Pick statement. |
| Scope | usable anywhere |
| Notes | In a multi-select pick, the Return key now only selects the current item if no other selection has been made. In order to select the current line, press the space bar first and then press Return.
|
| Category | Pick lists |
| See Also | Pick_PickRecord, PickCaptions, PickColumnWidths, PickFields, PickList, PickListSelection, PickRange_PickRecordRange, PickWrite_PickRecordWrite |
| Example |
string s
number n, i
PrintDevice ""
print "Selections"
subtable Customer
SetIndex IdxCustName
FindRecord ge, "A"
PickSelect
NextRecord
NextRecord
print CustName
PickSelect
NextRecord
NextRecord
print CustName
PickSelect
PickSelect 2
if SysReply <> 1 then Alert "Query bug A"
FindRecord ge, "A"
PickSelect 0
PickSelect 2
if SysReply <> 0 then Alert "Query bug B"
end subtable
PopupFlags 64
PickFields CustName, CustDate, CustTime
s = PickRange(CustName,, IdxCustName, "A", "C")
n = SysResult
print "'" & s & "'", SysReply, SysResult
for i = 1 to n
PickSelection i, s
print i, s
next
|
