You could test the attributes - test for directory
Regards
Paul McKenzie
Analyst Programmer
SMSS ltd.
----- Original Message -----
From: "Alistair George" <[EMAIL PROTECTED]>
To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]>
Sent: Thursday, October 24, 2002 12:25 PM
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/
