Discussion :

[ricil78]

Bonjour,

On me demande de faire un truc et je ne sais pas si c'est possible et comment le faire.

En résumant la situation :
1) Comment saisir du texte formaté (Gras, Italique,...) dans une form
2) Comment faire pour que cristal report me garde la mise en form.

Ps : je sais envoyer un texte à cristal mais tu texte brut.

Merci

[JPelli]

Bonjour,
Pour le texte formatté utilise une RichtextBox.

Je suppose que tu envoies ton texte dans un rapport crystal report(dans un textobject).
Dans ton code tu peux modifier l'apparence du textobjet.

Code :

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

1
2
3
4
5
6
7
8
9
Dim Obj As Object
    Dim OTxt As TextObject
    For Each Obj In RPT.ReportDefinition.ReportObjects
      If TypeOf Obj Is TextObject Then
        OTxt = CType(Obj, TextObject)
        OTxt.font = 'style des caractères'
        Otxt.color = ...
      end if
   next

J'espère que c'est cela que tu cherches.
Bon boulot Jean

[ricil78]

Si j'ai bien compris ton exemple tu modifies totalement l'objet dans cristal report.
Mais il y a t-il un moyen de modifier un seul mot dans l'objet comme
ceci : Merci pour ton aide

[napegadie]

Ou bien dans crystal report tu formates toi même tes zones de texts.

[ricil78]

Si tu me propose de faire ça à la main je peux pas, car c'est utilisateur qui veut saisir un texte avec mise en forme légère (Gras, italique,...)
Et le texte saisie doit apparaitre de façon identique dans Cristal

Par contre Si c'est par le code, Comment ?

[napegadie]

Dans ce cas la proposition de JPelli doit pouvoir marcher.

[ricil78]

Si j'ai bien compris l'exemple JPelli il modifie totalement l'objet et donc tout le texte.
Et non pas un mot dans celui-ci, est-ce exact ou je me trompe ?