Курсовая работа: Программа вычисления значения и вывода графика определенного интеграла
PutPixel(x1,y1, funct.Color);
end;
end;
x:=x+0.01;
end;
end;
В данной процедуре используя вызов функции MainFunction объекта класса TChartFunction определяются абсолютные координаты каждой точки графика в диапазоне значений, отображаемых на области отрисовки графика. Используя предварительно заданные масштаб и абсолютные координаты начала координат графика просчитываются координаты каждой точки графика.
2.5.3 Описание методики сохранения графика в графический файл
Для сохранения созданного графика в графический файл используется метод SaveToFile класса TChart. В качестве параметра в данный метод передается имя файла в который необходимо сохранять изображение.
Данная процедура создает временный объект класса TPicture, копирует канвас графика в канвас вновь созданного объекта и после этого, используя метод TPicture.SaveToFile сохраняет изображение в файл. Полный листинг данного метода представлен на рисунке 7.
procedure TChart.SaveToFile(filename: string);
var
temporary: TPicture;
begin
temporary:=TPicture.Create;
temporary.Bitmap.Width:=width;
temporary.Bitmap.Height:=height;
Temporary.Bitmap.Canvas.CopyRect(Temporary.Bitmap.Canvas.ClipRect,MainCanvas, MainCanvas.ClipRect);
Temporary.SaveToFile(filename);
temporary.Destroy;
end;
2.6 Описание модулей и форм
MainForm (MainUnit.pas) – главная форма программы на которой отображаются вычисления интегралов, а также происходит построение графиков функций
AboutForm (Abut.unit) – форма содержащая сведения о разработчике программы
EvalForm (EvalFormUnit.pas) – форма для ввода произвольных математических функций
SystemInfoForm (SysInfo.pas) – форма отображающая результат выполнения API-функции GetSystemInfo
![]() | ||
![]() |
Рисунок 8 – Схема взаимодействия форм приложения
2.7 Вызовы API -функций
В качестве задания к курсовому проекту необходимо описать и использовать в программе две API-функции: ClipCursor и GetSystemInfo.