On Sat, 11 Apr 2009, lloyd thomas wrote:
> Need Help please "confini :=
> ExtractFilePath(GetModuleName(0))+'\myfile.ini';" returns C:Program
> FilesMyApp\myfile.ini should be C:\Program Files\MyApp\myfile.ini . Am I
> doing something wrong?
>
> The Problem is intermitent
>
> {$IFDEF Windows}
> confini := ExtractFilePath(GetModuleName(0))+'\Myfile.ini';
> {$ENDIF}
> {$IFDEF Linux}
> confini := GetAppConfigDir(True)+'/callcollex.conf';
> {$ENDIF}
>
> IniFile := TIniFile.Create(confini);
>
> returns an error as follows
> project raised exception class 'EFopenError' with message:
> Unable to open file "C:Program FilesMyApp\myfile.ini"
Try using ParamStr(0) instead of GetModuleName()
I've never had any problems with that.
Michael.
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
