Insére du texte dans un contrôle d'édition
#include <GuiEdit.au3>
_GUICtrlEdit_InsertText ( $hWnd, $sText [, $iIndex = -1] )
$hWnd | ID/handle du contrôle |
$sText | Chaîne à insérer |
$iIndex | [optionnel] La position du caractère où insérer la chaîne |
#include <GUIConstantsEx.au3> #include <GuiEdit.au3> #include <WindowsConstants.au3> Example() Func Example() Local $idEdit Local $sWow64 = "" If @AutoItX64 Then $sWow64 = "\Wow6432Node" Local $sFile = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE" & $sWow64 & "\AutoIt v3\AutoIt", "InstallDir") & "\include\_ReadMe_.txt" ; Crée une GUI GUICreate("Edit Insert Text", 400, 300) $idEdit = GUICtrlCreateEdit("", 2, 2, 394, 268, BitOR($ES_WANTRETURN, $WS_VSCROLL)) GUISetState(@SW_SHOW) ; Définit les marges _GUICtrlEdit_SetMargins($idEdit, BitOR($EC_LEFTMARGIN, $EC_RIGHTMARGIN), 10, 10) ; Définit le texte _GUICtrlEdit_SetText($idEdit, FileRead($sFile)) ; Insert text _GUICtrlEdit_InsertText($idEdit, "*** Excellent UDFs ***" & @CRLF & @CRLF, 0) ; Boucle jusqu'à ce que l'utilisateur quitte. Do Until GUIGetMsg() = $GUI_EVENT_CLOSE GUIDelete() EndFunc ;==>Example