FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  GroupesGroupes  Connexion  
Derniers sujets
» GRID_LOAD
par Jean Claude Aujourd'hui à 21:04

» Rotation d'une image d'un angle quelconque
par Jean Claude Aujourd'hui à 20:57

» HVIEWER
par Yannick Aujourd'hui à 20:31

» StratégoV8 et V9
par Jean Claude Aujourd'hui à 20:13

» KGF_dll - nouvelles versions
par Klaus Hier à 21:28

» Déformation d'image en trapèze
par mindstorm Hier à 21:06

» Mah-Jong américain
par Jean Claude Lun 15 Jan 2018 - 19:37

» Problème avec Deepl
par Klaus Lun 15 Jan 2018 - 0:34

» Quelques nouvelles ...
par Jean Claude Ven 12 Jan 2018 - 22:40

» Renommer les instructions ITEM_... ?
par Jicehel Ven 12 Jan 2018 - 18:56

» Ludothèque Panoramic
par jjn4 Ven 12 Jan 2018 - 18:11

» sous-programmes et fonctions
par Jack Ven 12 Jan 2018 - 17:51

» Mah-Jong français
par Jean Claude Jeu 11 Jan 2018 - 22:15

» panoramic 0.9.28
par gigi75 Ven 5 Jan 2018 - 14:06

» Un jeu qui va vous énerver!
par Jean Claude Jeu 4 Jan 2018 - 22:05

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Janvier 2018
LunMarMerJeuVenSamDim
1234567
891011121314
15161718192021
22232425262728
293031    
CalendrierCalendrier

Partagez | 
 

 Version instantanée V 0.9.28i12 du 08/07/2017

Voir le sujet précédent Voir le sujet suivant Aller en bas 
AuteurMessage
Jack
Admin
avatar

Nombre de messages : 1779
Date d'inscription : 28/05/2007

MessageSujet: Version instantanée V 0.9.28i12 du 08/07/2017    Sam 1 Juil 2017 - 17:34

Cette version instantanée V 0.9.28i11 du 01/07/2017 :

- corrige les bugs rencontrés sur USER_EVENT_LPARAM et USER_EVENT_WPARAM

- permet d'utiliser les objets suivants (qui sont considérés comme terminés):
LED1
SWITCH1
DIGIT1
OPEN_DIALOG_PIC
SAVE_DIALOG_PIC
MAIN_MENU_POP

_________________
username : panoramic@jack-panoramic password : panoramic123


Dernière édition par Jack le Sam 8 Juil 2017 - 17:30, édité 1 fois
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://panoramic.free-boards.net
Klaus

avatar

Nombre de messages : 10413
Age : 68
Localisation : Ile de France
Date d'inscription : 29/12/2009

MessageSujet: Re: Version instantanée V 0.9.28i12 du 08/07/2017    Sam 1 Juil 2017 - 18:11

Jack, j'ai téléchargé et installé cette version. Je me suis surtout intéressé au USER_EVENT. Et mon constat est:

Ca marche parfaitement !

Enfin, presque... Le décalage a disparu, mais l'inversion entre WPARAM et LPARAM persiste.

Dans ma DLL, je fais ceci:
Code:
const
  UserEventImageView = $03000000;         // identifiant dans WParam
  UserEvent_ImageView_Select = $00010000;  // on a sélectionné une image (ajouter l'indice dans es 16 bits à droite)
...
// "ind" est un indice dont je veux récupérer la valeur dans LPARAM
      SendMessage(MainFormHandle,CM_PANORAMIC_USER,UserEventImageView,UserEvent_ImageView_Select or ind);

Voilà la définition de SEND_MESSAGE dans MSDN:
Code:
LRESULT WINAPI SendMessage(
  _In_ HWND   hWnd,
  _In_ UINT   Msg,
  _In_ WPARAM wParam,
  _In_ LPARAM lParam
);
WPARAM est donc bien le 3ème paramètre du API, et LPARAM le 4ème. Or, dans l'évèment Panoramic, voici ce que je fais pour l'intercepter;
Code:
label UserEvent
ON_USER_EVENT UserEvent
...
' dans la routine suivante, je dois intervertir WPARAM et LPARAM !
UserEvent:
  if User_Event_LParam<>hex("03000000") then return : ' pas ImageView ?
  if bin_and(User_Event_WParam,hex("FFFF0000"))<>hex("00010000") then return : ' pas ImageSelect ?
  ind% = bin_and(User_Event_WParam,hex("0000FFFF"))
  ' ici, on affiche les deux variables système:
   message "WPARAM="+hex$(User_Event_WParam)+"   "+"LPARAM="+hex$(User_Event_LParam)
  nom$ = string$(255," ")
  res% = dll_call3("GetImageViewFileName",IV%,ind%,adr(nom$))
  nom$ = trim$(nom$)
  message "indice="+str$(ind%)+"  "+nom$
  return
