Bonjour,
Je suis entrain de crée une application avec WinDev qui permet d’afficher les lignes d’un fichier texte dans une colonne d’une table appelé « COL_Réferclient_BL » Mais le problème que j’ai c’est que toutes les lignes vont s’afficher dans une seul ligne de la table.
Par exemple j’ai réalisé j’ai réalisé un fichier « TEST2.txt » qui contient
1
2
3
Mais dans la table il m’affiche 123 et un caractère à la fin que je n’ai pas met dans une seul ligne de la table. Mais moi je veux l’afficher comme ça chaque caractère par ligne.
1
2
3
J’ai met ce code
Merci pour votre aide.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34 // Declare the variables FileNameAndPath is string FileID is int LineRead is string ResCloseFile is int // Select the name and path of the file FileNameAndPath = "C:\om_sage\TEST2.txt" // Open the file FileID = fOpen(FileNameAndPath) // Display an error message if the opening was not performed IF FileID = -1 THEN Error(ErrorInfo(errMessage)) ELSE // Read the first line of the file LineRead = fReadLine(FileID) // Display the first line in the edit control COL_Réferclient_BL = LineRead // More lines to read? Read error? WHILE LineRead <> EOT AND LineRead <> "" // Read the next lines of the file LineRead = fReadLine(FileID) // Display the next lines in the edit control COL_Réferclient_BL = COL_Réferclient_BL + LineRead END // Display an error message if the read operation was not performed IF LineRead = "" THEN Error(ErrorInfo(errMessage)) IF LineRead = EOT THEN Info("The end of file has been reached") // Close the file ResCloseFile = fClose(FileID) IF ResCloseFile = -1 THEN // Display an error message if the closing was not performed Error(ErrorInfo(errMessage)) END END
Partager