怎样把文件Load 入内存，并可以像普通文件操作

Question

用TFileStream流控制
loadfrom就可以了

Answer 1

' I do it only 5 miniute, it's not a literally program
' I'd like you can get some from it.
Procedure Test;
Var 
  AfileStream:TStrings;
  i:integer;
begin
  try
    AfileStream:=TstringList.Create;
    AfileStream.LoadFromFile('SourceFileName'); // open a file
    AfileStream.SaveToFile('destFileName');      // save a file
    for i:=0 to AfileStream.Count - 1 do
        WriteLn(AfileStream[i]);
    
  finally
    AfileStream.free;
  end;  
   
end;

Answer 2

1.TFileStream;
2.内存衍射文件

Answer 3

var
  txtFile: TextFile;
  i: Integer;
  strList: TStringList;
begin
  strlist := tstringlist.Create;
  strlist.Add('') ;
  strlist.Add('hello') ;  AssignFile(txtFile,'C:\test\3.txt');
  try
    Append(txtFile);
    for i := 0 to strList.Count - 1 do
      WriteLn(txtFile,strList[i]);
    Flush(txtFile);
  finally
    CloseFile(txtFile);
  end;
end;

Answer 4

使用内存映射。
createfilemapping
mapviewoffile
unmapviewoffile