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
» un nouveau editeur panobasic
par Jean Claude Aujourd'hui à 10:18

» Compilateur FBPano
par jean_debord Aujourd'hui à 10:07

» Le compilateur.
par Pedro Alvarez Aujourd'hui à 8:36

» COMPILATEUR V 0.9 beta 7 du 10 aout 2017
par Jack Hier à 20:23

» Pb 16 (en analyse): ON_CLOSE plante à l'exécution
par Jack Hier à 20:00

» Pb 15 (en analyse): TIMER_ON plante à l'exécution
par Jack Hier à 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

» A chacun son point de vue
par papydall Mar 8 Aoû 2017 - 17:20

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 | 
 

 JE CLIQUE ,TU CLIQUES ON CLIQUE

Voir le sujet précédent Voir le sujet suivant Aller en bas 
AuteurMessage
sergeauze

avatar

Nombre de messages : 391
Age : 65
Localisation : Hautes Alpes France
Date d'inscription : 09/01/2010

MessageSujet: JE CLIQUE ,TU CLIQUES ON CLIQUE   Mar 4 Mar 2014 - 1:11

Pour  me  detendre

Code:
' je clique

 dim x,y ,xa,ya

  xa=40
  ya=40

  label colore
  picture  10
    width 0 ,1400
    height 0,800
    width 10 ,2000
    height 10,1000



2d_target_is 10
    2d_fill_color 255,0,0
    2d_pen_color  0,0,255
    2d_pen_width   2
 on_click 10,colore
     xa= mouse_x_position(10)
   ya= mouse_y_position(10)
 end
 

colore:
     print_locate 10,10
         xa= mouse_x_position(10)
         ya= mouse_y_position(10)
        for x= xa+10 to xa+75 step 14
         for y= ya+10 to ya+75 step 14

            2d_circle x,y ,5
         next y
         print y
        next x
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://sergeauze.blog-video.tv/
sergeauze

avatar

Nombre de messages : 391
Age : 65
Localisation : Hautes Alpes France
Date d'inscription : 09/01/2010

MessageSujet: Re: JE CLIQUE ,TU CLIQUES ON CLIQUE   Mar 4 Mar 2014 - 3:10

on_click fonctionne et me fait bien appel  au label
Par contre j'avais oublie que   if mouse_right_down(10)=0 then  colore
 d’après mes recherches sur le forum n’enclenche pas le label
le but étant d’éviter de cliquer et d'obtenir le tracé en continu
Scancode non plus  
Bon début de journée à tous
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://sergeauze.blog-video.tv/
sergeauze

avatar

Nombre de messages : 391
Age : 65
Localisation : Hautes Alpes France
Date d'inscription : 09/01/2010

MessageSujet: Re: JE CLIQUE ,TU CLIQUES ON CLIQUE   Sam 22 Mar 2014 - 1:44

salut
complètement inutile......... bien que...
Un form  width  zero garde pas mal de largeur quand même
Manipuler le scroll_bar et ça bouge
On se distrait comme on peut ! Basketball 

Code:
rem  création d'un FORM contenant scroll_bar
 dim a
rem créer un FORM
 width 0,0
' hide  0

  form 1
  form 10
 2d_target_is 10
 2d_circle 30+a,100,25
  left 10,350
   scroll_bar 2
     min 2,0
     max 2,1000
rem scroll_bar 2 appartient à FORM 1

 parent 2,1

rem déclarer un label

label changed


rem chaque fois que le scroll_bar change, exécuter à partir du label "changed"

on_change 2,changed
 2d_circle 30+a,100,25
end : rem le programme principal est fini

changed:
   a=position(2)
top 10,(10+ a)
 width 10, (1+a)
  left 10, 350+a/2
  2d_circle a-a/2,100,25
 wait 200:cls
return
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://sergeauze.blog-video.tv/
Yannick

avatar

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

MessageSujet: re   Sam 22 Mar 2014 - 3:01

lol!
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jicehel

avatar

Nombre de messages : 5849
Age : 45
Localisation : 77500
Date d'inscription : 19/04/2011

MessageSujet: Re: JE CLIQUE ,TU CLIQUES ON CLIQUE   Sam 22 Mar 2014 - 12:39

Je n'ai peut être pas tout compris à ce que tu voulais faire, mais j'ai fais une version légèrement modifiée de ton programme.
Là, je redimensionne la fenêtre et le motif et je la déplace comme tu le faisais en x et en y.
J'ai fais une version car dans la tienne, il y avait un comportement bizarre au démarrage et je n'ai pas compris pourquoi tu effaçais la fenêtre après 200 ms.
Code:
rem  création d'un FORM contenant scroll_bar

label changed : ' Label pour gérer l'événement détecté quand on manipule la scroll bar

