Critical error dll функции

Здравствуйте !

Использую dll библиотеку --> https://www.mql5.com/ru/code/7084, ITTPSymbol.dll

код библиотеки :

library ITTPSymbol;
 
 uses classes, Dialogs,sysutils;



{$r *.res}
function CreateFile(Path: Pchar ;  Symbol: Pchar;  Priсe: integer ): integer; stdcall;
 
var outfile: TextFile;
 
begin
AssignFile(outfile, string(Path)+'\' + string(Symbol) + '.txt');
 
 try
   Rewrite(outfile);
   writeln(outfile, Priсe);
   CloseFile(outfile);
   Result:=0;
 except
   Result:=1;
 end;
   Result:=0;
 
end;
 
exports CreateFile;
 
end.

в коде использую все как написано :

#import "ITTPSymbol.dll"  
    int CreateFile(string Path, string symbol, int Priсe);

//вызов функции 
CreateFile(Path, Symbol(), Price);

работает нормально, создает текстовый файл txt, записывает данные

но проблема в том что время от времени в журнале вылетает ошибка :

function 'CreateFile' call from dll 'ITTPSymbol.dll' critical error
expert stopped

и все.

В чем проблема ? в чем фишка, если 90 % времени работы все нормально, а потом хоп и ошибка.... как можно исправить ?