diff options
Diffstat (limited to 'src/corelib/fpg_msgqueue.inc')
| -rw-r--r-- | src/corelib/fpg_msgqueue.inc | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/corelib/fpg_msgqueue.inc b/src/corelib/fpg_msgqueue.inc index b78eadef..80e0be96 100644 --- a/src/corelib/fpg_msgqueue.inc +++ b/src/corelib/fpg_msgqueue.inc @@ -129,7 +129,7 @@ begin p^.Params := aparams; end else - Writeln('THE MESSAGE QUEUE IS FULL.'); + raise Exception.Create('THE fpGUI MESSAGE QUEUE IS FULL.'); finally fpgApplication.Unlock; end; @@ -153,7 +153,7 @@ begin p^.Stop := False; end else - Writeln('THE MESSAGE QUEUE IS FULL.'); + raise Exception.Create('THE fpGUI MESSAGE QUEUE IS FULL.'); finally fpgApplication.Unlock; end; |