如何连接两个指针的内容
yeah 2000-01-12 09:18:00 有两个TMemroyStream,如
Stream1.loadformfile('C:\123.txt');
Stream2.loadfromfile('C:\222.txt');
从中对文件进行处理后,
我想将两个文件的内容合并起来,
Var S1,S2:string;
S1:=Pchar(stream1.memory);
s2:=pchar(Stream2.memory);
S1:=stirng(Pchar(S1))+String(PChar(S2));
结果S1仍然是未合并以前的内容。