problem with autocad message engaged during command operations

[tiziano69]

I have the following problem, from a vb6 form to autocad "activedocument.sendcommand "_line" & vbcr", I draw my lines but at a certain point, while I'm tracking the lines, vb6 returns me a message saying that the application, autocad is engaged, of course, in autocad I'm still traccindo the lines.

I can vary this waiting time, or suspend vb6 activities until autocad has completed its activities

private sub image1_click()
memorize_position
Unload me
set objacad = getobject(, "autocad.application")
appactivate objacad.caption
[Bleep] [Bleep] [Bleep] [Bleep] [Bleep] [Bleep] [Bleep] [Bleep]
activedocument.sendcommand "tavoletta" & vbcr
end

 

[rpor66]

doevents, suspends execution so that the operating system can process other events.

with this sub you can pause vba, seconds can also be tenths of a second.
sub sleep(second as single)
start = timer ' sets the start time.
do while timer < start + seconds
doevents ' passes control to other processes.
loop
end

by vba help; detect autocad status
sub example_isquiescent()
' this example gets the acadstate object and checks to see whether
autocad is in a quiescent state.
dim state as acadé
set state = getacadstate
if you are.
msgbox "autocad is quiescent."
♪
msgbox "autocad is not quiescent."
end if
end

bye