MOUSE_X/Y_POSITION inopérants sur form 0 !

Je viens de m'apercevoir que les fonctions MOUSE_X_POSITION et MOUSE_Y_POSITION retournent systématiquement 0, quelque soit la position du curseur. Si l'on couvre la form 0 par un panel, et si l'on passe ce numéro de panel à ces fonctions, le résultat est correct.

Dans le code ci-dessous, bougez le curseur sur la form. La caption de la form 0 montre "0,0"' suivi de l'heure qui change bien. Maintenant, on active les lignes 4 et 5, et on voit bien les coordonnées de la souris dans la caption de la form 0.

Conclusion: l'objet 0 n'est plus géré par ces fonctions !

Code:

label tick
dim x%, y%, obj%

' panel 10 : full_space 10
' obj% = 10

timer 1 : timer_interval 1,200 : on_timer 1,tick
end


tick:
  x% = mouse_x_position(obj%)
  y% = mouse_y_position(obj%)
  caption 0,str$(x%)+","+str$(y%)+" "+time$
  return

J’avais remarqué ce … comment dire ? ce bug mais je n’ai pas osé le signaler, croyant à une incompétence de ma part !
Maintenant que Klaus le signale, je ne peux que confirmer.

Déplacer la souris.
Pour arrêter, cliquez n'importe où; la dernière ligne terminate provoque un access violation

Code:

dim x%, y%, obj%
full_space 0
 obj% = 10
 form obj% : full_space obj%
 2d_target_is obj%  : caption obj%,"Déplacer la souris <CLICK> pour sortir"
repeat
    x% = mouse_x_position(obj%)
    y% = mouse_y_position(obj%)
    2d_fill_color rnd(255),rnd(255),rnd(255) : 2d_circle x%,y%,rnd(50)
until scancode <> 0
terminate : ' ERREUR Access Violation

Voilà comment éviter la violation d'accès:

Code:

dim x%, y%, obj%
full_space 0
 obj% = 10
 form obj% : full_space obj%
 2d_target_is obj%  : caption obj%,"Déplacer la souris <CLICK> pour sortir"
repeat
    x% = mouse_x_position(obj%)
    y% = mouse_y_position(obj%)
    2d_fill_color rnd(255),rnd(255),rnd(255) : 2d_circle x%,y%,rnd(50)
until scancode <> 0
2d_target_is 0 : delete obj% : ' <=========== ajout ici
terminate : ' ERREUR Access Violation

Mais c'est bien un bug !

Oui Klaus.
On cible le FORM 0, on supprime le FORM 10 pour que TERMINATE veuille bien se comporter gentiment !
Elle (la commande TERMINATE) est sensée détruire (toute seule comme une grande) tous les objets, libérer la mémoire occupée par le programme et arrêter définitivement l’exécution du programme, c’est ce que dit la documentation de Panoramic.

Comme tu l’as bien écrit : c’est un bug.

Oups !
Je n'avait pas vu que tu avais déjà noté ce bug Klaus !

Tu était trop longtemps absent!

Mea culpa !
C'est surtout qu'en testant le prg de minibug, j'ai de suite pensé à cette histoire de hover...
J'ai donc lancé le prog fait à l'origine par DJ Peters et dans mon élan, je n'ai pas eu le réflexe de jeter un coup d'oeil sur les bugs déjà signalés.

@Jack:
concernant ton nouveau sujet

Citation :

Descrition et état du bug 1

auquel on ne peut pas répondre, je voulais juste de signaler que non seulement les fonctions mouse_x/y_position sont concernées, mais également mouse_x/y_left_down ainsi que leur famille !