We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.
By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.
Already on GitHub? Sign in to your account
These are small code improvements that might make the framework slightly more robust:
src/corelib/fpg_msgqueue.inc procedure fpgInitMsgQueue; after line "uMsgQueueList := TList.Create;" add "uMsgQueueList.Capacity := cMessageQueueSize;"
procedure fpgDeliverMessage replace "msg.Dest.Free" with "FreeAndNil(msg.Dest)"
src/corelib/fpg_main.pas procedure TfpgApplication.RunMessageLoop; reduce timeout from "WaitWindowMessage(2000);" to "WaitWindowMessage(100);"
src/corelib/fpg_widget.pas procedure procedure TfpgWidget.MsgPaint put code between "Canvas.BeginDraw;" and "Canvas.EndDraw" into try...finally
The text was updated successfully, but these errors were encountered:
No branches or pull requests
These are small code improvements that might make the framework slightly more robust:
src/corelib/fpg_msgqueue.inc
procedure fpgInitMsgQueue;
after line "uMsgQueueList := TList.Create;"
add "uMsgQueueList.Capacity := cMessageQueueSize;"
procedure fpgDeliverMessage
replace "msg.Dest.Free"
with "FreeAndNil(msg.Dest)"
src/corelib/fpg_main.pas
procedure TfpgApplication.RunMessageLoop;
reduce timeout from "WaitWindowMessage(2000);"
to "WaitWindowMessage(100);"
src/corelib/fpg_widget.pas
procedure procedure TfpgWidget.MsgPaint
put code between "Canvas.BeginDraw;" and "Canvas.EndDraw" into try...finally
The text was updated successfully, but these errors were encountered: