Thanks folks for the input on 'Is this bad programming practice or what?' I settled
for the
following which 'should' be OK:
for tval := 0 to memo1.Lines.Count - 1 do
begin
with memo1.Lines do
begin
if (directoryexists(strings[tval])) then //its DEFINITELY a directory
strings[tval] := ZipMaster1.AppendSlash(strings[tval]) + '*.*';
end;
end;
BUT after doing that I was getting all kinds of weird strings out of the result
not attributable to ZipMaster1.AppendSlash.
Oh, programming is so rewarding, I sussed it out in no time which usually would
take me a day!
If you want to cheat or simply not interested in the answer go straight to the
answer at this message bottom. Otherwise sus it out yourself.
Answer below.........
The gotcha was in Tmemo - apparently 'wordwrap' is turned on by default. I
assume the wrap drops in ASCII13 (CR) resulting in the parsing being correct,
but giving erroneous strings. wordwrap:=false fixed the nasty.
Al+
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED]
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
