Problème avec le message AutoCAD engagé pendant les opérations de commande

[tiziano69]

J'ai le problème suivant, d'un formulaire vb6 à autocad "activedocument.sendcommand "_line" & vbcr", je dessine mes lignes mais à un certain moment, tandis que je suis le suivi des lignes, vb6 me renvoie un message disant que l'application, autocad est engagée, bien sûr, dans autocad je suis toujours traccindo les lignes.

Je peux varier ce temps d'attente, ou suspendre les activités vb6 jusqu'à ce qu'autocad ait terminé ses activités

sous-image privée1_click()
mémoriser_position
Décharge-moi.
set objacad = getobject(, "autocad.application")
appactivate objacad.caption
[Bleep] [Bleep] [Pleurer] [Pleurer] [Pleurer] [Pleurer] [Pleurer] [Pleurer]
activedocument.sendcommand "tavoletta" & vbcr
fin

 

[rpor66]

doevents, suspend l'exécution pour que le système d'exploitation puisse traiter d'autres événements.

avec ce sous-marin vous pouvez faire une pause vba, les secondes peuvent aussi être des dixièmes de seconde.
sous sommeil (seconde en une seule)
start = timer ' définit l'heure de début.
faire pendant que le chronomètre < démarrage + secondes
d'autres processus.
boucle
fin

par l'aide de vba; détecter le statut d'autocad
sous exemple_isquiescent()
' cet exemple obtient l'objet acadstate et vérifie si
autocad est dans un état quiescent.
dim état d'acadé
État de réglage = getacadstate
Si c'est le cas.
Msgbox "l'autocad est quiescent."
♪
msgbox "autocad n'est pas quiescent."
fin si
fin

Au revoir.