[R] Affichage dans un SplashText du fichier INI

[sergio]

Bonjour,

je cherche a envoyer sur quelques dizaines d'ordinateurs un message qui pourrait être variable en nombre de ligne.
Ce que j'ai trouvé comme moyen c'est d'utiliser un fichier INI avec pour le moment un nombre de ligne déterminé, car dans ma fonction je lis la ligne en question.

Ce que je souhaiterai.... c'est faire une fonction avec une boucle qui lit le contenu du fichier et qui affiche toutes les lignes simultanément.
Les quelques tests que j'ai fais, j'affichais les lignes une après l'autre et ce n'est pas le résultat escompté.

Si vous avez une idée je suis preneur, merci d'avance. et bonnes fêtes de fin d'années

le petit bout de code :

Code : Tout sélectionner

#cs ----------------------------------------------------------------------------

 AutoIt Version : 3.3.14.2
 Auteur:    

 Fonction du Script :
    Modèle de Script AutoIt.

#ce ----------------------------------------------------------------------------


#include <MsgBoxConstants.au3>
#include <WinAPIFiles.au3>
#NoTrayIcon

Dim $Date = @MDAY & "/" & @MON & "/" & @YEAR
Dim $Heure = @HOUR & ":" & @MIN & ":" & @SEC

Global $FichierINI = @ScriptDir & "\config.ini"

Local $sRead = IniRead($FichierINI, "SECTION", "LIB", "Default Value")
Local $sRead0 = IniRead($FichierINI, "SECTION", "LIB0", "Default Value")
Local $sRead1 = IniRead($FichierINI, "SECTION", "LIB1", "Default Value")
Local $sRead2 = IniRead($FichierINI, "SECTION", "LIB2", "Default Value")
Local $sRead3 = IniRead($FichierINI, "SECTION", "LIB3", "Default Value")
Local $sRead4 = IniRead($FichierINI, "SECTION", "LIB4", "Default Value")
Local $sRead5 = IniRead($FichierINI, "SECTION", "LIB5", "Default Value")
Local $sRead6 = IniRead($FichierINI, "SECTION", "LIB6", "Default Value")
Local $sRead7 = IniRead($FichierINI, "SECTION", "LIB7", "Default Value")
Local $sRead8 = IniRead($FichierINI, "SECTION", "LIB8", "Default Value")
Local $sRead9 = IniRead($FichierINI, "SECTION", "LIB9", "Default Value")
Local $sRead10 = IniRead($FichierINI, "SECTION", "LIB10", "Default Value")

;MsgBox($MB_SYSTEMMODAL, "", "LA VALEUR DE   'SECTION' 'LIB' EST: " & $sRead)

Affichage()
Func Affichage()
               ; Lancement du splash screen.
               SplashTextOn("", $sRead & @CRLF & _
                                            $sRead0 & @LF & _
                                            $sRead1 & @CRLF & _
                                            $sRead2 & @CRLF & _
                                            $sRead3 & @CRLF & _
                                            $sRead4 & @CRLF & _
                                            $sRead5 & @CRLF & _
                                            $sRead6 & @CRLF & _
                                            $sRead7 & @CRLF & _
                                            $sRead8 & @CRLF & _
                                            $sRead9 & @CRLF & _
                                            $sRead10 & @CRLF & _
                                            $Date & @CRLF & _
                                            $Heure _
                                            , 1050, 600, -1, -1, 0 + 1 + 16 + 32, "Times New Roman", 18, 800)

               Sleep(10000)

               SplashOff()

               Exit
EndFunc   ;==>Affichage()




 

[orax]

Je n'ai peut-être pas tout compris mais pourquoi ne pas utiliser un simple fichier texte ?

Code : Tout sélectionner

Global $FichierTXT = @ScriptDir & "\config.txt"

Local $sRead = FileRead($FichierTXT)

[sergio]

euhh bonne question mais effectivement c'est beaucoup plus simple à travailler
Merci pour ton aide orax, l'idée est plus que judicieuse