Средства разработки приложений для персональных компьютеров. Ефремов О.В. - 23 стр.

UptoLike

ВУЗ: 

ТГТУ | Тамбов

Составители: 

Рубрика: 

Рис. 1. Редактор фильтра компонента OpenDialog
Панель в данном случае используется как контейнер для компонента StringGrid с целью
улучшения внешнего вида интерфейса. У панели измените значения свойств Caption (должна
быть пустая строка), а также BevelInner и BevelOuter (внутренний и внешний края – соответ-
ственно bvRaised и bvLowered).
После этого разместите на панели компонент Сетка строк (TStringGrid). Затем измените
ее свойство Align (выравнивание), чтобы оно стало равным alClient (чтобы сетка строк зани-
мала всю площадь панели). Затем у сетки строк измените следующие свойства: ColCount (4),
RowCount (10), FixedCols (1), FixedRows (0), DefaultRowHeight (20).
Свойству Caption кнопки присвойте значение ″Загрузить данные″ и измените ее размер
так, чтобы отображалась вся фраза.
Присвойте имя frmMain форме, имя sgData сетке строк, имя btnLoad кнопке, pnlBase па-
нели и odLoad диалогу открытия файла.
После этих действий форма приложения будет выглядеть, как показано на рис. 2.
Рис. 2. Внешний вид приложения после размещения компонентов и изменения их
свойств
Для сохранения файлов проекта используйте папку ″D:\Users\Студен-ты\Delphi″.
Цель создания данного приложения – после нажатия кнопки запускается стандартный диалог Windows для
открытия файла и в сетку строк загружаются данные из выбранного с помощью диалога текстового файла с
именем ″data.txt″.
Файл ″data.txt″ необходимо создать самостоятельно перед запуском приложения. Для этого можно исполь-
зовать, например, программу Блокнот из стандартного набора Windows или встроенный редактор оболочки
FAR. В последнем случае надо запустить FAR, нажать комбинацию клавиш Shift+F4, ввести имя создаваемого
файла (″data.txt″), нажать Enter, после чего откроется окно редактора. Запишите в упомянутый файл 12 чисел (ка-
ждое в отдельной строке) и нажмите F2, чтобы сохранить файл на диске.
При загрузке данных из файла должна использоваться следующая схема: числа считываются блоками по
три, при этом первое число из блока записывается во второй столбец, второе – в третий, третье – в четвертый
столбец одной строки начиная с первой; следующие три числа записываются во вторую строку и т.д. (рис. 3). В
первый столбец выводятся строки ″Ряд 1″, ″Ряд 2″, ″Ряд 3″ и т.д.
В данном случае нам известно, сколько всего чисел записано в файл и сколько строк потребуется для их
вывода, однако такая ситуация имеет место далеко не всегда, поэтому может потребоваться составлять код про-
цедуры для загрузки данных с учетом того, что количество чисел в файле заранее не известно.
Далее надо определить процедуру, выполняющуюся при нажатии кнопки btnLoadData.
Ниже приведены два варианта готовых процедур (вначале процедура для заранее известного
количества чисел, затем – для произвольного).
Название фильтра
Маска фильтра

Страницы