Communauté Francophone AutoIt
https://www.autoitscript.fr/forum/
Code : Tout sélectionner
#include <GUIConstants.au3>
$Tonfichier = ".\Affiche.txt" ; le fichier se trouve à l'emplacement du script
$iFile = Fileread($Tonfichier, FileGetSize($Tonfichier))
$Form = GUICreate("TEST", 322, 186, 193, 125)
$Edit = GUICtrlCreateEdit("", 8, 40, 305, 137)
Guictrlsetdata($Edit,$iFile) ; on ajoute au controle edit le fichier texte
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEndCode : Tout sélectionner
#include <GUIConstants.au3>
$File = FileOpen("test.csv", 0)
If $file = -1 Then
MsgBox(0, "Erreur", "Impossible d'ouvrir le fichier.")
Exit
EndIf
$Text = FileRead($file)
FileClose($file)
$Gui = GUICreate("TEST", 322, 186, 193, 125)
$Label1 = GUICtrlCreateLabel($Text, 30, 10, 310, 186) ; Modifier les valeurs pour
; placer le text ou vous voulez.
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Il n'y a pas de : Il faut ou Il faut pas !ani a écrit :il me semble que dans ce cas il ne faut pas
Comme nous sommes sur un forum d'entraide, il me semble plus judicieux de donner la méthode complète pour lire un fichier, et si au final l'utilisateur veux simplifier le code en supprimant la gestion d'erreur et l'ouverture du fichier ... libre a lui.If a filename is given rather than a file handle - the file will be opened and closed during the function call - for parsing large text files this will be much slower than using filehandles.
Code : Tout sélectionner
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)