{ "type" , "C", 2, 0 }
When I try to show one type of room tplann make error on
Called from: tplann.prg => TPLANNING:GETROWTEXT( 568 )
I use the same configuration OF Daniel
I add these new data because I need to select the type of room
Data cTypeRoom
Data bSelectRoom INIT { || .T. }
Data nNumFrom
Data nNumTo
and I add this combbox to select type of rooms on METHOD BuildPlanning() CLASS SamplePlan
@ 10, 620 say "Room Type: " OF ::oPlann size 85,20 pixel TRANSPARENT
@ 10, 690 COMBOBOX ::cTypeRoom ITEMS aItems OF ::oPlann size 45,90 pixel ;
ON CHANGE (;
oSelf:oPlann:Reset(),;
oSelf:LoadRooms(),;
oSelf:LoadData(),;
oSelf:oPlann:Refresh() )
- Code: Select all Expand view
- Application
===========
Path and name: C:\Work\pezzi_per_spiaggia\Tplann\sample01.Exe (32 bits)
Size: 3,236,352 bytes
Compiler version: Harbour 3.2.0dev (r1703231115)
FiveWin version: FWH 17.12
C compiler version: Borland/Embarcadero C++ 7.0 (32-bit)
Windows version: 6.2, Build 9200
Time from start: 0 hours 1 mins 36 secs
Error occurred at: 07/12/2018, 08:34:27
Error description: Error BASE/1132 Error de rango: acceso al array
Args:
[ 1] = H {=>}
[ 2] = C 0004
Stack Calls
===========
Called from: tplann.prg => TPLANNING:GETROWTEXT( 568 )
Called from: sample01.prg => SAMPLEPLAN:BUILDDIALOG( 203 )
Called from: sample01.prg => (b)SAMPLEPLAN_BUILDPOP( 422 )
Called from: .\source\classes\MENU.PRG => TMENU:ACTIVATE( 1582 )
Called from: sample01.prg => SAMPLEPLAN:BUILDPOP( 430 )
Called from: sample01.prg => (b)SAMPLEPLAN_BUILDPLANNING( 318 )
Called from: tplann.prg => TPLANNING:RBUTTONUP( 1327 )
Called from: => TWINDOW:HANDLEEVENT( 0 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1731 )
Called from: tplann.prg => TPLANNING:HANDLEEVENT( 619 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3356 )
Called from: => WINRUN( 0 )
Called from: .\source\classes\WINDOW.PRG => TWINDOW:ACTIVATE( 1037 )
Called from: sample01.prg => SAMPLEPLAN:NEW( 102 )
Called from: sample01.prg => MAIN( 27 )