44 lines
1.4 KiB
Plaintext
44 lines
1.4 KiB
Plaintext
# Property of Four Js*
|
|
# (c) Copyright Four Js 1995, 2019. All Rights Reserved.
|
|
# * Trademark of Four Js Development Tools Europe Ltd
|
|
# in the United States and elsewhere
|
|
#
|
|
# Four Js and its suppliers do not warrant or guarantee that these
|
|
# samples are accurate and suitable for your purposes. Their inclusion is
|
|
# purely for information purposes only.
|
|
|
|
ACTION DEFAULTS
|
|
ACTION filter (ACCELERATOR = CONTROL-ENTER, ACCELERATOR2 = CONTROL-RETURN)
|
|
END
|
|
|
|
LAYOUT ( STYLE = "dialog4" )
|
|
GRID
|
|
{
|
|
Filter: [f ]
|
|
<t t1 >
|
|
Id City State
|
|
[id |name |st ]
|
|
[id |name |st ]
|
|
[id |name |st ]
|
|
[id |name |st ]
|
|
[id |name |st ]
|
|
[id |name |st ]
|
|
< >
|
|
}
|
|
END
|
|
END
|
|
|
|
ATTRIBUTES
|
|
BUTTONEDIT f = FORMONLY.filter TYPE CHAR, ACTION=filter, IMAGE="filter",
|
|
COMMENT = "Presse Control-Enter to apply filter";
|
|
TABLE t1 : COMMENT = "Double-click to select an item from the list";
|
|
EDIT id = FORMONLY.city_id TYPE INTEGER;
|
|
EDIT name = FORMONLY.city_name TYPE CHAR;
|
|
EDIT st = FORMONLY.city_state TYPE CHAR;
|
|
END
|
|
|
|
INSTRUCTIONS
|
|
SCREEN RECORD sr (FORMONLY.city_id, FORMONLY.city_name, FORMONLY.city_state);
|
|
END
|
|
|