Access violation at address 0066E9A5 in module 'Project1.exe'. Read of address 00000000 - Delphi

[mr_igolnikova]

Пожалуйста, подскажите как решить эту проблему
Программа выдает ошибку, при нажатии кнопки на форме
Вот код программы:

[Sciv]

Сообщение от mr_igolnikova

Пожалуйста, подскажите как решить эту проблему

Такие проблемы решаются либо анализом кода, либо пошаговым выполнением (а это почти одно и то же).

Проблема в следующем: Вы пытаетесь обратиться к сериям в чарте, которых предварительно не создали:

//Считывание вводимых данных
a:=StrToFloat(edit3.Text);
b:=StrToFloat(edit4.Text);
eps:=StrToFloat(edit5.Text);
F1:=Edit1.Text;
F2:=Edit2.Text;
dx:=(b-a)/4000;
//Удаление старой инфрмации поля графика
Chart1.Series[0].Clear;

[Sciv]

И ещё: вот это тоже стреляет, и должно было стрелять

writeln(StringGrid1.Cells[0,i],' ',StringGrid1.Cells[1,i],' ',StringGrid1.Cells[2,i]);

Консольный вывод в VCL-приложении автоматически распознаётся как попытка вывести информацию в файл, соответственно первый аргумент воспринимается как файловая переменная. И когда программа не находит файл StringGrid1.Cells[0,i] - она выкидывает I/O Error 105

[mr_igolnikova]

Сообщение от Sciv

И ещё: вот это тоже стреляет, и должно было стрелять

writeln(StringGrid1.Cells[0,i],' ',StringGrid1.Cells[1,i],' ',StringGrid1.Cells[2,i]);

Консольный вывод в VCL-приложении автоматически распознаётся как попытка вывести информацию в файл, соответственно первый аргумент воспринимается как файловая переменная. И когда программа не находит файл StringGrid1.Cells[0,i] - она выкидывает I/O Error 105

Я удалила эти строчки, и теперь программа оформляет шапку таблиц, но ошибка по прежнему появляется

[Sciv]

Сообщение от mr_igolnikova

Я удалила эти строчки, и теперь программа оформляет шапку таблиц, но ошибка по прежнему появляется

Не везде удалили:

   Application.ProcessMessages;
   Chart1.Series[0].AddXY(x(edit1,a0),y(edit2,a0));

[mr_igolnikova]

Сообщение от Sciv

Chart1.Series[0].AddXY(x(edit1,a0),y(edit2,a0));

Ведь это же построение графика
если убрать Series[0] то не будет работать

[mr_igolnikova]

Или может предварительно их создать? Только как?

[Sciv]

Два способа:

1. Даблклик по Чарту - Series - Кнопка Add - ввести параметры серии и сохранить
2. Из кода:

var
  ...
  chSeria: TChartSeries;

begin
  ...
  chSeria := TChartSeries.Create(nil);
  Chart1.SeriesList.Add(chSeria);
  Chart1.Series[0].Clear;
  ...
end;