UDF > GUI > GuiRichEdit >

_GUICtrlRichEdit_StreamToVar

�crit le texte d'un contr�le RichEdit dans une variable

#include <GuiRichEdit.au3>
_GUICtrlRichEdit_StreamToVar ( $hWnd [, $bRtf = True [, $bIncludeCOM = True [, $iOpts = 0 [, $iCodePage = 0]]]] )

Param�tres

$hWnd Handle du contr�le
$bRtf [optionnel] True - �crit du Rich Text Format (RTF) (par d�faut)
False - Ecrit le texte seul
$bIncludeCOM [optionnel] True (par d�faut):
    L'�criture du RTF, inclut tous les objets COM (space consuming)
    L'�criture du texte seul, �crit un texte � la place des objets COM
False: Ecrit des espaces � la place des objets COM
$iOpts [optionnel] Options suppl�mentaires :
    $SFF_PLAINTRTF - �crit seulement les mots-cl�s du texte enrichi communs � toutes les langues
    $SF_UNICODE - �crit de l'Unicode
$iCodePage [optionnel] G�n�re de l'UTF-8 et le texte utilisant cette page de code
Par d�faut : ne le fait pas

Valeur de retour

Succ�s: Retourne le RTF ou le texte.
�chec: Retourne "" et d�finit @error <> 0.
@error: 101 - $hWnd n'est pas un handle
1041 - $SFF_PLAINRTF n'est pas valide pour un fichier texte
1042 - $opts: option non valide
1043 - $SF_UNICODE n'est valable que pour un fichier texte
700 - erreur interne

Remarques

Si du texte est s�lectionn�, n'�crit que la s�lection, sinon �crit tout le texte du contr�le.

Appelez _GUICtrlRichEdit_IsModified() pour d�terminer si le texte a �t� modifi�.

En relation

_GUICtrlRichEdit_SetLimitOnText, _GUICtrlRichEdit_StreamFromVar, _GUICtrlRichEdit_StreamToFile

Voir aussi

Consultez EM_STREAMIN dans la librairie MSDN.

Exemple

#include <GUIConstantsEx.au3>
#include <GuiRichEdit.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
    Local $hGui, $iMsg, $idBtnNext, $iStep = 0, $idLblMsg, $hRichEdit, $s
    $hGui = GUICreate("Exemple (" & StringTrimRight(@ScriptName, 4) & ")", 320, 350, -1, -1)
    $hRichEdit = _GUICtrlRichEdit_Create($hGui, "Ceci est un test.", 10, 10, 300, 220, _
            BitOR($ES_MULTILINE, $WS_VSCROLL, $ES_AUTOVSCROLL))
    $idLblMsg = GUICtrlCreateLabel("", 10, 235, 300, 60)
    $idBtnNext = GUICtrlCreateButton("Suivant", 270, 310, 40, 30)
    GUISetState(@SW_SHOW)

    _GUICtrlRichEdit_SetText($hRichEdit, "Premier paragraphe")

    $iMsg = GUIGetMsg()
    While $iMsg <> $GUI_EVENT_CLOSE
        If $iMsg = $idBtnNext Then
            $iStep += 1
            Switch $iStep
                Case 1
                    $s = _GUICtrlRichEdit_StreamToVar($hRichEdit)
                    GUICtrlSetData($idLblMsg, "Sauv� dans variable")
                Case 2
                    _GUICtrlRichEdit_SetText($hRichEdit, "")
                    _GUICtrlRichEdit_StreamFromVar($hRichEdit, $s)
                    GUICtrlSetData($idLblMsg, "Charg� � partir d'une variable")
                Case 3
                    _GUICtrlRichEdit_SetSel($hRichEdit, 2, 6)
                    _GUICtrlRichEdit_StreamFromVar($hRichEdit, $s)
                    GUICtrlSetData($idLblMsg, "S�lection remplac�e: un message intentionnel!")
                    GUICtrlSetState($idBtnNext, $GUI_DISABLE)
            EndSwitch
        EndIf
        $iMsg = GUIGetMsg()
    WEnd

    _GUICtrlRichEdit_Destroy($hRichEdit) ; N�cessaire sauf si le script se bloque
    ; GUIDelete()   ; est OK aussi
EndFunc   ;==>Example