Problème avec SaveStringList.

Bonjour.

@Klaus.

La fonction SaveStringList ne permet pas de sauvegarder les très gros fichiers.

J'obtiens le message suivant:

Impossible to save the file !

Je suis dans l'obligation de la remplacer dans ce cas par la routine suivante.

Code:

    ' res%=dll_call2("SaveStringList",20,adr(fichier$))

    file_open_write 99,fichier$
    k%=0
    e$=string$(3000," ")
    while 0=0
          k%=k%+1
          if k%>nombre_mots% then exit_while
          if mod(k%,1000)=0 then text 1328,"Création du dictionnaire trié: mot n° "+str$(k%)+"/"+str$(nombre_mots%)+"."
          y%=dll_call3("ReadStringList",20,k%,adr(e$))
          file_writeln 99,trim$(e$)
    end_while
    file_close 99

Quelle est ta question ?

Ah, on s'est croisé. Je vais voir ça...

Oups... après ma récupération, ma liceence Delphi 6 Personal Edition a été effacée... Je vais tenter d'en récupérer une autre...

On peut télécharger Delphi 7 ici :

https://delphi.developpez.com/telecharger-gratuit/delphi7-perso/

D'ailleurs, il me semble que Panoramic est passé à Delphi 7

Citation :

D'ailleurs, il me semble que Panoramic est passé à Delphi 7

Aïe... La version Delphi 7 Personal Edition ne permet pas d'ajouter les composants externes, et j'en ai absolument besoin. J'avais cependant essayé de compiler KGF.dll avec Delphi 7 - c'est la grosse panique. Des milliers de changements à faire - avec toutes les instabilités que cela entraîne potentiellement. Pour ma part, je reste à Delphi 6 Personal Edition.

Dès que ma licence sera récupérée, je regarde la fonction de sauvegarde...