how about to increase the font-size?
Code: Select all
LoadFont(0, "Arial", 24)
OpenWindow(0, #PB_Ignore, #PB_Ignore, 800, 800, "ListIcon Example", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
ListIconGadget(0, 0, 0, 800, 800, "Name", 300, #PB_ListIcon_FullRowSelect | #PB_ListIcon_AlwaysShowSelection)
AddGadgetColumn(0, 1, "Address", 400)
AddGadgetItem(0, -1, "Harry Rannit"+Chr(10)+"12 Parliament Way, Battle Street, By the Bay")
AddGadgetItem(0, -1, "Ginger Brokeit"+Chr(10)+"130 SpiderBasic Road, BigTown, CodeCity")
SetGadgetFont(0, FontID(0))
nevertheless here's a snippet to set the row height:
Code: Select all
Macro GetGadgetID(Gadget)
If IsGadget(Gadget) = 0 : ProcedureReturn : EndIf
If GadgetType(Gadget) <> #PB_GadgetType_ListIcon : ProcedureReturn : EndIf
Protected GadgetID = GadgetID(Gadget)
EndMacro
Procedure SetRowHeight(Gadget, RowHeight)
GetGadgetID(Gadget)
! var grid = v_gadgetid.gadget;
! spider.DojoAspect.after( grid, 'renderRow', function( row, args ) {
! $(row).css('height', v_rowheight + 'px');
! return row;
! });
EndProcedure
OpenWindow(0, #PB_Ignore, #PB_Ignore, 800, 800, "ListIcon Example", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
ListIconGadget(0, 0, 0, 800, 800, "Name", 300, #PB_ListIcon_FullRowSelect | #PB_ListIcon_AlwaysShowSelection)
AddGadgetColumn(0, 1, "Address", 400)
AddGadgetItem(0, -1, "Harry Rannit"+Chr(10)+"12 Parliament Way, Battle Street, By the Bay")
AddGadgetItem(0, -1, "Ginger Brokeit"+Chr(10)+"130 SpiderBasic Road, BigTown, CodeCity")
SetRowHeight(0, 36)
Greetings ... Peter