Главная Случайная страница


Полезное:

Как сделать разговор полезным и приятным Как сделать объемную звезду своими руками Как сделать то, что делать не хочется? Как сделать погремушку Как сделать так чтобы женщины сами знакомились с вами Как сделать идею коммерческой Как сделать хорошую растяжку ног? Как сделать наш разум здоровым? Как сделать, чтобы люди обманывали меньше Вопрос 4. Как сделать так, чтобы вас уважали и ценили? Как сделать лучше себе и другим людям Как сделать свидание интересным?


Категории:

АрхитектураАстрономияБиологияГеографияГеологияИнформатикаИскусствоИсторияКулинарияКультураМаркетингМатематикаМедицинаМенеджментОхрана трудаПравоПроизводствоПсихологияРелигияСоциологияСпортТехникаФизикаФилософияХимияЭкологияЭкономикаЭлектроника






Пример выполнения. Создать проект “Таблица конвертации” для конвертации с учетом комиссии рублей России в валюты США, Великобритании и Европейского союза





Задание

Создать проект “Таблица конвертации” для конвертации с учетом комиссии рублей России в валюты США, Великобритании и Европейского союза.

Выполнение

1. Запустить Delphi.

2. Создать в ней новое приложение.

3. Присвоить свойству Caption компонента Form1 значение Пересчет денежных сумм.

4. Сохранить модуль под именем Prg_11_1_, а проект под именем Prg_11_1.

5. Установить на форме компоненты: однострочные редакторы Edit1 и Edit2, метки Label1 - Label4, кнопки Button1 - Button7 (со страницы Standard), таблицу строк StringGrid1 (со страницы Additional). Компоненты расположить, как показано на рис. 11.1.

6. Задать следующие свойства компонент:

Компонент Caption (Надпись) Name (Имя) Описание функций

 

StringGridl   StringGridl Основная таблица
Editl   EdCell Редактирование ячейки
Edit2   EdSum Редактирование суммы
Label1 Редактор ячеек Label1 Поясняющая надпись
Label2 Сумма для конвертации Label2 Поясняющая надпись
Label3 Таблица Label3 Заголовок
Label4 LbDate Label4 Текущая дата
Button1 OK SellAgree Принятие изменений текущей ячейки
Button2 Принято SumAgree Принятие суммы и расчет по курсу
Button3 Выход Exit Выход из приложения
Button4 < DecCol Уменьшение числа столбцов на 1
Button5 > IncCol Увеличение числа столбцов на 1
Button6 > DecRow Уменьшение числа строк на 1
Button7 < IncRow Увеличение числа строк на 1

 

рис. 11.1. Заготовка интерфейса проекта "Таблица"

После вышеперечисленных установок интерфейс проекта примет вид рис. 11.2.

рис. 11.2. Интерфейс проекта в режиме конструирования

7. Листинг модуля формы проекта:

unit Prg_11_1_;

Date: 2015-05-22; view: 710; Нарушение авторских прав; Помощь в написании работы --> СЮДА...



mydocx.ru - 2015-2024 year. (0.006 sec.) Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав - Пожаловаться на публикацию