Discussion :

[randy_dom]

Salue , je veux savoire comment chercher et comparer des string à partir d'un fichier d'environ 700 MB ou plus .

j'ai utilisé ça :

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
var
Str:TStringLis;
Buffer, strSearch:string;
begin
 For i:=0 to Str.Count-1 do
     begin
      strSearch:=Str[i];// ou Str.strings[i]
If Pos(strSearch, Buffer)<>0 then
showmessage(S);// ç'est la le problem 
.
.
.
end;
end;

ç'est la le problem : ça me prends des heurs et heurs pour effectuer la recherche et comparaison.

j'ai pensé au File Mapping mais honnêtement je sais pas comment realiser cette recherche et comparaison avec le File Mapping .


y a il une autre alternative .

[Gilbert Geyer]

Salut,

Tu peux utiliser la routine SearchStringInFile de ShaiLeTroll qui se trouve ici : http://www.developpez.net/forums/sho...60&postcount=9

A+

[ShaiLeTroll]

Tu as aussi SearchStringInBigFile (Dernière Version) qui est plus rapide grace à quelques différences subtiles avecSearchStringInFile ...