Discussion :

[hijodelanoche]

voilà, mon programme écrit dans un fichier .bat
mon souci, c'est qu'a un moment il doit écrire le contenu d une variable et celle ci peut s'avérer trèèèèèèès lngue ...
en fait cette variable est la concaténation de plusieurs, genre la variable peut etre :
agadou agadi agada agadou agadi agada agadou agadi agada agadou agadi agada agadou agadi agada agadou agadi agada agadou agadi agada agadou agadi agada agadou agadi agada agadou agadi agada agadou agadi agada agadou agadi agada

et au bout d un moment, bah ça n'écris plus dans mon fichier bat .. :/

mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Writeln(FichierFonction, 'mafonction a -m'+IntToStr(pourcen)+' -v'+IntToStr(taille)+' -r "'+pourcRar+'" '+fichier);

c'est fichier qui peut etre trrrrrrrrrrreeeeeeees long

->existe il un moyen pour mettre quand meme le contenu de la variable dans le fichier
-> ou en dos y a t il un moyen de continuer ca commande en allant a la ligne ( comme ça je pourrais simuler ça entre chaque valeur de la concaténation ^_^ )

Merci ^_^

[Thierry G.]

salut,

je pense que si tu utilise write au lieu writeln ton texte sera mis bout a bout sans retour a la ligne et tu fais des write a la chaine...

[Harvester]

En utilisant un TStringlist? ( J'ai pas trop compris la question ^^ ).

[diam's]

Je crois me souvenir que la longueur max d'une chaine de caractère est limitée dans ce type de fichier (256 ou 65536 caractères je sais plus), mais cela reste à vérifier.

En plus des deux solutions proposées ci-avant, je propose cela (je garanti rien) :
- ecrire dans un fichier binaire non typé (pas un *.bat, mais un truc style *.hex ou *.bin par exemple)
- écrire dans un mémo et enregistrer ton mémo

D'autre part, est-ce que le nombre de caractère de la fonction writeln est illimité ?

Salutations

[Harvester]

- écrire dans un mémo et enregistrer ton mémo

Ecrire dans un TMemo revient à écrire dans un TStringlist.

[hijodelanoche]

effectivement write semble limité par le nombre de caractere.
Mais j'ai trouvé un autre moyen, j'ai modifié ma fonction ^_^

merci a vous tous ^_^

[LadyWasky]

Un petit tag [résolu] alors ?

[anapurna]

salut

en plus du tag tu devrais utilise la fonction format

dans ton cas cela devrais donner ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Writeln(FichierFonction,fornat( 'mafonction a -m%d  -v%d  -r"%s" %s ' ,[pourcen,taille,pourcRar,fichier ]));

de plus si j'avai ete toi j'aurai utiliser un object stream on est en programmation objet donc autant utiliser les classe mis a notre disposition

@+ Phil

[e-ric]

Salut

Je confirme : utiliser un TFileStream aurait deux avantages:
- pas de limitation,
- plus pertinent dans la philosophie de Delphi.

Si tu veux rester avec des fichiers texte "old fashion", épluche l'aide en ligne (info reprise dans D6) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
SetTextBuf(var F: Text; var Buf [ ; Size: Integer] );

Tu pourras spécifier un buffer plus grand. Je pense avoir répondu à ta question.

cdlt

e-ric