Cadre dans un état [À faire]

Hello !

Je fais un peu de cosmétique sur mes états. J'aimerais savoir si quelqu'un saurait comment je peux mettre un cadre englobant toute la page qui s'imprime (en tete, détail, bas de page) et pas uniquement la zone détail. Je suis sur que c'est possible mais je ne sais pas comment...

Alors personne n'a idée ? Ca parait tellement simple à faire. Il y a forcément un moyen

Merci pour ta réponse argyronet,

J'avais déjà farfouillé dans le FAQ. Et j'y suis retourné après avoir vu ta réponse mais je n'y trouve pas ma question, désolé
Peux tu me donner le lien direct?

Je pense qu'Argy fait référence à ceci : http://www.developpez.net/forums/vie...528618#1528618

Je n'ai pas encore vérifié ce code mais il devrait normalement finir dans la FAQ lors de la prochaine mise à jour.

Merci !!!
Ouaw super ca marche du tonnerre! L'épaisseur et la couleur sont-ils réglables ?

La couleur est modulable :
Couleur du pourtour du rectangle. Elle peut-être exprimée sous la forme RGB(255,0,0) - (pour du rouge par exemple)

Il ne me reste que l'épaisseur du trait. Si qq a une idée, je suis preneur. Si je trouve, je la post pour compléter...

Pour compléter la réponse à ma question. La solution pour régler l'épaisseur, c'est de faire plusieurs rectangles. Le code ci-dessous. En espérant que ca pourra en aider d'autres !
A bientôt
Denis

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
Private Sub Report_Page()
  'Dessiner un bord de page autour de l'état.
'    Me.Line (0, 0)-(Me.ScaleWidth - 50, Me.ScaleHeight - 50), , B
 
Me.Line (0, 0)-(Me.ScaleWidth - 50, Me.ScaleHeight - 50), RGB(153, 102, 0), B
Me.Line (0, 0)-(Me.ScaleWidth - 60, Me.ScaleHeight - 60), RGB(153, 102, 0), B
Me.Line (0, 0)-(Me.ScaleWidth - 70, Me.ScaleHeight - 70), RGB(153, 102, 0), B
Me.Line (0, 0)-(Me.ScaleWidth - 80, Me.ScaleHeight - 80), RGB(153, 102, 0), B
 
Me.Line (10, 10)-(Me.ScaleWidth - 50, Me.ScaleHeight - 50), RGB(153, 102, 0), B
Me.Line (10, 10)-(Me.ScaleWidth - 60, Me.ScaleHeight - 60), RGB(153, 102, 0), B
Me.Line (10, 10)-(Me.ScaleWidth - 70, Me.ScaleHeight - 70), RGB(153, 102, 0), B
Me.Line (10, 10)-(Me.ScaleWidth - 80, Me.ScaleHeight - 80), RGB(153, 102, 0), B
 
Me.Line (20, 20)-(Me.ScaleWidth - 50, Me.ScaleHeight - 50), RGB(153, 102, 0), B
Me.Line (20, 20)-(Me.ScaleWidth - 60, Me.ScaleHeight - 60), RGB(153, 102, 0), B
Me.Line (20, 20)-(Me.ScaleWidth - 70, Me.ScaleHeight - 70), RGB(153, 102, 0), B
Me.Line (20, 20)-(Me.ScaleWidth - 80, Me.ScaleHeight - 80), RGB(153, 102, 0), B
 
Me.Line (30, 30)-(Me.ScaleWidth - 50, Me.ScaleHeight - 50), RGB(153, 102, 0), B
Me.Line (30, 30)-(Me.ScaleWidth - 60, Me.ScaleHeight - 60), RGB(153, 102, 0), B
Me.Line (30, 30)-(Me.ScaleWidth - 70, Me.ScaleHeight - 70), RGB(153, 102, 0), B
Me.Line (30, 30)-(Me.ScaleWidth - 80, Me.ScaleHeight - 80), RGB(153, 102, 0), B
 
End Sub

[/code]

Merci pour ce complément de réponse que nous ne manquerons pas de vérifier pour l'intégrer directement dans la FAQ. En attendant, n'oubliez pas de cliquer sur le bouton Résolu.