FWH2307: List View Unicode compatible
Posted: Sun Aug 27, 2023 9:12 am
[code]#include "FiveWin.ch"
function Main()
local oWnd, oLvw, nOption := 1, oImageList
DEFINE WINDOW oWnd TITLE "ListView Test"
DEFINE IMAGELIST oImageList SIZE 32, 32
oImageList:AddIcon( "console" )
oImageList:AddIcon( "form" )
oImageList:AddIcon( "library" )
@ 1, 1 LISTVIEW oLvw SIZE 300, 300 PROMPTS "One" + CRLF + "ఒకటి", ;
"Two" + CRLF + "రెండు", "Three" + CRLF + "మూడు";
ACTION MsgInfo( nOption )
oLvw:SetImageList( oImageList )
ACTIVATE WINDOW oWnd
oImageList:End()
return nil/code]