Помощь в учёбе, очень быстро...
Работаем вместе до победы

Описание интерфейса. 
Язык объектно-ориентированного программирования Borland Delphi

РефератПомощь в написанииУзнать стоимостьмоей работы

Процесс работы с программой заключается в выполнении следующих шагов: Кнопки для генерации точек и кнопка для запуска процесса расчета (TButon). Поле для ввода количества точек для случайной генерации точек (TEdit); Для хранения данных о точках введем тип данных tmypoint: Окно содержит следующие визуальные компоненты: Пользователь нажимает на кнопку «Рассчитать»; Внешний вид программы приведен… Читать ещё >

Описание интерфейса. Язык объектно-ориентированного программирования Borland Delphi (реферат, курсовая, диплом, контрольная)

Внешний вид программы приведен на рисунке 1.

[Введите текст].

Окно содержит следующие визуальные компоненты:

  • — поле для вывода результата (Timage);
  • — поле, содержащее список точек (TListBox);
  • — поля для ввода координат точки (TEdit);
  • — кнопка для ручного добавления точки (TButon);
  • — поле для ввода количества точек для случайной генерации точек (TEdit);
  • — кнопки для генерации точек и кнопка для запуска процесса расчета (TButon).

Порядок работы с программой

Процесс работы с программой заключается в выполнении следующих шагов:

  • 1. пользователь вводит количество точек (N), которое необходимо сгенерировать и нажимает кнопку «Сгенерировать» или вручную добавляет необходимые точки;
  • 2. пользователь нажимает на кнопку «Рассчитать»;
  • 3. программа находит все возможные квадраты, рисует их на поле для вывода результата и выводит их количество.

Структура данных

Для хранения данных о точках введем тип данных tmypoint:

  • 1. type
  • 2. tmypoint = record
  • 3. x: Integer;
  • 4. y: Integer;
  • 5. end;

Тип tmypoint представляет собой запись, которая имеет 2 поля: x и y, для хранения соответствующих координат точек.

Также нам понадобится массив points с элементами типа tmypoint, а также переменная cnt, которая хранит количество точек:

  • 1. var
  • 2. points: array [0.100 000] of tmypoint;
  • 3. cnt: Integer;
Показать весь текст
Заполнить форму текущей работой