mapped file

[mohfa]

Hello every one :

I have a Text File its size is about : 15 MB and i want to compare its lines with other text File . for the first time i used the TStringList to open the First File ( when its size was about 10 KB ) so i hade no problem and i used the TStringList like this :

Delphi-Quellcode:

--
Var 
SL:TStringList;
S:String;
begin
//Load the text file (test.txt ) into the TStringList then use 
For i:=0 to SL -1 do 
if S=SL.Strings[i] then 
Showmessage('yes :'+S+' is found in the file' );
...
...
end;

but when the File becoms more and more huge the TStringList takes forever to load the File's Lines and do the comparasion.
so what i think is to map the First File then do the comparasion and here is my question :
is there any function or procedure that loads the mapped file into the stringlist and do the comparasion very fast .


many thanks