Ah, thank you. It is, though - it's the very next routine after this AutoShutDown.
Private Sub TimerProc(ByVal hWnd As Long, ByVal uMsg As Long, ByVal idEvent As Long, ByVal dwTime As Long)
ShutDownGDIP
End Sub
One of the things I've tried is changing the parameters here to LongPtr and...