Re: [fpc-pascal] DOS find

2006-02-04 Thread Tomas Hajny
On 3 Feb 06, at 17:19, DONALD PEDDER wrote: > I'm having issues with the following 2 lines of code... > > Exec(GetEnv('COMSPEC'),'/c find "'+paramstr(1)+'" qbslist.txt'); > writeln('return code ',lo(DosExitCode)); > > Even when nothing is found I still get return code 0! :-\ I need >

Re: [fpc-pascal] DOS find

2006-02-03 Thread Adam Naumowicz
On Fri, 3 Feb 2006, DONALD PEDDER wrote: > Even when nothing is found I still get return code 0! :-\ I need to > know how many strings were found (or at a minimum if none were found, > which should theoretically have a non-zero return code. I know it does > in NT, but at home in DR-DOS/MS-DOS

[fpc-pascal] DOS find

2006-02-02 Thread DONALD PEDDER
I'm having issues with the following 2 lines of code... Exec(GetEnv('COMSPEC'),'/c find "'+paramstr(1)+'" qbslist.txt'); writeln('return code ',lo(DosExitCode)); Even when nothing is found I still get return code 0! :-\ I need to know how many strings were found (or at a minimum if none w