Once I have a file in a TFileStream
Q1 := TFileStream.Create(curDir +
'Qtop.doc',fmOpenRead or fmShareDenyWrite);
Q2 := TFileStream.Create(curDir + 'Qbody.doc',fmOpenRead or fmShareDenyWrite); How do I join the two together so I can out put it as
one file
with TFileStream.Create(curDir +
'Qdone.doc',fmCreate or fmShareExclusive) do try
CopyFrom(Q3, Q3.Size); finally Free; end; (from Tony, a DUG
Lurker)
|
- [DUG]: HELPPPPPPPP !!!!! richter
- Re: [DUG]: HELPPPPPPPP !!!!! Brett Lin
- Re: [DUG]: Newbie Question re TFileStream Tony Arcus
- Re: [DUG]: Newbie Question re TFileSt... Peter Harrison
- Re: [DUG]: Newbie Question re TFileSt... Aaron Scott-Boddendijk
- Re: [DUG]: HELPPPPPPPP !!!!! Mike Osborne