- •Работа в среде программирования Delphi. Язык программирования Delphi
- •Функции преобразования
- •Использование функций
- •Ввод данных
- •Ввод из окна ввода
- •Ввод из поля редактирования
- •Вывод результатов
- •Вывод в окно сообщения
- •Вывод в поле диалогового окна
- •Основы визуального программирования. Разработка простейших приложений с использованием компонентов страниц Standart, Additional
- •Задания по работе с палитрой компонентов Standart.
- •Задания по работе с палитрой компонентов Additional.
- •Стандартные компоненты
- •Страница Additional
- •Страница Dialogs
- •Страница System Страница представляет набор компонент для доступа к некоторым системным сервисам типа таймер, dde, ole и т.П.
- •Разработка приложений с использованием компонентов страниц Win32 и System
- •«Использование стандартных объектов»
- •Разработка приложений с использованием графических возможностей системы Delphi
- •Работа с Базами данных в Delphi.
- •Требования к базам данных
- •Сущность bde
- •Системная информация утилиты настройки bde (bdecfg)
- •Установка драйверов odbc и других драйверов
- •Утилита Database Desktop
- •ОбъектTTable
- •Класс tDataSet
- •Работа с Данными
- •Использование SetKey для поиска в таблице
- •Использование фильтров для ограничения числа записей в DataSet
- •Обновление (Refresh)
- •Закладки (Bookmarks)
- •Создание Связанных Курсоров (Linked cursors)
- •Основные понятия о tDataSource
- •Использование tDataSource для проверки состояния бд:
- •Отслеживание состояния DataSet
- •Дополнительные сведения
- •Варианты заданий
Работа в среде программирования Delphi. Язык программирования Delphi
В среде программирования Delphi для записи программ используется язык программирования Delphi. Программа на Delphi представляет собой последовательность инструкций, которые довольно часто называют операторами. Одна инструкция от другой отделяется точкой с запятой.
Каждая инструкция состоит из идентификаторов. Идентификатор может обозначать:
Инструкцию языка (:=, if, while, for);
переменную;
константу (целое или дробное число);
арифметическую (+, -,*,/) или логическую (and, or, not) операцию;
подпрограмму (процедуру или функцию);
отмечать начало (procedure, function) или конец (end) подпрограммы ИЛИ блока (begin, end).
Программа может оперировать данными различных типов: целыми и дробными числами, символами, строками символов, логическими величинами.
Функции преобразования
Функции преобразования (табл. 1.) наиболее часто используются в инструкциях, обеспечивающих ввод и вывод информации. Например, для того чтобы вывести в поле вывода (компонент Label) диалогового окна значение переменной типа real, необходимо преобразовать число в строку символов, изображающую данное число. Это можно сделать при помощи функции FloatToStr, которая возвращает строковое представление значения выражения, указанного в качестве параметра функции.
Например, инструкция Labeii.caption := FioatTostr(x) выводит значе-ние переменной х в поле Label
Таблица 1. Функции преобразования
|
Функция |
Значение функции |
|
Chr(n) IntToStr (k) |
Символ, код которого равен n Строка, являющаяся изображением целого k |
|
FloatToStr (n) |
Строка, являющаяся изображением вещественного n |
|
FloatToStrF(n, f , k,m) |
Строка, являющаяся изображением вещественного п. При вызове функции указывают: f — формат (способ изображения); k — точность (нужное общее количество цифр); m — количество цифр после десятичной точки |
|
StrToFloat (s) |
Вещественное, изображением которого является строка s |
|
Round (n) |
Целое, полученное путем округления n по известным правилам |
|
Trunc (n) |
Целое, полученное путем отбрасывания дробной части n |
|
Frac(n) |
Дробное, представляющее собой дробную часть вещественного n |
|
Int (n) |
Дробное, представляющее собой целую часть вещественного n |
Использование функций
Обычно функции используют в качестве операндов выражений. Параметром функции может быть константа, переменная или выражение соответствующего типа. Ниже приведены примеры использования стандартных функций и функций преобразования.
n := Round((x2-x1)/dx);
x1:= (-b + Sqrt(d)) / (2*а);
m := Random(10);
cena := StrToInt(Edit1.Text);
Edit2.Text := IntToStr(100);
mes := 'x1=' + FloatToStr(xl);