more precautions to prevent potential errors while reading prompts
This commit is contained in:
parent
14c0341265
commit
6f037b3258
|
@ -231,6 +231,7 @@ Begin
|
||||||
FileMode := 66;
|
FileMode := 66;
|
||||||
|
|
||||||
{$I-}
|
{$I-}
|
||||||
|
Assign (PromptFile, Config.DataPath + Theme.FileName + '.thm');
|
||||||
Reset (PromptFile);
|
Reset (PromptFile);
|
||||||
Seek (PromptFile, N);
|
Seek (PromptFile, N);
|
||||||
Read (PromptFile, Prompt);
|
Read (PromptFile, Prompt);
|
||||||
|
|
Loading…
Reference in New Issue