Формализация задачи
Словесное описание алгоритма
Листинг программы
Тестирование
Отладка
Формализация задачи
Возможно вы искали - Курсовая работа: Разработка программы при помощи языка низкого уровня ассемблер
Разработка программы представления табличных данных в виде диаграммы прямоугольников.
Словесное описание алгоритма
Нажатием кнопки «Новый» производится создание нового типизированного (nrec) файла: выводится диалоговое окно с текстовым полем для имени файла, затем это имя устанавливается в соответствие файловой переменной (fdata). Файл открывается процедурой Rewrite, затем производится проверка на наличие ошибок при открытии файла. Если открытие было успешным, то флаг is_open присваивается значение true, становятся доступными элементы для ввода записей.
Нажатием кнопки «Открыть» производится открытие файла для чтения процедурой Reset. Если файл открыт, производится считывание всех записей из этого файла и помещение их в таблицу (SG), флаг is_open устанавливается в true.
Нажатием кнопки «Ввод» проверяется не пусты ли текстовые поля EKEY и EVAL. Если «нет»б проверяются данные в поле EVAL. Если эти данные являются числом, то данные из EKEY и EVAL записываются в таблицу.
Похожий материал - Дипломная работа: Разработка программы приема и передачи сообщений в локальной сети Microsoft
Диаграмма (GR) строится нажатием кнопки «Построить»: очищаются значения диаграммы, если в таблице значений не больше чем два, построение не выполняется.
Кнопка «Сохранить» перемещает указатель на начало файла и записывает все данные из таблицы в открытый файл.
Листинг программы
{ Листинг файла Kmain.pas }
Очень интересно - Курсовая работа: Разработка программы решения системы линейных уравнений
unit Kmain;
interface
uses
KDialog,
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Вам будет интересно - Курсовая работа: Разработка программы рисования замкнутых многоугольников на языке С++, с использованием библиотеки VCL
Dialogs, Grids, StdCtrls, ExtCtrls, TeeProcs, TeEngine, Chart, Series;
type nrec = record
key:string[20];
val:real
end;
Похожий материал - Лабораторная работа: Разработка программы формирования перестановок, сочетаний, размещений (Turbo Pascal 7.0.)
type
TFMAIN = class(TForm)
SG: TStringGrid; GR: TChart; EKEY: TEdit; EVAL: TEdit;
BENT: TButton; BNEW: TButton; BOPEN: TButton; BMAKE: TButton;