dim a : ' Valeur de la scroll bar
dim largeur_10%,gauche_10%, hauteur_10% : ' Variable qui géreront les dimensions de la fenêtre 10

' On n'utilise pas la fenêtre principale (0)
hide  0

' Création de la fenêtre contenant le motif à déplacer
largeur_10% = 100 : gauche_10%=350 : hauteur_10% = 150
form 10
left 10,gauche_10% : ' La position initiale de la fenêtre est 350 à gauche
width 10, largeur_10% : ' On initialise la largeur de la fenêtre
height 10, hauteur_10%: ' On initialise la hauteur de la fenêtre
2d_target_is 10

' Création du motif (ici un cercle)
2d_circle 30,100,25

' Création de la fenêtre qui contiendra la scroll bar
form 1

' Création de la scroll bar
scroll_bar 2 : min 2,0 : max 2,1000
parent 2,1 : ' scroll_bar 2 appartient à FORM 1

' Chaque fois que le scroll_bar change, exécuter à partir du label "changed"
on_change 2,changed

' Le programme principal est fini
end


' Procédure de gestion de l'événement "changement sur la scoll bar"
changed:
  2d_target_is 10 : cls : ' On efface la fenêtre
  a=position(2)
  top 10,10+a : left 10, gauche_10%+a : width 10, largeur_10%+a  : height 10, hauteur_10%+ a
'  2d_circle 30,100,25 : ' On redessine le circle pour s'il est effacé par quelque chose (comme la sortie de l'écran)
  2d_circle 30 + a/2,100 + a/2,25+a/2

return


Dernière édition par Jicehel le Sam 22 Mar 2014 - 13:27, édité 1 fois
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
sergeauze

avatar

Nombre de messages : 391
Age : 65
Localisation : Hautes Alpes France
Date d'inscription : 09/01/2010

MessageSujet: Re: JE CLIQUE ,TU CLIQUES ON CLIQUE   Sam 22 Mar 2014 - 13:25

@Jicehel
Mon  code était un peu brouillon et au départ je voulais mettre un objet dans la fenêtre qui bouge
sans trop savoir comment
Tu y a remis de l'ordre et l'a rendu plus fluide
Je vais utiliser ta version
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://sergeauze.blog-video.tv/
Jicehel

avatar

Nombre de messages : 5849
Age : 45
Localisation : 77500
Date d'inscription : 19/04/2011

MessageSujet: Re: JE CLIQUE ,TU CLIQUES ON CLIQUE   Sam 22 Mar 2014 - 13:27

Cool, content que ce soit utile Wink
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
jjn4

avatar

Nombre de messages : 1594
Date d'inscription : 13/09/2009

MessageSujet: +++   Sam 22 Mar 2014 - 15:12

Citation :
JE CLIQUE ,TU CLIQUES ON CLIQUE
Oh, arrêtez de cliquer tous ensemble !
Pour la peine, vous ne copierez
le verbe cliquouiller à l'imparfait du subjonctif !
 alien What a Face alien
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://jjn4.e-monsite.com
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: JE CLIQUE ,TU CLIQUES ON CLIQUE   Sam 22 Mar 2014 - 17:46

Nous les Terriens, nous avons le verbe cliquer dont la conjugaison à l’imparfait du subjonctif est :
Citation :

que je cliquasse
que tu cliquasses
qu'il / qu'elle cliquât
que nous cliquassions
que vous cliquassiez
qu'ils / qu'elles cliquassent

Mais comme les Martiens ne savent que cliquouiller, je doute fort qu’il utilise le subjonctif.
Bah, voila comment devraient-ils s’y prendre :
Citation :

Que je cliquouillasse
Que tu cliquouillasses
Qu’il / qu’elle cliquouillât
Que nous cliquouillassions
Que vous cliquouillassiez
Qu’ils / qu’elles cliquouillassent

C'est vrai qu'on arrête ni le cliquouillement ni le cliquouillage sur Mars.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
jjn4

avatar

Nombre de messages : 1594
Date d'inscription : 13/09/2009

MessageSujet: +++   Sam 22 Mar 2014 - 18:08

Eh oui, d'autant que les martiens cliquent avec leurs pieds
(normal, vu la position)
alors forcément, ça donne un cliquouillement un peu nébuleux.
 Like a Star @ heaven  alien  Like a Star @ heaven
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://jjn4.e-monsite.com
Contenu sponsorisé




MessageSujet: Re: JE CLIQUE ,TU CLIQUES ON CLIQUE   

Revenir en haut Aller en bas
 
JE CLIQUE ,TU CLIQUES ON CLIQUE
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Redirection clique image
» Bruitage lors d'un clique
» Couleur du pseudo insérée lors d'un clique dans le Chat.
» anti-clique droit sur touteS leS pageS
» Clique droit interdit

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 :: Les inutilitaires-
Sauter vers: