fixed multiselect on WM_IN form

This commit is contained in:
Infineon\StieberD 2024-09-16 10:58:55 -07:00
parent 746821724a
commit f77f3c1207
2 changed files with 8815 additions and 1402 deletions

File diff suppressed because it is too large Load Diff

View File

@ -95,22 +95,6 @@ Create:
obj_Appwindow('Create',@WINDOW)
* get the current style
Style = Get_Property(@WINDOW:'.SLOT_NO', 'STYLE')
IF Style [1,2] _EQC "0x" THEN
CONVERT @LOWER.CASE TO @UPPER.CASE IN STYLE
Style = ICONV(Style [3,99], "MX")
END
Style = BitOr(Style, DTS_MULTIROW$)
Set_Property(@WINDOW:'.SLOT_NO', "STYLE", Style)
* Provides compatibility with the existing messaging attachment system
IF Parm1 NE '' THEN
@ -825,3 +809,4 @@ RETURN