Sorry for the I've back from work now,then :
1) ok, i'll try.
2) I think yes, but wait the request from others.
3) just try the following changed source : egrid4 demo1.pb:
Code: Select all
DisableExplicit
;*****************************************FONT DATA****************************************
Enumeration
#head1
#head2
#main
EndEnumeration
LoadFont(#main, "Arial", 9)
;SetGadgetFont(#PB_Default,FontID(#main))
;******************************************************************************************
;*************************************WINDOW + GADGET LIST*********************************
If OpenWindow(0,0,0,640,300,"egrid4 demo 1.",#PB_Window_SystemMenu|#PB_Window_MinimizeGadget|#PB_Window_MaximizeGadget|#PB_Window_Maximize|#PB_Window_ScreenCentered) And CreateGadgetList(WindowID(0))
;******************************************************************************************
ButtonGadget(0,5,5,50,50,"")
;********************************************EGRID*****************************************
;Create an egrid with resizable columns.
egrid_CreateGrid(1, WindowWidth(0)/4, WindowHeight(0)/8, WindowWidth(0)/2, WindowHeight(0)/2,42,#egrid_gridlines, #egrid_ResizeColumnsTrue|#egrid_MultiLineText)
;******************************************************************************************
egrid_SetHeaderHeight(1, 32)
egrid_SetOptions(1, -1, #Black, 2)
;********************************************TEXT GADGET***********************************
;***************************************ADD COLUMNS AND ROWS TO EGRID**********************************
egrid_AddColumn(1,b,"Col " + Str(b),100)
; For b=0 To 49 ;50 columns.
; egrid_AddColumn(1,b,"Col " + Str(b),100)
; Next
egrid_AddRow(1,-1)
; For b=0 To 99 ; Add 10 rows.
; egrid_AddRow(1,-1)
; Next
;*****************************************EVENT LOOP***************************************
Repeat
EventID = WaitWindowEvent()
Select EventID
Case #PB_Event_Gadget
Select EventGadget()
Case 0
egrid_AddRow(1,-1)
EndSelect
EndSelect
Until EventID = #PB_Event_CloseWindow
EndIf
End
and click the button (I've Win Xp Pro)