Et voici le message affiché par le code ci-dessus:

pour un clic sur l'icône 26. On voit parfaitement l'inversion des valeurs des deux variables système.

En résumé:
- décalage sur le déclenchement de l'évèmenent ==> résolu
- inversion des variables système ==> non résolu
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
Yannick

avatar

Nombre de messages : 8011
Age : 46
Localisation : Bretagne
Date d'inscription : 15/02/2010

MessageSujet: re   Sam 1 Juil 2017 - 18:13

cheers  Je prends !
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jean Claude

avatar

Nombre de messages : 5127
Age : 63
Localisation : 83 Var
Date d'inscription : 07/05/2009

MessageSujet: Re: Version instantanée V 0.9.28i12 du 08/07/2017    Sam 1 Juil 2017 - 18:16

Merci Jack,

Je viens de télécharger, reste à tester.

A+
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jack
Admin
avatar

Nombre de messages : 1779
Date d'inscription : 28/05/2007

MessageSujet: Re: Version instantanée V 0.9.28i12 du 08/07/2017    Sam 1 Juil 2017 - 18:56

Klaus a écrit:
mais l'inversion entre WPARAM et LPARAM persiste

Oups !
Je n'ai pas corrigé ce bug...
... car je l'avais complètement oublié.

Ce bug n' était pas mentionné dans la To-Do-List...

_________________
username : panoramic@jack-panoramic password : panoramic123
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://panoramic.free-boards.net
Klaus

avatar

Nombre de messages : 10413
Age : 68
Localisation : Ile de France
Date d'inscription : 29/12/2009

MessageSujet: Re: Version instantanée V 0.9.28i12 du 08/07/2017    Sam 1 Juil 2017 - 19:09

Pas grave - il n'y a pas d'urgence. Puisque tu es au courant maintenant, on attendra. Pour le moment, il suffit d'inverser les varables dans le code Panoramic (ou dans la DLL) pour que les tests puissent avancer.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
papydall

avatar

Nombre de messages : 5623
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: Version instantanée V 0.9.28i12 du 08/07/2017    Sam 1 Juil 2017 - 19:09

Code:

rem ============================================================================
rem         TEST DE LA VERSION V.0.9.28i11
rem ============================================================================
dim i
width 0,800

for i = 1 to 5
    led1 i : top i,50 : left i,50*i : ' Créer des LED
next i

for i = 1 to 5
    mark_on i : pause 1000
    mark_off i
next i
for i = 10 to 19
    digit1 i : top i,100 : left i, 60*(i-9) : ' Créer des DIGIT
    caption i,i-10
next i

switch1 20 : top 20,200 : left 20,100  : ' Créer un SWITCH
shape 30   : top 30,200 : left 30,200  : ' Créer un SHAPE

rem ============================================================================


Si je clique (droit ou gauche) sur l’un des  DIGIT ou sur le SWITCH, j’obtiens le message d’erreur
PANORAMIC_TEMP a cessé de fonctionner puis

Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Minibug

avatar

Nombre de messages : 2480
Age : 51
Localisation : Vienne (86)
Date d'inscription : 10/02/2012

MessageSujet: Re: Version instantanée V 0.9.28i12 du 08/07/2017    Sam 1 Juil 2017 - 20:01

C'est chargé, y a plus qu'a tester !

Merci jack Wink

@Papydall et Jack :
Effectivement, il y a un problème avec le code ou les nouveaux objets.
J'ai tenté différentes modifications et toujours les même soucis... Suspect
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://gpp.panoramic.free.fr
silverman

avatar

Nombre de messages : 483
Age : 45
Localisation : Picardie
Date d'inscription : 19/03/2015

MessageSujet: Re: Version instantanée V 0.9.28i12 du 08/07/2017    Lun 3 Juil 2017 - 18:53

