[sashgera]

Здравствуйте
При сохранении файла txt, рядом с курсором, на доли секунды возникает значок индикатора загрузки
скрин сделать не успеваю, но примерно как на этой картинке

Подскажите, как избавиться от этого значка при сохранении txt

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
  write_txt: TStringList;
  DateTime : TdateTime;
begin
    write_txt := TStringList.Create;
    write_txt.LoadFromFile('MailChecker_1.txt');
    write_txt.Strings[5] := 'проверка сохранения txt ' + DateTimeToStr(now); //записать в 5 строку файла txt
    write_txt.SaveToFile('MailChecker_1.txt');
    write_txt.Free;
end;