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
» COMPILATEUR V 0.9 beta 7 du 10 aout 2017
par Yannick Aujourd'hui à 1:58

» Pb 17 (en analyse): ITEM_SELECT ne fonctionne pas
par Jack Hier à 19:26

» Compilateur FBPano
par Mike Hier à 13:52

» un nouveau editeur panobasic
par Jean Claude Hier à 10:18

» Le compilateur.
par Pedro Alvarez Hier à 8:36

» Pb 16 (en analyse): ON_CLOSE plante à l'exécution
par Jack Mer 16 Aoû 2017 - 20:00

» Pb 15 (en analyse): TIMER_ON plante à l'exécution
par Jack Mer 16 Aoû 2017 - 19:58

» KGF_dll - nouvelles versions
par Yannick Dim 13 Aoû 2017 - 17:35

» probleme d'outil
par Yannick Dim 13 Aoû 2017 - 17:32

» Carte de France des régions
par Yannick Sam 12 Aoû 2017 - 21:33

» Pb 14 (en analyse): PRINT_LOCATE plante à l'exécution
par Jack Ven 11 Aoû 2017 - 22:37

» Petit avertissement [Mots réservés]
par papydall Ven 11 Aoû 2017 - 13:45

» Distances sur plan
par JL35 Jeu 10 Aoû 2017 - 21:29

» Tracé : Triangle, Carrée, Dents de scie, Sinusoïde redressée
par papydall Jeu 10 Aoû 2017 - 14:52

» Troncature dans une image
par JL35 Mer 9 Aoû 2017 - 13:45

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Août 2017
LunMarMerJeuVenSamDim
 123456
78910111213
14151617181920
21222324252627
28293031   
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 : 1739
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 : 10062
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 : 7962
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 : 4989
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 : 1739
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 : 10062
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 : 5501
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/
Laurent (Minibug)

avatar

Nombre de messages : 2353
Age : 50
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
silverman

avatar

Nombre de messages : 464
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 : 1739
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 : 10062
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 : 518
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 32 bits :: Ce qui est en cours ...-
Sauter vers: