Bug 3d_delete?

Bonjour JACK Smile

Voici 2 programmes qui utilisent 3d_delete:
Le premier vérifie le bon fonctionnement de 3d_delete.

Code:: full_space 0
scene3d 3:full_space 3:cam_z_position -5
3d_text 199,"ESSAI":3d_scale 199,5,5,5:3d_position 199,5.5,2,5:3d_y_rotate 199,180
3d_cube 200,1:3d_position 200,-5,0,3:3d_color 200,255,0,0
3d_box 201,2,3,0.25:3d_position 201,5,0,3:3d_color 201,0,0,255
pause 2000
3d_delete 200
pause 2000
3d_delete 199
pause 2000
3d_delete 201
pause 2000
terminate

Dans le second programme, si je veux utiliser 3d_delete avec un test tout simple (voir les 3 lignes en rem avec l'apostrophe) j'ai droit au message d'erreur comme quoi l'objet 3d n'existe pas et qu'il n'a pas été créé!
Par contre si je teste avant l'existence de l'objet 3d avec o3d_object_exists là le programme fonctionne normalement et la suppression de l'objet 3d se fait.
Est-ce un comportement normal?

Code:: dim tmp$,tps%,mn%,s%,cs%
label temps
full_space 0
alpha 2:font_name 2,"Lucida Console":font_size 2,50:font_bold 2:top 2,height(0)-120
graph()
timer 09:timer_interval 09,1:on_timer 09,temps
end

temps:
tmp$="TIME: ":tps%=tps%+1:mn%=int(tps%/3600):s%=int(tps%/60)-(mn%*60)
cs%=tps%-((mn%*3600)+(s%*60))
if len(str$(mn%))=2:tmp$=tmp$+str$(mn%)+" : ":else:tmp$=tmp$+"0"+str$(mn%)+" : ":end_if
if len(str$(s%))=2:tmp$=tmp$+str$(s%)+" : ":else:tmp$=tmp$+"0"+str$(s%)+" : ":end_if
if len(str$(cs%))=2:tmp$=tmp$+str$(cs%):else:tmp$=tmp$+"0"+str$(cs%):end_if
caption 2,tmp$
' if s%=3 then 3d_delete 200
' if s%=4 then 3d_delete 201
' if s%=5 then 3d_delete 199
if s%=3 and o3d_object_exists(200)=1 then 3d_delete 200
if s%=4 and o3d_object_exists(201)=1 then 3d_delete 201
if s%=5 and o3d_object_exists(199)=1 then 3d_delete 199
if s%=6 then terminate
return

sub graph()
scene3d 3:full_space 3:height 3,height(0)-150:light_y_position -100000
cam_z_position -5
3d_text 199,"ESSAI":3d_scale 199,5,5,5:3d_position 199,5.5,2,5:3d_y_rotate 199,180
3d_cube 200,1:3d_position 200,-5,0,3:3d_color 200,255,0,0
3d_box 201,2,3,0.25:3d_position 201,5,0,3:3d_color 201,0,0,255
end_sub

Merci d'éclaircir ce mystère...
A+ Wink

C'est normal Bignono, tu as un interval de 1 ms pour ton timer.
Ce qu'il se passe c'est tu fais graph => creation des objets
Le timer arrive a échéance, il supprime les objet mais pendant ce temps, le timer arrive encore à échéance puisque tu ne l'arrète pas donc il relance la suppression alors que les objets n'existent plus (puisque tu ne changes pas non plus la valeur de s%)...

Là j'avoue que je ne comprends pas bien pourquoi tu penses qu'il y a un bug ...

Mal réveillé ce matin Bignono ? J'ai regardé le code rapidos, je suis au boulot, j'espère ne rien avoir manqué ...