There is something strange happen to egrid.

Last week i was able to use EGrid I compiled my code and all things gone ok. But since saturday i always get the message that i have to register to use the complete Egrid, that's strange because i didn't change anything. Even a easy code would'nt work anymore. So i'm complete lost i don't know how to get this working.
Here the code for testing, its one of your examples a little shortened. The registration infos are marked out. If you need more information or the code of the project i work on currently please PM me.
Code:
;******************************************************************************************
;'egrid5' editable grid control. By Stephen Rodriguez.
;******************************************************************************************
; DEMONSTRATION PROGRAM 7.
egrid_Register("MichaelHolderried**##########**", "################################")
Procedure.l MyCellCallBack(egrid, uMsg, *cellinfo.egridCellInfo)
Protected result
ProcedureReturn result
EndProcedure
If OpenWindow(0,0,0,640,300,"egrid4 demo 7.",#PB_Window_SystemMenu|#PB_Window_SizeGadget|#PB_Window_MinimizeGadget|#PB_Window_MaximizeGadget|#PB_Window_Maximize|#PB_Window_ScreenCentered) And CreateGadgetList(WindowID(0))
egrid_CreateGrid(1, WindowWidth(0)/2-175, 150, 350, 300,24, #egrid_AlwaysShowSelection, #egrid_CustomHeader | #egrid_ResizeColumnsTrue)
egrid_CreateCellCallback(1, @MyCellCallBack())
egrid_AddColumn(1,0,"",30)
egrid_AddColumn(1,1,"First name",120)
egrid_AddColumn(1,2,"Second name",120)
egrid_AddColumn(1,3,"Gender",60)
egrid_AddColumn(1,4,"VR",30)
egrid_AddRows(1,-1, 100) ;Add 100 rows.
For b=0 To 99
egrid_SetCellText(1,0,b,"FALSE")
egrid_SetCellText(1,1,b,"Bob")
egrid_SetCellText(1,2,b,"Smith")
Next
egrid_SetHeaderHeight(1,40)
egrid_SetOption(1, #egrid_SelectionBorderWidth, 2)
SetActiveGadget(1)
Repeat
EventID = WaitWindowEvent()
Select EventID
Case #PB_Event_Gadget
Select EventGadget()
EndSelect
EndSelect
Until EventID = #PB_Event_CloseWindow
EndIf
End