You might be safer using DirectoryExists and FileExists to test these
-----Original Message-----
From: [EMAIL PROTECTED] [mailto:owner-delphi@;delphi.org.nz] On
Behalf Of Alistair George
Sent: Thursday, 24 October 2002 12:26 p.m.
To: Multiple recipients of list delphi
Subject: [DUG]: Is this bad programming practice or what?
I need to parse strings which include files and directories. If they are
a directory then I append global files. My concern is (even though I
have never met one yet) a filename with NO extension. Would this be a
concern?? code follows:
for tval := 0 to memo1.Lines.Count - 1 do
begin
with memo1.Lines do
begin
if ansipos('.', strings[tval]) = 0 then //its a directory
Strings[tval] := ZipMaster1.AppendSlash(strings[tval]) + '*.*';
end;
end;
------------------------------------------------------------------------
---
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/
---------------------------------------------------------------------------
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/