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
» Planétarium virtuel.
par Pedro Alvarez Hier à 16:57

» Roues dentées
par jean_debord Hier à 10:40

» Attention arnaque !
par mindstorm Jeu 19 Juil 2018 - 19:18

» Qui fait quoi ?
par silverman Mer 18 Juil 2018 - 15:21

» ITEM_SELECT N,L pour synedit
par silverman Mer 18 Juil 2018 - 15:20

» Boussole
par jean_debord Mer 18 Juil 2018 - 11:06

» Roue à n faces
par Marc Dim 15 Juil 2018 - 22:16

» Exemple d'une nouvelle version d'un GRID
par Jean Claude Ven 13 Juil 2018 - 10:32

» Une simple question
par Oscaribout Sam 7 Juil 2018 - 23:20

» BUG sur l'objet TAB
par Jack Sam 7 Juil 2018 - 21:12

» Monopoly moderne
par jjn4 Sam 7 Juil 2018 - 15:06

» Récapitulatif ludothèque panoramic jjn4
par jjn4 Ven 6 Juil 2018 - 17:41

» Lignes ondulées
par JL35 Ven 6 Juil 2018 - 17:39

» bug off_activate 0 : sans d'effet
par silverman Ven 6 Juil 2018 - 13:02

» Position des objets d'un conteneur dans FBPano et Panoramic
par Navigateur Ven 6 Juil 2018 - 12:59

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Juillet 2018
LunMarMerJeuVenSamDim
      1
2345678
9101112131415
16171819202122
23242526272829
3031     
CalendrierCalendrier

Partagez | 
 

 Position des objets d'un conteneur dans FBPano et Panoramic

Aller en bas 
AuteurMessage
Navigateur

avatar

Nombre de messages : 29
Age : 69
Localisation : Les Clayes-sous-bois 78340
Date d'inscription : 02/09/2016

MessageSujet: Position des objets d'un conteneur dans FBPano et Panoramic   Ven 6 Juil 2018 - 1:48

En Panoramic, comme le montre l'exemple suivant, un objet lié à conteneur a une position relative au conteneur et se déplace évidemment avec lui :

Code:
' En Panoramic la position d'un objet lié à un conteneur
' est relative au conteneur

Dim container_top%, i%, a$
Label _arret
i% = 0

' Form 0
Top 0, 100
Left 0, 100
Width 0, 220
Height 0, 255

' Conteneur
container_top% = 10
Container 10
Caption 10, "   Conteneur du bouton "
Top 10, container_top%
Left 10, 30
Width 10, 140
Height 10, 140

' Bouton du conteneur
Button 20
Parent 20,10
Top 20, 50
Left 20, 30
Caption 20, "Bouton"

' Bouton Arrêt
Button 30
Top 30, 180
Left 30, 30
Width 30, 140
Caption 30, "Cliquer ici pour arrêter"
On_click 30, _arret
      
' Boucle pour déplacer verticalement le conteneur
While 1 > 0
  i% = 1 - i%
  container_top% = 10 + 20*(1 - i%)
  Top 10, container_top%
  Wait 1000
End_while
Terminate

' Pour arrêter le programme
_arret:
  Terminate
Return


En FBPano, un objet lié à un conteneur a une position relative à la fenêtre qui contient le conteneur, mais il se déplace avec lui comme l'illustre le programme suivant :

Code:
' En FBPano la position d'un objet lié à conteneur est relative
' à la fenêtre qui contient le conteneur mais il se déplace avec lui

#Compile -gui
Set_scheme "plastic"

Dim container_top%, i%
i% = 0

' Form 0
Form 0, 100, 100, 210, 225

' Conteneur
container_top% = 10
Container 10, 20, container_top%, 150, 140,, FL_ALIGN_TOP + FL_ALIGN_INSIDE
Caption 10, " Containeur du bouton "
On_timer 10, container_timer
Container_begin 10
 ' Bouton du conteneur
  Button 20, 55, 60, 80, 30
  Caption 20, "Bouton"
Container_end 10

' Bouton Arrêt
Button 30, 25, 185, 150, 25
Caption 30, "Cliquer ici pour arrêter"
On_click 30, arret

Start 0      
End

' Pour arrêter le programme
Sub arret()
  End
End_sub

' Pour déplacer verticalement le containeur
Sub container_timer()  
  i% = 1 - i%
  container_top% = 10 + 20*(1 - i%)
  Set_coord 10, 30, container_top%
  Redraw
  Timer_interval 1
End_sub
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
jean_debord

avatar

Nombre de messages : 817
Age : 63
Localisation : Limoges
Date d'inscription : 21/09/2008

MessageSujet: Re: Position des objets d'un conteneur dans FBPano et Panoramic   Ven 6 Juil 2018 - 9:23

Oui le bouton se déplace avec le conteneur (heureusement !) mais ses coordonnées sont toujours exprimées par rapport à la fenêtre et donc elles changent constamment.

Tu peux t'en rendre compte en modifiant le sous-programme comme suit (et en enlevant le #compile -gui) :

Code:

Sub container_timer()  
  i% = 1 - i%
  container_top% = 10 + 20*(1 - i%)
  Set_coord 10, 30, container_top%
  Redraw
  
  dim x%, y%
  get_coord 20, x, y  ' Coordonnees du bouton du conteneur
  print x, y
  
  Timer_interval 1
End_sub
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://www.unilim.fr/pages_perso/jean.debord/index.htm
Navigateur

avatar

Nombre de messages : 29
Age : 69
Localisation : Les Clayes-sous-bois 78340
Date d'inscription : 02/09/2016

MessageSujet: Re: Position des objets d'un conteneur dans FBPano et Panoramic   Ven 6 Juil 2018 - 12:59

J'ai effectivement vérifié que les coordonnées du bouton changent avec le déplacement du conteneur.

Cette différence de fonctionnement par rapport à Panoramic va peut-être compliquer la réalisation d'un EDI pour les objets FBPabo/FLTK (j'imagine).
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Contenu sponsorisé




MessageSujet: Re: Position des objets d'un conteneur dans FBPano et Panoramic   

Revenir en haut Aller en bas
 
Position des objets d'un conteneur dans FBPano et Panoramic
Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Ajout d'un nouveau type d'objet dans une form Panoramic !
» [resolu] copier/coller un ensemble d'objets
» Modification de la position d'un waypoint dans basecamp (résolu)
» Comment faire pour exporter des objets bibliothèques Dosh sous Artlantis Studio?
» Liens inactifs dans Outlook Express

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: Grands projets réalisés avec Panoramic :: Compilateur FBPANO-
Sauter vers: