[fpc-devel]question about compiler/messages.pas

Florian Klaempfl Florian.Klaempfl at gmx.de
Sat Oct 21 00:01:57 CEST 2000


At 20:20 20.10.2000, you wrote:
>number of string: 180
>
>   {$I-}
>    reset(f);
>   {$I+}
>   if ioresult<>0 then
>    begin
>      WriteLn('*** message file '+fn+' not found ***');
>      exit;
>    end;
>
>Why everything not found? Better use Unable open blablabla... Don't 
>confusing users ;))

Better would be to check the ioresult then and do a case ...





More information about the fpc-devel mailing list