[R] Ajuster GUICtrlCreateEdit avec la fonction _FileCountLines

Aide et conseils concernant AutoIt et ses outils.
Règles du forum
.
Avatar du membre
walkson
Modérateur
Modérateur
Messages : 854
Enregistré le : ven. 12 août 2011 19:49
Localisation : Hurepoix
Status : Hors ligne

Re: [R] Ajuster GUICtrlCreateEdit avec la fonction _FileCountLines

#21

Message par walkson »

Bonjour,
svp de modifier votre code (oeuvre)
à force de me frotter dans le sens du poil, je vais plus ronronner que vous répondre :lol:
Votre demande est un peu en contradiction avec votre premier post qui utilise un TXT
Voilà ce que je vous propose (à noter que j'utilise votre code pour éviter une copie)

Code : Tout sélectionner

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <File.au3>
#include <Array.au3>
;construction du texte
	$text = "Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus." & @CR
	$text &= "Suspendisse lectus tortor, dignissim sit amet, adipiscing nec, ultricies sed, dolor." & @CR
	Local $text1
	For $i = 1 To 61
		$text1 &=  $text
	Next
;=====================================================================================================
Global $Form1 = GUICreate("Form1", 873, 800)
Global $Edit1 = GUICtrlCreateEdit("", 24, 24, 825, 673, $ES_READONLY)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetBkColor(-1, 0xFFFFFF)
GUICtrlSetFont(-1, 10, 900, 0, "Ariel")
Global $button = GUICtrlCreateButton("suivant",350,700,100,25)
GUISetState(@SW_SHOW)

$aa = StringSplit($text1,@CRLF)
MsgBox(0,"","Nb lignes " & $aa[0] )
_ArrayDisplay($aa,"Pour voir");pour voir le split
Local $array[3];variable contenant texte
Local $array_1[3][2] = [[1,40],[41,81],[82,122]];variable position texte

Local $lire,  $a = 0
For $y = 0 To 2 ; 3 parties
	$x = $array_1[$y][0] ;eg: de 1 à 40, de 41 à 81 etc...
	$w = $array_1[$y][1]
	For $i = $x To $w
		$lire &= $aa[$i]  & $i & @CRLF ; le $i est pour différencier les lignes

	Next
$array[$y] = $lire ; on enregistre le texte dans un array
$lire = "" ; on vide la variable pour la partie suivante

Next

GUICtrlSetData($Edit1, $array[$a])
While 1
 $nMsg = GUIGetMsg()
 Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
	 Case $button
		 $a += 1
		 If $a > 2 Then $a = 0
		 GUICtrlSetData($Edit1, $array[$a]) ;on lit l'array contenant le texte à la ligne $a


 EndSwitch
WEnd
Pour construite le texte dans votre script, utilisez le code suivant

Code : Tout sélectionner

#include <Array.au3>
FileDelete("textcode.txt")
$array = FileReadToArray(@ScriptDir & "\text.txt");lecture du contrat
_ArrayDisplay($array)
For $i = 0 To UBound($array) - 1
$result = $array[$i]
If $i = 0 Then
	$text = '$text ="' & $result &  '"& @CR'
Else
	$text = '$text &="' & $result &  '"& @CR'
EndIf
FileWriteLine("textcode.txt",$text);texte code à coller

Next
Vous obtenez un TXT avec le code du texte à copier et coller dans votre script
En espérant avoir été clair...
Cordialement,
Walkson
"Horas non numero nisi serenas " Le canon de midi
(Je ne compte que les heures heureuses)
Boulanza
Niveau 8
Niveau 8
Messages : 535
Enregistré le : mer. 31 juil. 2013 15:49
Status : Hors ligne

Re: [R] Ajuster GUICtrlCreateEdit avec la fonction _FileCountLines

#22

Message par Boulanza »

Bonjour,
J'ai testé votre code pour coder le texte du contrat. Il est parfait, il répond à la structure demandée. Merci.
Par contre on a 2 petits souci au niveau du code principale contre la copie-coller. Je mets à votre disposition ci-joint le fichier "textcode.txt" pour voir vous même les petites anomalies:
- En cliquant sur le bouton "ligne suivante" : Manque de respect du nombre de lignes écrites dans "GUICtrlCreateEdit" par rapport aux lignes du texte initiale.
- Remplissage de saut de ligne par un chiffre.
N.B: J'ai un contrat de 2000 liges votre solution écrie dans Edit que 130 max ! ?
Cordialement.
Fichiers joints
textcode.txt
(7.89 Kio) Téléchargé 2 fois
textcode.txt
(7.89 Kio) Téléchargé 2 fois
Avatar du membre
walkson
Modérateur
Modérateur
Messages : 854
Enregistré le : ven. 12 août 2011 19:49
Localisation : Hurepoix
Status : Hors ligne

Re: [R] Ajuster GUICtrlCreateEdit avec la fonction _FileCountLines

#23

Message par walkson »

je me suis basé sur votre premier post
Je vous prie de m'aider à rendre le script capable de lire les deux pages restantes en cliquant sur le bouton "Page suivante", soit donc:
- de 1 à la 40 lignes
- de 41 à la 81 lignes
- de 82 à 122 lignes
donc le programme est prévu pour 122 lignes !
Si vous avez 2000 lignes il faudra mettre à jour l'array Local $array_1[3][2] = [[1,40],[41,81],[82,122]] en rajoutant des lignes pour avoir la découpe du texte et faudra modifier For $y = 0 To 2 par le nombre de découpe (ici 3 parties).
Il faut modifier aussi Local $array[3];variable contenant texte par le nombre de découpe
$lire &= $aa[$i] & $i & @CRLF ; le $i est pour différencier les lignes le $i permet de voir la progression puisque le texte que j'utilise se répète. Il faut donc supprimer & $i
Concernant le textcode.txt, c'est le contrat (2000 lignes) qui doit passer dans le code puis recopier dans votre script puisque vous souhaitez l'avoir dans le programme. Le textecode.txt doit remplacer dans mon code
$text = "Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus." & @CR
   $text &= "Suspendisse lectus tortor, dignissim sit amet, adipiscing nec, ultricies sed, dolor." & @CR
A noter que dans la situation actuelle, si le texte à afficher est inférieur à 122 lignes, le programme bugue et si le texte est supérieur à 122 lignes, la lecture s’arrête à 122 lignes et ignore le reste puisque le code est prévu à 122 lignes selon votre souhait
Cordialement,
Walkson
"Horas non numero nisi serenas " Le canon de midi
(Je ne compte que les heures heureuses)
Avatar du membre
jchd
AutoIt MVPs (MVP)
AutoIt MVPs (MVP)
Messages : 2170
Enregistré le : lun. 30 mars 2009 22:57
Localisation : Sud-Ouest de la France (43.622788,-1.260864)
Status : Hors ligne

Re: [R] Ajuster GUICtrlCreateEdit avec la fonction _FileCountLines

#24

Message par jchd »

D'un autre côté, l'intégralité de ce qui arrive dans l'edit est susceptible d'être capturé avec Au3Info ou autre outil ad hoc.
La cryptographie d'aujourd'hui c'est le taquin plus l'électricité.
Boulanza
Niveau 8
Niveau 8
Messages : 535
Enregistré le : mer. 31 juil. 2013 15:49
Status : Hors ligne

Re: [R] Ajuster GUICtrlCreateEdit avec la fonction _FileCountLines

#25

Message par Boulanza »

donc le programme est prévu pour 122 lignes !
Je préfère et si c'est possible que le nombre de lignes soit sans limite.
Avec un bouton retour à la page avant , et que chaque page doit contenir 40 ligne + 2 lignes vide bas de page avec N° de page ça serait idéal. Ainsi ce programme sera utile à tous le monde.
Boulanza
Niveau 8
Niveau 8
Messages : 535
Enregistré le : mer. 31 juil. 2013 15:49
Status : Hors ligne

Re: [R] Ajuster GUICtrlCreateEdit avec la fonction _FileCountLines

#26

Message par Boulanza »

Bonsoir Monsieur jchd,
jchd a écrit : mer. 09 sept. 2020 20:34 D'un autre côté, l'intégralité de ce qui arrive dans l'edit est susceptible d'être capturé avec Au3Info ou autre outil ad hoc.
Je ne connais pas ces deux programmes et leur utilité, mais Chaque chose en son temps.
Cordialement.
Modifié en dernier par Boulanza le mer. 09 sept. 2020 22:42, modifié 2 fois.
Boulanza
Niveau 8
Niveau 8
Messages : 535
Enregistré le : mer. 31 juil. 2013 15:49
Status : Hors ligne

Re: [R] Ajuster GUICtrlCreateEdit avec la fonction _FileCountLines

#27

Message par Boulanza »

Bonsoir Monsieur walkson,
J'ai suive vos recommandations à la lettre: Plus de numérotation sur les sauts de lignes en supprimant & $i de "$lire &= $aa[$i] & $i & @CRLF"
Local $array_1[3][2] = [[1,40],[41,81],[82,122]] : bug
$Edit1 ne dépasse pas 41 ligne le bouton page suivante ne donne rien : pas de page de 41 à 81 ligne.
Cordialement.
Avatar du membre
walkson
Modérateur
Modérateur
Messages : 854
Enregistré le : ven. 12 août 2011 19:49
Localisation : Hurepoix
Status : Hors ligne

Re: [R] Ajuster GUICtrlCreateEdit avec la fonction _FileCountLines

#28

Message par walkson »

Code : Tout sélectionner

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <File.au3>
#include <Array.au3>
;construction du texte
$text ="1Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="2Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="3Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="4Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="5Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="6Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="7Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="8Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="9Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="10Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="11Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="12Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="13Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="14Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="15Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="16Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="17Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="18Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="19Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="20Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="21Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="22Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="23Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="24Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="25Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="26Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="27Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="28Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="29Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="30Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="31Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="32Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="33Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="34Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="35Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="36Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="37Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="38Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="39Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="40Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="41Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="42Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="43Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="44Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="45Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="46Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="47Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="48Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="49Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="50Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="51Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="52Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="53Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="54Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="55Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="56Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="57Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="58Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="59Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="60Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="61Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="62Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="63Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="64Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="65Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="66Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="67Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="68Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="69Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="70Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="71Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="72Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="73Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="74Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="75Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="76Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="77Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="78Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="79Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="80Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="81Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="82Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="83Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="84Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="85Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="86Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="87Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="88Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="89Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="90Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="91Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="92Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="93Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="94Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="95Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="96Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="97Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="98Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="99Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="100Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="101Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="102Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="103Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="104Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="105Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="106Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="107Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="108Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="109Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="110Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="111Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="112Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="113Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="114Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="115Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="116Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="117Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="118Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="119Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="120Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="121Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="122Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR

;=====================================================================================================
Global $Form1 = GUICreate("", 873, 800)
Global $Edit1 = GUICtrlCreateEdit("", 24, 24, 825, 673, $ES_READONLY)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetBkColor(-1, 0xFFFFFF)
GUICtrlSetFont(-1, 10, 900, 0, "Ariel")
Global $button = GUICtrlCreateButton("suivant",350,700,100,25)
GUISetState(@SW_SHOW)

$aa = StringSplit($text,@CRLF)
MsgBox(0,"","Nb lignes " & $aa[0] )
_ArrayDisplay($aa,"Pour voir");pour voir le split
Local $array[3];variable contenant texte
Local $array_1[3][2] = [[1,40],[41,81],[82,122]];variable position texte

Local $lire,  $a = 0
For $y = 0 To 2 ; 3 parties
	$x = $array_1[$y][0] ;eg: de 1 à 40, de 41 à 81 etc...
	$w = $array_1[$y][1]
	For $i = $x To $w
		$lire &= $aa[$i]   & @CRLF 

	Next
$array[$y] = $lire ; on enregistre le texte dans un array
$lire = "" ; on vide la variable pour la partie suivante

Next

GUICtrlSetData($Edit1, $array[$a])
While 1
 $nMsg = GUIGetMsg()
 Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
	 Case $button
		 $a += 1
		 If $a > 2 Then $a = 0
		 GUICtrlSetData($Edit1, $array[$a]) ;on lit l'array contenant le texte à la ligne $a


 EndSwitch
WEnd
Ce code est fonctionnel. Je peux difficilement en faire plus
Je joints le texte du départ avec ses 122 lignes qui se retrouve au départ du code (en copier-coller du textcode.txt) réalisé avec ce code
#include <Array.au3>
FileDelete("textcode.txt")
$array = FileReadToArray(@ScriptDir & "\text.txt");lecture du contrat
_ArrayDisplay($array)
For $i = 0 To UBound($array) - 1
$result = $array[$i]
If $i = 0 Then
   $text = '$text ="' & $result &  '"& @CR'
Else
   $text = '$text &="' & $result &  '"& @CR'
EndIf
FileWriteLine("textcode.txt",$text);texte code à coller

Next
Fichiers joints
text.txt
(8.95 Kio) Téléchargé 2 fois
text.txt
(8.95 Kio) Téléchargé 2 fois
Cordialement,
Walkson
"Horas non numero nisi serenas " Le canon de midi
(Je ne compte que les heures heureuses)
Boulanza
Niveau 8
Niveau 8
Messages : 535
Enregistré le : mer. 31 juil. 2013 15:49
Status : Hors ligne

Re: [R] Ajuster GUICtrlCreateEdit avec la fonction _FileCountLines

#29

Message par Boulanza »

Bonjour Monsieur walkson,
Cher walkson, je ne sais comment vous remercier pour l'aide que vous m'avez apportée, et surtout de la grande rapidité avec laquelle mon problème a été résolu, toutes les informations dont j'avais besoin sont clairement détaillées sur les codes de ce forum.

Le dernier sprint est déterminant :
Il reste un petit détail à corriger le code ci-dessous dans le cas ou j'ai 200 lignes,
walkson a écrit : mer. 09 sept. 2020 19:56 Si vous avez 2000 lignes il faudra mettre à jour l'array Local $array_1[3][2] = [[1,40],[41,81],[82,122]] en rajoutant des lignes pour avoir la découpe du texte et faudra modifier For $y = 0 To 2 par le nombre de découpe (ici 3 parties).
Il faut modifier aussi Local $array[3];variable contenant texte par le nombre de découpe
Code: Comment modifier tout cela. Merci
1- Local $array_1[6][2] = [[1,40],[41,81],[82,122],[123,144],[145,185],[186,200]]  
2- For $y = 0 To 2 par le nombre de découpe (ici 3 parties).
3- comment modifier aussi Local $array[3]
Cordialement.
Boulanza
Niveau 8
Niveau 8
Messages : 535
Enregistré le : mer. 31 juil. 2013 15:49
Status : Hors ligne

Re: [R] Ajuster GUICtrlCreateEdit avec la fonction _FileCountLines

#30

Message par Boulanza »

Bonjour Monsieur walkson ,
En fin de compte le programme est achevé avec succès grâce à votre collaboration et à celle de Monsieur mikell. Merci.
Cordialement.
Il ne faut jamais sous-estimer la programmation avec "Autoit".
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <File.au3>
#include <Array.au3>
;===========================================================================
;construction du texte
$text ="1Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="2Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="3Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="4Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="5Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="6Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="7Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="8Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="9Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="10Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="11Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="12Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="13Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="14Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="15Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="16Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="17Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="18Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="19Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="20Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="21Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="22Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="23Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="24Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="25Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="26Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="27Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="28Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="29Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="30Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="31Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="32Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="33Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="34Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="35Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="36Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="37Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="38Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="39Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="40Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="41Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="42Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="43Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="44Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="45Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="46Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="47Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="48Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="49Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="50Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="51Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="52Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="53Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="54Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="55Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="56Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="57Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="58Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="59Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="60Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="61Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="62Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="63Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="64Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="65Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="66Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="67Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="68Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="69Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="70Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="71Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="72Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="73Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="74Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="75Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="76Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="77Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="78Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="79Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="80Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="81Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="82Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="83Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="84Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="85Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="86Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="87Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="88Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="89Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="90Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="91Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="92Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="93Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="94Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="95Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="96Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="97Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="98Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="99Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="100Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="101Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="102Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="103Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="104Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="105Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="106Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="107Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="108Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="109Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="110Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="111Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="112Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="113Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="114Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="115Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="116Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="117Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="118Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="119Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="120Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="121Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="122Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="123Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="124Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="125Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="126Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="127Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="128Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="129Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="130Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="131Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="132Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="133Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="134Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="135Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="136Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="137Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="138Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="139Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="140Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="141Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="142Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="143Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="144Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="145Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="146Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="147Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="148Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="149Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="150Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="151Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="152Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="153Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="154Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="155Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="156Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="157Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="158Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="159Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="160Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="161Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="162Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="163Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="164Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="165Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="166Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="167Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="168Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="169Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="170Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="171Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="172Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="173Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="174Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="175Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="176Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="177Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="178Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="179Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="180Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="181Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="182Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="183Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="184Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="185Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="186Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="187Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="188Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="189Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="190Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="191Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="192Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="193Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="194Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="195Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="196Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="197Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="198Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="199Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="200Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="201Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="202Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="203Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="204Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="205Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="206Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="207Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="208Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="209Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="210Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &="211Lorem ipsum dolor sit amet, consectetur adipiscing elit. Sed non risus."& @CR
$text &=""& @CR
;=====================================================================================================
Global $Form1 = GUICreate("", 873, 800)
Global $Edit1 = GUICtrlCreateEdit("", 24, 24, 825, 673, $ES_READONLY)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetBkColor(-1, 0xFFFFFF)
GUICtrlSetFont(-1, 10, 900, 0, "Ariel")
Global $button01 = GUICtrlCreateButton("Suivant",350,700,100,25)
Global $button02 = GUICtrlCreateButton("Précédent",200,700,100,25)
GUISetState(@SW_SHOW)

$aa = StringSplit($text,@CRLF)
;MsgBox(0,"","Nb lignes " & $aa[0] )
;_ArrayDisplay($aa,"Pour voir");pour voir le split
Local $array[6];variable contenant texte soit ; 6 Pages
;Local $array_1[3][2] = [[1,40],[41,81],[82,122]];variable position texte soit ; 3 Pages
  Local $array_1[6][2] = [[1,40],[41,81],[82,122],[123,163],[164,204],[205,211]]  ; 6 Pages

Local $lire,  $a = 0
For $y = 0 To 5 ; 6 parties For $y = 0 To 5 => 6- 1 =5
   $x = $array_1[$y][0] ;eg: de 1 à 40, de 41 à 81 etc...
   $w = $array_1[$y][1]
   For $i = $x To $w
      $lire &= $aa[$i]   & @CRLF

   Next
$array[$y] = $lire ; on enregistre le texte dans un array
$lire = "" ; on vide la variable pour la partie suivante

Next

GUICtrlSetData($Edit1, $array[$a])
While 1
 $nMsg = GUIGetMsg()
 Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
    Case $button01
       $a += 1
       If $a > 5 Then $a = 0 ; 6 parties For $y = 0 To 5 => 6- 1 =5
       GUICtrlSetData($Edit1, $array[$a]) ;on lit l'array contenant le texte à la ligne $a

 Case $button02
       $a -= 1
       If $a > 5 Then $a = 0 ; 6 parties For $y = 0 To 5 => 6- 1 =5
       GUICtrlSetData($Edit1, $array[$a]) ;on lit l'array contenant le texte à la ligne $a

 EndSwitch
WEnd
Exit
Modifié en dernier par Boulanza le ven. 11 sept. 2020 15:25, modifié 1 fois.
Avatar du membre
jchd
AutoIt MVPs (MVP)
AutoIt MVPs (MVP)
Messages : 2170
Enregistré le : lun. 30 mars 2009 22:57
Localisation : Sud-Ouest de la France (43.622788,-1.260864)
Status : Hors ligne

Re: [R] Ajuster GUICtrlCreateEdit avec la fonction _FileCountLines

#31

Message par jchd »

Encore une fois, un coup de Au3Info et hop, on a copié tout le contenu de l'édit pour en faire ce qu'on veut.
La cryptographie d'aujourd'hui c'est le taquin plus l'électricité.
Boulanza
Niveau 8
Niveau 8
Messages : 535
Enregistré le : mer. 31 juil. 2013 15:49
Status : Hors ligne

Re: [R] Ajuster GUICtrlCreateEdit avec la fonction _FileCountLines

#32

Message par Boulanza »

Bonsoir Monsieur jchd,
jchd a écrit : ven. 11 sept. 2020 03:28 Encore une fois, un coup de Au3Info et hop, on a copié tout le contenu de l'édit pour en faire ce qu'on veut.
A ce jour, je n'est pas testé Au3Info et hop, mais je suis confiant que "Private exe Protector" protège le contenu de l'édit contre la copie non autorisée. En plus les programmes Autoit interdise (Tuer un processus et ses fils: Au3Info et hop). En plus de tous cela on a sur le marché des logiciels qui empêchent la copie illicite.
Cordialement.
Avatar du membre
jchd
AutoIt MVPs (MVP)
AutoIt MVPs (MVP)
Messages : 2170
Enregistré le : lun. 30 mars 2009 22:57
Localisation : Sud-Ouest de la France (43.622788,-1.260864)
Status : Hors ligne

Re: [R] Ajuster GUICtrlCreateEdit avec la fonction _FileCountLines

#33

Message par jchd »

A ce jour, je n'est pas testé Au3Info
Vous devriez !
La cryptographie d'aujourd'hui c'est le taquin plus l'électricité.
Boulanza
Niveau 8
Niveau 8
Messages : 535
Enregistré le : mer. 31 juil. 2013 15:49
Status : Hors ligne

Re: [R] Ajuster GUICtrlCreateEdit avec la fonction _FileCountLines

#34

Message par Boulanza »

Mais comment ? Pas de tuto !
Avatar du membre
jchd
AutoIt MVPs (MVP)
AutoIt MVPs (MVP)
Messages : 2170
Enregistré le : lun. 30 mars 2009 22:57
Localisation : Sud-Ouest de la France (43.622788,-1.260864)
Status : Hors ligne

Re: [R] Ajuster GUICtrlCreateEdit avec la fonction _FileCountLines

#35

Message par jchd »

Au3info fait partie de la distribution complète de Scite4AutoIt3 depuis des années. En tapant Au3info dans la barre de recherche de notre pote Google, le premier résultat est une page du wiki français dédiée à l'emploi de cet outil.
https://www.autoitscript.fr/autoit3/doc ... au3spy.htm

Franchement, en 7 ans de présence ici, vous ne démontrez pas une quelconque volonté de vous investir dans cet outil !
La cryptographie d'aujourd'hui c'est le taquin plus l'électricité.
Boulanza
Niveau 8
Niveau 8
Messages : 535
Enregistré le : mer. 31 juil. 2013 15:49
Status : Hors ligne

Re: [R] Ajuster GUICtrlCreateEdit avec la fonction _FileCountLines

#36

Message par Boulanza »

Monsieur jchd. Avez-vous lu mon message privé ?
Boulanza
Niveau 8
Niveau 8
Messages : 535
Enregistré le : mer. 31 juil. 2013 15:49
Status : Hors ligne

Re: [R] Ajuster GUICtrlCreateEdit avec la fonction _FileCountLines

#37

Message par Boulanza »

jchd a écrit : ven. 11 sept. 2020 13:25 Au3info fait partie de la distribution complète de Scite4AutoIt3 depuis des années. En tapant Au3info dans la barre de recherche de notre pote Google, le premier résultat est une page du wiki français dédiée à l'emploi de cet outil.
https://www.autoitscript.fr/autoit3/doc ... au3spy.htm

Franchement, en 7 ans de présence ici, vous ne démontrez pas une quelconque volonté de vous investir dans cet outil !
Monsieur jchd, je connais Au3info qui fait partie de la distribution complète de Scite4AutoIt3. J'ai consulté le lien : https://www.autoitscript.fr/autoit3/doc ... au3spy.htm il ya 2 jours, mais je n'est pas compris comment tester L'Edit car il n y a pas de tuto ni information à ce sujet.
Cordialement.
Répondre