[Résolu] Taille case à cocher

[dulotisse]

Bonjour,

est-il possible de changer la taille d'une case à cocher ?

Merci pour vos réponses

[jeanmimi]

Oui, bien sûr, c'est le cas de tous les contrôles des formulaires de Base.

[dulotisse]

Merci, très bonne nouvelle !
Et c'est où que ça se passe ?
J'ai essayé avec les propriétés du contrôle, je peux changer la taille de la zone, sa couleur de fond, mais le carré lui même ne change pas.
J'avoue que je ne sais plus trop où ni comment chercher...

[jeanmimi]

Tu as raison, apparemment, il n'est pas possible de dégrouper l'étiquette et le contrôle.
Quelle est l'utilité pour toi d'avoir une Case à cocher avec une taille plus grande ?

[dulotisse]

Tout bêtement mieux la voir.
Je précise que c'est une case qui donne un renseignement, elle n'est pas à cocher par l'utilisateur de la base. S'il y a une solution meilleure que la case à cocher, je prends.

(J'ajoute que je viens de me rendre compte que, quand elle est cochée, le signe à l'intérieur n'est pas noir mais gris comme si elle etait configurée en triple, mais elle ne l'est pas pourtant.
La aussi, je sèche sur la raison.)

Merci encore pour l'aide

[jeanmimi]

S'il y a une solution meilleure que la case à cocher, je prends.

Il faudrait voir le formulaire, mais est-ce qu'une étiquette de texte, ou bien une Zone de texte de Dessin pourrait aller ?

[JacquesF]

Bonjour,
La réponse est peut être un peu tardive, mais ça peut éventuellement servir à d'autres.
La taille de la case à cocher n'est pas modifiable, et si elle est grisée c'est probablement parce que le contrôle est en mode "Lecture seule".

Une solution (dans le cas où l'on a besoin de grossir le champ, pour des personnes ayant des problèmes de vue par exemple) pourrait être d'utiliser une zone de texte dont le fond est coloré en blanc par défaut (case vide) et en changeant par programmation la couleur de fond.
Une simple macro peut lors de l'affichage du formulaire (lors d'un refresh par exemple) modifier l'état apparent de la case à cocher "d'origine".

Dans un champ de type Texte, la propriété backgroundcolor est à utiliser.
Le code de couleur à appliquer doit être un entier de type "Long", le plus simple étant d'utiliser la fonction RGB avec les valeurs des couleurs Rouge/Vert/Bleu.
Exemple pour appliquer une couleur au fond d'un champ Texte désigné par l'objet oText :
Blanc ==> oText.backgroundcolor = RGB(255,255,255)
Noir ==> oText.backgroundcolor = RGB(0,0,0)

Si la case à cocher (dont on mettra l'état à "Non visible") est référencée par l'objet oCase par exemple, on peut utiliser le code suivant pour afficher en noir l'état coché et blanc l'état décoché :

Code : Tout sélectionner

Dim Blanc As Long, Noir As Long, oForm As Object, oText As Object, oCase As Object
Blanc = RGB(255,255,255)
Noir = RGB(0,0,0)
oForm = ThisComponent.Drawpage.Forms.getByName("MonFormulaire")
oText = oForm.getByName("MaZoneDeTexte")
oCase = oForm.getByName("LaCase")

If oCase.State = 1 Then
	oText.BackgroundColor = Noir
Else
	oText.BackgroundColor = Blanc
End If

Jacques

[micmac]

Bonjour,

Si votre sujet fait appel à des macros, merci d'ouvrir un nouveau fil dans la section appropriée.
Clôturez (Comment baliser [Résolu]
) ce fil en y mettant un lien vers le nouveau et dans le nouveau, un lien vers celui-ci.

Merci

[Piaf]

Bonjour

Une solution (dans le cas où l'on a besoin de grossir le champ,

une alternative sans macro.
Tu n'es pas obligé d'utiliser une case à cocher pour un champ booléen, tu peux utiliser un champ formaté.

Oui.png

Non.png

avec le formatage

Code : Tout sélectionner

[RED]# "Oui";# "";[BLUE]# "Non"

par exemple.
A+

[Bidouille]

L'auteur n'étant plus revenu depuis :

Dernière visite le : 05 Sep 2014 08:10

Fil déclaré résolu