Step-by-step through an automated drawing sequence
Posted: Wed Jul 08, 2020 7:07 pm
Basically, my program is taking 3D coordinates and drawing a 2D shape on a canvas from them, using the Vector Lib. No two sets of data are the same.
I want to observe the 2D drawing being drawn. If I use debugger break-points, nothing is displayed until the whole shape is drawn. So, I thought - use a macro for that instead, but the issue is the same.
Snippet:
Any ideas?
I want to observe the 2D drawing being drawn. If I use debugger break-points, nothing is displayed until the whole shape is drawn. So, I thought - use a macro for that instead, but the issue is the same.
Code: Select all
Macro QaNextDrg
;#-------------
InvalidateRect_(GadgetID(#CnvDrawing),#Null, #True)
While WindowEvent() : Wend
MessageRequester("Next", "Next")
EndMacroCode: Select all
AddPathCircle(ptStart1\x, ptStart1\y, 3, 0, 360, #PB_Path_Default)
VectorSourceColor(RGBA(255, 0, 0, 255))
StrokePath(4)
QaNextDrg
AddPathCircle(ptEnd1\x, ptEnd1\y, 3, 0, 360, #PB_Path_Default)
VectorSourceColor(RGBA(0, 0, 255, 255))
StrokePath(4)
QaNextDrg
