 12 | |||
| Auteur | Messages | ||
|---|---|---|---|
| gambix | #16 Posté le 14/10/2011 à 23:46:07 | ||
Faire simple ! | regarde dans la forge  : http://gambasforge.org/code-42-dessin-vectoriel-utilisation-du-modele-donneesvues.html Moins de texte dans une signature c'est agrandir son espace. | ||
| gambix | #17 Posté le 14/10/2011 à 23:47:28 | ||
| Faire simple ! | regarde dans la forge : http://gambasforge.org/code-42-dessin-vectoriel-utilisation-du-modele-donneesvues.html Moins de texte dans une signature c'est agrandir son espace. | ||
| lapenduledargent | #18 Posté le 15/10/2011 à 09:09:29 | ||
 | Bonjour Gambix, Magnifique l'exemple  Et en à peine une heure...J'ai des gros progrès à faire.Je regarde à ça ce soir et demain. Je reviens pour vous donner mes impressions, mes questions. Merci et bonne journée à tous Pierre | ||
| gambix | #19 Posté le 15/10/2011 à 11:09:22 | ||
| Faire simple ! | Vérifie que tu as bien pris la dernière version... je viens de mettre a jour avec l'aide Moins de texte dans une signature c'est agrandir son espace. | ||
| lapenduledargent | #20 Posté le 16/10/2011 à 12:06:13 | ||
| Bonjour Gambis, Je décortique ton code, du moins j'essaie... Tu es d'un fameux niveau, autodidacte ? Bon j'y vais... Donc les données sont placées dans le tableau $aShapes. Lors de l'évènement GridView1_MouseUp() 'On sélectionne l'objet Lors de la sélection d'une entrée dans le GridView1, je voudrai afficher dans une fenêtre "Donnee" les entrées de $aShapes pour pouvoir les modifier par la suite. J'ai donc fait une variable qui reprends la position de la sélection PositionTableau = $iCurShape Dans le formulaire Donnee, j'ai placé : TextBox1.Text = FMain.$aShapes[FMain.PositionTableau] Mais voilà ça bloque et moi aussi  A bientôt Pierre | ||
| gambix | #21 Posté le 16/10/2011 à 13:54:10 | ||
| Faire simple ! | Bon ben t'est pas loin $ashape contien des objets, faut pas l'oublier. Donc tu doit faire Public sub FillProperties() LblType.Text = $aType[$aShapes[$iCurShape].Type] txtX.Text = $aShape[$iCurShape].X txtX2.Text = $aShape[$iCurShape].Y txtX2.Text = $aShape[$iCurShape].X2 txtY2.Text = $aShape[$iCurShape].Y2 end tu met ça après cette ligne dans mouse down 'On selectionne l'entrée dans le gridview GridView1.Rows[$iCurShape].Selected = True FillProperties Je suis autodidacte... mais je dévelloppe en gambas depuis 10 ans :).. Certainement après Benoit un des plus vieux dev en gb  Moins de texte dans une signature c'est agrandir son espace. | ||
| gambix | #22 Posté le 16/10/2011 à 18:41:38 | ||
| Faire simple ! | Bon ben voila tu l'auras voulu éditeur, sélecteur, poignée, ya la totale ... enfin presque la structure de bas n'est pas la meilleur il aurait fallu passer par des classes héritant de shape , un peu comme je fais pour gb.report J'ai mis le code a jour avec une dédicace pour toi Moins de texte dans une signature c'est agrandir son espace. | ||
| lapenduledargent | #23 Posté le 16/10/2011 à 19:22:54 | ||
| Bonsoir Fabien, Alors que j'ai commencé à essayer ton code, et zoup un nouveau !!! Encore merci  Bon, je vais l'éplucher... Bonne soirée Pierre | ||
| lapenduledargent | #24 Posté le 19/10/2011 à 20:32:44 | ||
| Bonsoir Gambix, J'avance et je pense avoir presque tout compris. J'ai ajouté dans la classe CShape une variable qui stocke le style de ligne. Je suis sur une fonction pour placer des repères dans la zone de dessin. Mais j'ai beaucoup de commande à terminer et je prépare un salon. Actuellement, je dois un peu réduire mes activités de découverte Gambas  .A bientôt Pierre | ||
| gambix | #25 Posté le 19/10/2011 à 20:44:44 | ||
| Faire simple ! | mmoui çame laisse le temp d'en faire une autre version plus aboutie ... le style de ligne n'est valable que pour deux tye de shape ... pas le texte
Moins de texte dans une signature c'est agrandir son espace. | ||
| lapenduledargent | #26 Posté le 20/10/2011 à 05:49:23 | ||
| Bonjour Gambux, C'est pas grave, dans un programme de DAO, c'est pas nécessaire d'écrire du texte en trait d'axe ou mixte. A bientôt Pierre | ||
| 12 | |||