593 	string(IPH_getDocumentsPath())

   593 	string(IPH_getDocumentsPath())

   594 {$ELSE}

   594 {$ELSE}

   595 	ParamStr(1)

   595 	ParamStr(1)

   596 {$ENDIF}

   596 {$ENDIF}

   597 	+ '/debug' + inttostr(i) + '.txt');

   597 	+ '/debug' + inttostr(i) + '.txt');

   598 	rewrite(f);

   599 	rewrite(f);

   599 	if IOResult = 5 then

   600 	if IOResult = 5 then

   600 	begin

   601 	begin

   601 		// prevent writing on a directory you do not have permissions on

   602 		// prevent writing on a directory you do not have permissions on

   602 		// should be safe to assume the current directory is writable

   603 		// should be safe to assume the current directory is writable