 |
| Rebgui et table probleme de taille table et d'entete de colonne | |
| sebastien | 2-Feb-2009/14:09:34+1:00 |
| bonjour j'ai decide d'utiliser Rebgui et sa fonctionnabilite table pour effectuer l'affichage de mes données mais je rencontre 2 problemes le premier je desire qu'a l'affichage mes colonnes garde leur taille quelque soit leur nombre pour cela j'utilise un scroll-panel qui permet de naviguer verticalement mais je n'arrive pas à effectuer la modification de la taille de ma table autre probleme le titre des colonnes et détermine par une fonction (ici le for) l'insertion de la position du texte (center , rigth ou left ) me pose quelque souci (et malheuresement il est obligatoire voici mon code merci de votre aide #!/usr/bin/rebol REBOL [] do %rebgui.r colonnes: ["index" center .2 "C1" center .2 "C2" center .2 "C3" center .2 "C4" center .2 "C5" center .2 ] tailletable: 210x40 lgcpt: 6 fonctcreationcol: func[][ propcol: 0.1 for i 1 10 1 [ entetecol: join "C" i entetecol: join entetecol " " entetecol: join entetecol 'center entetecol: join entetecol " " entetecol: join entetecol propcol append colonnes entetecol] lgcpt: 10 ] fonctmajcolonne: func[][ table-ligne/remove-row lgcpt tailletable: 400x40 table-ligne [tailletable] table-ligne/set-columns colonnes show table-ligne ] display/position/close "import" [scroll-panel 210x25 data [ table-ligne: table tailletable options colonnes ] return bt__import: button "changement colonne" 30x5 [fonctcreationcol fonctmajcolonne ] bt__quitter: button "Quitter" 20x5 [ if (question "Confirmez-vous la fermeture du programme?")[quit]][] ] 'center [question "Confirmez-vous la fermeture du programme?"] do-events | |
| sebastien | 2-Feb-2009/17:45:31+1:00 |
| j'ai resolue le probleme avec le center c'est le join qui en ete la cause j'ai maintenant for i 1 10 1 [ append colonnes join "C" i append colonnes 'center append colonnes propcol lgcpt: 10 ] cela fonction tres bien mais j'ai toujours le probleme pour modifier la taille du tableau | |
| sebastien | 11-Feb-2009/10:22:03+1:00 |
| le problème ne provenais pas de la modification de la taille de mon tableau mais surement d'un bug avec le scroll-panel effectivement si mon tableau est à l'origine de la meme taille que le scroll-panel si j'agrandis mon tableau le scroll-panel n'ajoute pas les barre ascenseur et defilement parcontre si dès l'origine j'ai un tableau plus grand et que les barre sont déjà présente cela fonctionne correctement voici le code #!/usr/bin/rebol REBOL [] do %rebgui.r colonnes: ["index" center .2 "C1" center .2 "C2" center .2 "C3" center .2 "C4" center .2 "C5" center .2 ] tailletable: 250x40 lgcpt: 6 fonctcreationcol: func[][ propcol: 0.1 for i 1 10 1 [ append colonnes join "C" i append colonnes 'center append colonnes propcol lgcpt: 10 ] fonctmajcolonne: func[][ table-ligne/remove-row lgcpt table-ligne/size/1: 400 table-ligne/size/2: 50 show table-ligne ] display/position/close "import" [scroll-panel 210x25 data [ table-ligne: table tailletable options colonnes ] return bt__import: button "changement colonne" 30x5 [fonctcreationcol fonctmajcolonne ] bt__quitter: button "Quitter" 20x5 [ if (question "Confirmez-vous la fermeture du programme?")[quit]][] ] 'center [question "Confirmez-vous la fermeture du programme?"] do-events | |
|
Login required to Post. | |