#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Version=beta
#AutoIt3Wrapper_Icon=wp.ico
#AutoIt3Wrapper_Outfile=MODIFICATEUR_Beta.exe
#AutoIt3Wrapper_UseAnsi=y
#AutoIt3Wrapper_Res_Description=Module de modification de texte
#AutoIt3Wrapper_Res_Fileversion=1.0.0.19
#AutoIt3Wrapper_Res_FileVersion_AutoIncrement=y
#AutoIt3Wrapper_Res_LegalCopyright=Olivier LE GRAND
#AutoIt3Wrapper_Res_Language=1036
#AutoIt3Wrapper_Run_Tidy=y
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****

#cs ----------------------------------------------------------------------------
	
	AutoIt Version: 3.2.12.1
	Author:         myName
	
	Script Function:
	Template AutoIt script.
	
#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here
#include <ComboConstants.au3>
#include <File.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

;##################################################################
; Déclaration constante et variable
;##################################################################

Opt("TrayIconDebug", 1)

$INFO = "Information"
$Temps = "3000"


;##################################################################
; Interface Graphique
;##################################################################

#Region ### START Koda GUI section ### Form=c:\projet\message_tv\modificateur.kxf
$GUI = GUICreate("MODIFICATEUR 2.0 Bêta", 398, 229, 412, 482)
GUISetBkColor(0xFFFFFF)
GUISetIcon("wp.ico")
$Group_Message = GUICtrlCreateGroup("Message", 16, 16, 361, 161)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Annuler = GUICtrlCreateButton("Annuler", 304, 192, 73, 25)
$Modifier = GUICtrlCreateButton("Modifier", 216, 192, 73, 25)
$Combo_Selection_Message = GUICtrlCreateCombo("", 16, 192, 185, 25, $CBS_DROPDOWNLIST)
GUICtrlSetData(-1, "Message 1|Message 2", "")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

;##################################################################
; programme
;##################################################################


While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Supr_Sup_X()
			Supr_MOD_OK_X()
			Exit
			
		Case $Modifier
			
			
		Case $Annuler
			
		Case $Combo_Selection_Message
			$Read_Combo_Selection_Message = GUICtrlRead($Combo_Selection_Message, 1)
			SelectAVerifier_Message()
			SelectMessageMod()
			
	EndSwitch
WEnd





;##################################################################
; Fonction
;##################################################################


Func SelectMessageMod()
	
	If FileExists("MOD_OK_1") Then
		$Message = GUICtrlCreateEdit("test Numero 1", 40, 40, 313, 113, $ES_AUTOVSCROLL + $WS_VSCROLL + $ES_CENTER + $ES_WANTRETURN)
		;LireMessage($Texte_1, $Message_Texte_1)
	EndIf
	
	If FileExists("MOD_OK_2") Then
		$Message = GUICtrlCreateEdit("test Numero 2", 40, 40, 313, 113, $ES_AUTOVSCROLL + $WS_VSCROLL + $ES_CENTER + $ES_WANTRETURN)
		;LireMessage($Texte_2, $Message_Texte_2)
	EndIf
	
	
EndFunc   ;==>SelectMessageMod
;##################################################################
; Fonction
;##################################################################


Func LireMessage($Texte, $Message_Texte)
	$file = FileOpen($Texte, 1)
	$Message_Texte = FileRead($Texte)
	FileClose($file)
	$Message = GUICtrlCreateEdit($Message_Texte, 40, 40, 313, 113, $ES_AUTOVSCROLL + $WS_VSCROLL + $ES_CENTER + $ES_WANTRETURN)
EndFunc   ;==>LireMessage



;##################################################################
; Fonction
;##################################################################

Func SelectAVerifier_Message()
	If $Read_Combo_Selection_Message = "Message 1" Then
		Supr_Sup_X()
		Supr_MOD_OK_X()
		_FileCreate("MOD_OK_1")
		_FileCreate("Sup_1")
		
	ElseIf $Read_Combo_Selection_Message = "Message 2" Then
		Supr_Sup_X()
		Supr_MOD_OK_X()
		_FileCreate("MOD_OK_2")
		_FileCreate("Sup_2")
		
	Else
		;Message($INFO, "Vous n'avez pas sélectionné de message l'onglet sélection !!!", $Temps, 50)
	EndIf
EndFunc   ;==>SelectAVerifier_Message
;##################################################################
; Fonction
;##################################################################

Func Supr_Sup_X()
	$X = 0
	While $X <= 5
		If FileExists("Sup_" & $X) Then
			FileDelete("Sup_" & $X)
		EndIf
		$X = $X + 1
	WEnd
EndFunc   ;==>Supr_Sup_X

;##################################################################
; Fonction
;##################################################################

Func Supr_MOD_OK_X()
	$X = 0
	While $X <= 5
		If FileExists("MOD_OK_" & $X) Then
			FileDelete("MOD_OK_" & $X)
		EndIf
		$X = $X + 1
	WEnd
EndFunc   ;==>Supr_MOD_OK_X
;##################################################################
; Fonction
;##################################################################