Je ne vois pas de difference avec la version i10 pour 'main_menu_pop', il ne fonctionne que pour le form 0
Code:
form 5
command_target_is 5

main_menu_pop 1
sub_menu 2
parent 2,1
caption 2,"Fichier"

Pour les digit/switch, avec ou sans event, idem papydall "erreur externe ligne 29, violation d'accès...", avec parfois un autre message message "label defined twice at line 7"
Code:
rem ============================================================================
rem         TEST DE LA VERSION V.0.9.28i11
rem ============================================================================
dim i
width 0,800
label clic

for i = 1 to 5
    led1 i : top i,50 : left i,50*i : ' Créer des LED
    '
next i

for i = 1 to 5
    mark_on i : pause 100
    mark_off i
next i
for i = 10 to 19
    digit1 i : top i,100 : left i, 60*(i-9) : ' Créer des DIGIT
     on_click i,clic
    caption i,i-10
next i

switch1 20 : top 20,200 : left 20,100  : ' Créer un SWITCH
 on_click 20,clic
shape 30   : top 30,200 : left 30,200  : ' Créer un SHAPE
'


END
clic:
   caption 0,str$(number_click)
return

Les 'open/save_dialog_pic' fonctionnent parfaitement, ces nouvelles commandes sont vraiment top! Smile
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jack
Admin
avatar

Nombre de messages : 1779
Date d'inscription : 28/05/2007

MessageSujet: Re: Version instantanée V 0.9.28i12 du 08/07/2017    Sam 8 Juil 2017 - 17:40

Une nouvelle version instantanée V 0.9.28i12 du 08/07/2017 est disponible au téléchargement.

- elle corrige l'inversion des valeurs de USER_EVENT_LPARAM et USER_EVENT_WPARAM

- elle corrige un problème d'événement sur les objets SWITCH1 et DIGIT1

L'objet SWITCH1 est allumé par défaut et affiche les valeurs 0 ou 1 suivant qu'il est éteint ou allumé.
On peut modifier l'affichage de l'état allumé par CAPTION N,V$
et à la fois pour l'état allumé et éteint en séparant les deux valeurs par | (pipe)
On peut lire son état par CHECKED(N)
Lorsqu'on clique dessus, il réagit à l'événement ON_CLICK

Voici un exemple d'utilisation :
Code:
label affiche

switch1 1
top 1,150:left 1,200:width 1,210:height 1,100
caption 1, "***ON***|***OFF***"
on_click 1,affiche
end

affiche:
print "état de SWITCH1 : "+str$(CHECKED(1))
return

_________________
username : panoramic@jack-panoramic password : panoramic123
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://panoramic.free-boards.net
Klaus

avatar

Nombre de messages : 10413
Age : 68
Localisation : Ile de France
Date d'inscription : 29/12/2009

MessageSujet: Re: Version instantanée V 0.9.28i12 du 08/07/2017    Sam 8 Juil 2017 - 23:06

Merci beaucoup, Jack ! L'inversion des paramètres est résolué, et le USER_EVENT est parfaitement opérationnel ! Je m'emploie à l'exploiter à fond !
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
pascal10000

avatar

Nombre de messages : 666
Localisation : Troyes
Date d'inscription : 05/02/2011

MessageSujet: Re: Version instantanée V 0.9.28i12 du 08/07/2017    Sam 5 Aoû 2017 - 12:37

bonjour a tous
Peut être mal suivi l'évolution de panoramic
mais quel est la fonction d'un chape et d'un chart
Jack peut tu mettre une p'tite démo pour ces deux objets

Merci pour vos explication et bon week end
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Contenu sponsorisé




MessageSujet: Re: Version instantanée V 0.9.28i12 du 08/07/2017    

Revenir en haut Aller en bas
 
Version instantanée V 0.9.28i12 du 08/07/2017
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» version instantanée du 22 mai 2010: redimensionner SPRITE
» PANORAMIC_IDE: version instantanée du 25 septembre 2010
» Version instantanée 26 septembre 2014 : PANORAMIC V 0.9.26i2
» Version instantanée du 7 janvier 2015 : PANORAMIC V 0.9.26i5
» PANORAMIC_IDE: version instantanée du 20 septembre 2010

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC :: Ce qui est en cours ...-
Sauter vers: