|
Post by meerkat on Feb 26, 2019 8:19:37 GMT -5
Is fonts allowed in a grid.
Everyone hates grid lock, and this font statement locks it. Only way out in windows is to delete LB5 with the task manager..
dim a$(6,10) for i = 0 to 5 for j = 0 to 9 a$(i,j) = str$(j);"-";str$(i) next j next i
grid #w.grid, a$(), [clicked], 10, 10, 600, 300 'create a grid open "Grid Test" for window as #w ' open the grid #w.grid columnnames("Col1","Col2","Col3","Col4","Col5","Col6") 'label the column hdr #w.grid columnwidths(50,50,50,50,50,50) 'set sizes for columns #w.grid rownames("Row1","Row2","Row3","Row4","Row5","Row6") 'label the rows #w.grid rowlabelwidth(40) 'set sizes for row #w.grid "font arial 14" ' ********** locks LB5 ******************
|
|
|
Post by Brandon Parker on Feb 26, 2019 8:45:22 GMT -5
Surely you meant "Arial"? I'm not certain "Areal" is a common font; at least from what I know. I see that it does crash LB though.... Maybe you cannot currently change the font of the Grid control? That is what it looks like to me... {:0) Brandon Parker
|
|
|
Post by meerkat on Feb 26, 2019 9:46:42 GMT -5
OOPS - That was a typo when I entered that code. I changed the above code.
|
|
|
Post by Rod on Feb 26, 2019 11:29:20 GMT -5
What I get is a "GC" icon at the mouse cursor with a bar above and below that flashes alternately with a dustbin icon. This runs for a second or two then I get "emergency run out of resources" or something similar. This happens as soon as it hits the font line.
|
|
|
Post by donnybowers on Feb 26, 2019 22:15:04 GMT -5
This is kind of funny because the font command worked for me in my "first GUI in LB5" program, but I get basically the same results you're getting with your program here. It appears to be going into some kind of loop.
Here's part of the error code from this grid program (too long to post all of it).
==2019/2/26==22:11:57==BEGIN RUNTIME DIAGNOSTIC DUMP Note: this file stored in VisualWorks #source (UTF-8) encoding
Cause of Dump: Emergency: No Space Left. Smalltalk Version: 'VisualWorks®, Pre-Release 8.3.2 (apr18.3) of April 20, 2018' Object Memory versionId: #[172 40 76 176 83 2 3 4 172 47 76 176] Class creating this dump: ErrorDumper ------------------------------------------------------------ Active Process Process named: 'Unnamed Process' Process priority: 90 Process identity hash: 7830 Context Stack: [1] optimized [] in [] in Process>>interruptWith: [2] optimized [] in Process class>>forBlock:priority:
------------------------------------------------------------ Unhandled Exception: class: LowSpaceInterrupt creator: LowSpaceInterrupt errorString: Emergency: No Space Left. parameter: optimized [] in Process class>>forBlock:priority:
==2019/2/26==22:11:57==END RUNTIME DIAGNOSTIC DUMP
==2019/2/26==22:11:57==BEGIN RUNTIME DIAGNOSTIC DUMP Note: this file stored in VisualWorks #source (UTF-8) encoding
Cause of Dump: Emergency: No Space Left. Smalltalk Version: 'VisualWorks®, Pre-Release 8.3.2 (apr18.3) of April 20, 2018' Object Memory versionId: #[172 40 76 176 83 2 3 4 172 47 76 176] Class creating this dump: ErrorDumper ------------------------------------------------------------ Active Process Process named: 'Unnamed Process' Process priority: 50 Process identity hash: 1571 Context Stack: [1] optimized [] in [] in Process>>interruptWith: [2] LBGrid(LBWidget)>>writeItem:cr: [3] LBGrid(LBWidget)>>writeItem: [4] LBGrid(LBWidget)>>writeItem:cr: [5] LBGrid(LBWidget)>>writeItem: [6] LBGrid(LBWidget)>>writeItem:cr: [7] LBGrid(LBWidget)>>writeItem: [8] LBGrid(LBWidget)>>writeItem:cr: [9] LBGrid(LBWidget)>>writeItem: [10] LBGrid(LBWidget)>>writeItem:cr: [11] LBGrid(LBWidget)>>writeItem: [12] LBGrid(LBWidget)>>writeItem:cr: [13] LBGrid(LBWidget)>>writeItem:
+--------------------------------------+ | etc. etc. it continues to loop this. | +--------------------------------------+ | CONTINUED AT END OF ERROR FILE | +--------------------------------------+
[5199163] LBGrid(LBWidget)>>writeItem: [5199164] LBGrid(LBWidget)>>writeItem:cr: [5199165] LBGrid(LBWidget)>>writeItem: [5199166] LBGrid(LBWidget)>>writeItem:cr: [5199167] LBGrid(LBWidget)>>writeItemCr: [5199168] PrintHandleFrame>>animate: [5199169] optimized [] in [] in Director>>direct: [5199170] OrderedCollection>>do: [5199171] optimized [] in Director>>direct: [5199172] BlockClosure>>on:do: [5199173] ProgramDirector(Director)>>direct: [5199174] ProgramDirector>>direct: [5199175] ProgramDirector(Director)>>for:direct: [5199176] ProgramDirector>>for:direct: [5199177] Program>>runWithDirector: [5199178] optimized [] in Program>>runForked [5199179] BlockClosure>>on:do: [5199180] optimized [] in Process class>>forBlock:priority:
------------------------------------------------------------ Unhandled Exception: class: LowSpaceInterrupt creator: LowSpaceInterrupt errorString: Emergency: No Space Left. parameter: LBGrid(LBWidget)>>writeItem:cr:
==2019/2/26==22:11:57==END RUNTIME DIAGNOSTIC DUMP
==2019/2/26==22:11:58==BEGIN RUNTIME DIAGNOSTIC DUMP Note: this file stored in VisualWorks #source (UTF-8) encoding
Cause of Dump: Emergency: No Space Left. Smalltalk Version: 'VisualWorks®, Pre-Release 8.3.2 (apr18.3) of April 20, 2018' Object Memory versionId: #[172 40 76 176 83 2 3 4 172 47 76 176] Class creating this dump: ErrorDumper ------------------------------------------------------------ Active Process Process named: 'BasicScheduledWindow' Process priority: 50 Process identity hash: 11696 Context Stack: [1] optimized [] in [] in Process>>interruptWith: [2] Process>>yield [3] ProcessorScheduler>>yield [4] WindowManager>>processNextEvent [5] optimized [] in [] in WindowManager>>newProcess [6] BlockClosure>>on:do: [7] optimized [] in WindowManager>>newProcess [8] BlockClosure>>on:do: [9] optimized [] in Process class>>forBlock:priority:
------------------------------------------------------------ Unhandled Exception: class: LowSpaceInterrupt creator: LowSpaceInterrupt errorString: Emergency: No Space Left. parameter: WindowManager>>processNextEvent
==2019/2/26==22:11:58==END RUNTIME DIAGNOSTIC DUMP
==2019/2/26==22:11:58==BEGIN RUNTIME DIAGNOSTIC DUMP Note: this file stored in VisualWorks #source (UTF-8) encoding
Cause of Dump: Emergency: No Space Left. Smalltalk Version: 'VisualWorks®, Pre-Release 8.3.2 (apr18.3) of April 20, 2018' Object Memory versionId: #[172 40 76 176 83 2 3 4 172 47 76 176] Class creating this dump: ErrorDumper ------------------------------------------------------------ Active Process Process named: 'Liberty BASIC v5.0' Process priority: 50 Process identity hash: 5437 Context Stack: [1] optimized [] in [] in Process>>interruptWith: [2] Process>>yield [3] ProcessorScheduler>>yield [4] WindowManager>>processNextEvent [5] optimized [] in [] in WindowManager>>newProcess [6] BlockClosure>>on:do: [7] optimized [] in WindowManager>>newProcess [8] BlockClosure>>on:do: [9] optimized [] in Process class>>forBlock:priority:
------------------------------------------------------------ Unhandled Exception: class: LowSpaceInterrupt creator: LowSpaceInterrupt errorString: Emergency: No Space Left. parameter: WindowManager>>processNextEvent
==2019/2/26==22:11:58==END RUNTIME DIAGNOSTIC DUMP
==2019/2/26==22:11:58==BEGIN RUNTIME DIAGNOSTIC DUMP Note: this file stored in VisualWorks #source (UTF-8) encoding
Cause of Dump: Emergency: No Space Left. Smalltalk Version: 'VisualWorks®, Pre-Release 8.3.2 (apr18.3) of April 20, 2018' Object Memory versionId: #[172 40 76 176 83 2 3 4 172 47 76 176] Class creating this dump: ErrorDumper ------------------------------------------------------------ Active Process Process named: 'Cursor Animation' Process priority: 50 Process identity hash: 15562 Context Stack: [1] optimized [] in [] in Process>>interruptWith: [2] Process>>suspend [3] optimized [] in DocumentView class>>unboundMethod [4] BlockClosure>>on:do: [5] optimized [] in Process class>>forBlock:priority:
------------------------------------------------------------ Unhandled Exception: class: LowSpaceInterrupt creator: LowSpaceInterrupt errorString: Emergency: No Space Left. parameter: BlockClosure>>on:do:
==2019/2/26==22:11:58==END RUNTIME DIAGNOSTIC DUMP
==2019/2/26==22:11:58==BEGIN RUNTIME DIAGNOSTIC DUMP Note: this file stored in VisualWorks #source (UTF-8) encoding
Cause of Dump: Emergency: No Space Left. Smalltalk Version: 'VisualWorks®, Pre-Release 8.3.2 (apr18.3) of April 20, 2018' Object Memory versionId: #[172 40 76 176 83 2 3 4 172 47 76 176] Class creating this dump: ErrorDumper ------------------------------------------------------------ Active Process Process named: 'Unnamed Process' Process priority: 29 Process identity hash: 9303 Context Stack: [1] optimized [] in [] in Process>>interruptWith: [2] optimized [] in Process class>>forBlock:priority:
------------------------------------------------------------ Unhandled Exception: class: LowSpaceInterrupt creator: LowSpaceInterrupt errorString: Emergency: No Space Left. parameter: optimized [] in Process class>>forBlock:priority:
==2019/2/26==22:11:58==END RUNTIME DIAGNOSTIC DUMP
==2019/2/26==22:11:58==BEGIN RUNTIME DIAGNOSTIC DUMP Note: this file stored in VisualWorks #source (UTF-8) encoding
Cause of Dump: Emergency: No Space Left. Smalltalk Version: 'VisualWorks®, Pre-Release 8.3.2 (apr18.3) of April 20, 2018' Object Memory versionId: #[172 40 76 176 83 2 3 4 172 47 76 176] Class creating this dump: ErrorDumper ------------------------------------------------------------ Active Process Process named: 'Unnamed Process' Process priority: 29 Process identity hash: 3044 Context Stack: [1] optimized [] in [] in Process>>interruptWith: [2] Semaphore>>wait [3] Delay>>wait [4] optimized [] in BASICCodeEditor>>colorizeTextOn: [5] BlockClosure>>on:do: [6] optimized [] in Process class>>forBlock:priority:
------------------------------------------------------------ Unhandled Exception: class: LowSpaceInterrupt creator: LowSpaceInterrupt errorString: Emergency: No Space Left. parameter: optimized [] in BASICCodeEditor>>colorizeTextOn:
==2019/2/26==22:11:58==END RUNTIME DIAGNOSTIC DUMP
==2019/2/26==22:11:58==BEGIN RUNTIME DIAGNOSTIC DUMP Note: this file stored in VisualWorks #source (UTF-8) encoding
Cause of Dump: Emergency: No Space Left. Smalltalk Version: 'VisualWorks®, Pre-Release 8.3.2 (apr18.3) of April 20, 2018' Object Memory versionId: #[172 40 76 176 83 2 3 4 172 47 76 176] Class creating this dump: ErrorDumper ------------------------------------------------------------ Active Process Process named: 'Unnamed Process' Process priority: 29 Process identity hash: 13169 Context Stack: [1] optimized [] in [] in Process>>interruptWith: [2] Semaphore>>wait [3] Delay>>wait [4] optimized [] in BASICCodeEditor>>colorizeTextOn: [5] BlockClosure>>on:do: [6] optimized [] in Process class>>forBlock:priority:
------------------------------------------------------------ Unhandled Exception: class: LowSpaceInterrupt creator: LowSpaceInterrupt errorString: Emergency: No Space Left. parameter: optimized [] in BASICCodeEditor>>colorizeTextOn:
==2019/2/26==22:11:58==END RUNTIME DIAGNOSTIC DUMP
|
|
|
Post by Chris Iverson on Feb 26, 2019 22:46:04 GMT -5
Hah, nice. It runs out of memory, throws an out-of-memory exception, the exception handler tries to allocate memory, fails, and throws again. Infinite loop.
Exception up = new OutOfMemoryException(); throw up;
|
|
|
Post by donnybowers on Feb 27, 2019 2:09:41 GMT -5
Chris shared this: Exception up = new OutOfMemoryException(); throw up;
Yep. That's what it makes you want to do--> throw up; Thank you for sharing that.
|
|