pan59
Nombre de messages : 367
Age : 66
Localisation : Wattignies
Date d'inscription : 16/10/2011
 | | Sujet: Problème de lecture de fichier texte. Jeu 6 Sep 2012 - 10:38 | |
| Bonjour. Il semblerait que Panoramic mette un temps incroyable à réaliser des opérations sur des variables chaînes. Merci de votre aide. La durée de traitement du code suivant est de 2 secondes sans les tests select et if, et de 10 secondes avec les tests (au départ, j'en étais à 25 secondes) !! - Code:
-
message time$
file_open_read 99,"dictionnaires/dico_"+chaine2000$+".dat"
while file_eof(99)=0
file_readln 99,ligne$
' caption 0,ligne$
if upper$(ligne$)="FIN" then exit_while
if flag_polonais%=1 then gosub erreur_dico_polonais
nombre_mots%=nombre_mots%+1
select sens_traduction%
case 1: if instr(ligne$,";v;")>0 then nombre_verbes_du_dico%=nombre_verbes_du_dico%+1
case 2: gosub detecter_si_verbe_polonais
if flag_verbe%=true% then nombre_verbes_du_dico%=nombre_verbes_du_dico%+1
case 3: if instr(ligne$,"(verbe")>0 or instr(ligne$," to ")>0 then nombre_verbes_du_dico%=nombre_verbes_du_dico%+1
case 4: if instr(ligne$,"(verbe")>0 or instr(ligne$," (v) ")>0 then nombre_verbes_du_dico%=nombre_verbes_du_dico%+1
end_select
end_while
file_close 99
message time$
| |
|
Nardo26
Nombre de messages : 2294
Age : 55
Localisation : Valence
Date d'inscription : 02/07/2010
| | Sujet: Re: Problème de lecture de fichier texte. Jeu 6 Sep 2012 - 12:53 | |
| Difficile de t'aider avec si peu d'info....  Que contient la procédure que tu appelles dans le CASE  | |
|
Calendrier