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
» 3D_LINE How to ?
par papydall Aujourd'hui à 6:51

» mise a jour calculatrice
par joeeee2017 Hier à 23:00

» supprimé
par joeeee2017 Dim 15 Oct 2017 - 20:02

» calculatrice avec touches movibles
par joeeee2017 Dim 15 Oct 2017 - 1:11

» Convertisseur de base 10 de 2 à 36
par gigi75 Sam 14 Oct 2017 - 21:54

» CORTANA
par gigi75 Sam 14 Oct 2017 - 16:32

» supprimé
par Jean Claude Sam 14 Oct 2017 - 12:30

» Compilateur FBPano
par jean_debord Jeu 12 Oct 2017 - 9:53

» KGF_dll - nouvelles versions
par Klaus Mar 10 Oct 2017 - 18:49

» à propos de Panoramic_Editor [Résolu]
par Klaus Mar 10 Oct 2017 - 3:19

» Un petit "coucou" à tous les Panoramiciens !
par Jack Ven 6 Oct 2017 - 10:24

» Pourquoi le compilateur stagne
par mindstorm Mer 4 Oct 2017 - 20:38

» Panoramic ?
par Marc37 Mer 4 Oct 2017 - 0:39

» Premiers pas avec Arduino
par Marc37 Mer 4 Oct 2017 - 0:29

» Mise à jour PANOMAND
par jean_debord Mar 26 Sep 2017 - 11:33

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Octobre 2017
LunMarMerJeuVenSamDim
      1
2345678
9101112131415
16171819202122
23242526272829
3031     
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 : 7994
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 : 5857
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 : 5857
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 : 1601
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 : 5537
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 : 1601
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
-
» [résolu]Plusieurs soucis très gênants!!
» [résolu] Lien dans image survolée vers page html
» [Résolu] mettre un lien ?
» S. Demande de mise en page - Site du forum
» Diaporama photos

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC :: Les inutilitaires-
Sauter vers: