MS := TMemoryStream.Create;
FS := TFileStream.Create('c:1.txt', fmOpenRead);
rS := TFileStream.Create('C:12.txt', fmCreate);
FS.Position := 0;
MS.Write(FS, FS.Size);
MS.Position := 0;
rs.Write(MS, MS.Size);
FS.Free;
rS.Free;
MS.Free;
위와같이 화일스트림으로 c:1.txt를 읽어서 메모리스트림으로 쓰고
다시 메모리스트림을 화일스트림을 이요해서 c:12.txt로
쓰려고 하는데 잘 되질 않네요.
고수님들 뭐가 잘못된건지 알려주세요~~
스트림의 CopyFrom메소드를 쓰세요...
MS := TMemoryStream.Create;
FS := TFileStream.Create('c:1.txt', fmOpenRead);
RS := TFileStream.Create('C:12.txt', fmCreate);
MS.CopyFrom(FS, 0);
RS.CopyFrom(Ms, 0);
FS.Free;
RS.Free;
MS.Free;
^^ 항상 즐코하세요...