Borland delphi 4 0 для начинающих работа с формами


Содержание

Основы работы с Delphi

– ознакомиться с назначением основных окон системы Delphi, командами создания и сохранения программы (проекта);

– овладеть техникой размещения компонентов на форме, изучить их свойства на конкретных примерах.

2. Основные сведения

2.1. Назначение окон, создание и сохранение программы (проекта)

Запуск системы Delphi производится щелчком левой клавиши мыши (ЩЛК) по пунктам в следующей последовательности:

→ → → , или двойным щелчком левой клавиши мыши (2ЩЛК) на ярлыке системы Delphi.

На экране дисплея появляется 5 окон (см. рис. 4.1), каждое из них имеет свой заголовок.

1. Главное окно (Delphi 7 – Project1). Располагается в верхней части экрана и содержит:

– строку заголовка, где указано имя открытого проекта – Project1;

– строку меню, которая имеет стандартный вид, содержит 11 пунктов. При ЩЛК на одном из пунктов открывается ‘ниспадающее’ меню с командами, выполняемыми системой Delphi;

– панель инструментов, которая расположена ниже строки меню слева и содержит кнопки, обеспечивающие реализацию наиболее часто встречающихся команд;

– палитру компонентов (Component Palette) с вкладками панелей Standard (Стандартная), Additional (Дополнительная) и т. д. Под названием вкладок расположены кнопки, которые отображают заготовки компонентов. Название компонента дается ‘всплывающей’ подсказкой. Например, панель Standard содержит компоненты Frames (Рамы, Группы), Main Menu (Основное меню), Popup Menu (Вспомогательное меню), Label (Метка), Edit (Редактор), и т. д. На панели Standard сгруппированы стандартные компоненты управления. Панель Win32 содержит компоненты для работы с операционной системой Windows, а панель Internet – компоненты для организации работы в Интернете и т. д.

2. Окно инспектора объекта (Object Inspector) служит для визуальной настройки объектов. Здесь изменяются свойства (Properties) объектов, выбираются и настраиваются события (Events), на которые будут реагировать объекты программы.

3. Окно формы (Form 1). Это прообраз окна будущей программы, куда размещаются нужные компоненты. Заготовка первого окна имеет имя Form1, второго – Form2 и т. д.

4. Окно Редактора текста программы (Unit1.pas). В это окно помещаются описания и операторы Object Pascal, создаваемые системой Delphi и вводимые программистом. Ключевые слова и некоторые идентификаторы (имена) выделяются Редактором текста программы жирным шрифтом. Принцип работы Редактора текста аналогичен принципам работы большинства редакторов операционной системы Windows.

5. Окно дерева объектов (Object Tree View). В нем наглядно отображаются связи между отдельными компонентами, размещенными на активной форме. ЩЛК на любом компоненте в этом окне активизирует соответствующий компонент в окне формы и отображает свойства этого компонента в окне Инспектора объекта. 2ЩЛК приводит к срабатыванию механизма Code Insight (Назначить код), который вставляет в окно Редактора текста программы заготовку процедуры-обработчика события OnClick (на щелчок).

Для системы Delphi каждая программа (даже незавершенная) – это отдельный проект, состоящий минимум из 8 файлов. Поэтому каждый проект следует хранить в отдельной папке. Папка создается заранее (например, программой Проводник) с именем, удовлетворяющим программиста. Для программиста особенно важны: файл проекта (Project1.dpr), файл модуля (Unit1.pas) и файл формы (Form1.dfm). Сложный проект может иметь несколько файлов модулей и форм.

Создание нового проекта часто производится после запуска системы Delphi, для этого необходимо выполнить ЩЛК на:

Сохранять проект следует в такой последовательности:

– сохраняются файлы форм и модулей ЩЛК на:

– сохраняется файл проекта ЩЛК на:

Если проект был сохранен, системе Delphi известно, где он хранится, и она обновляет все файлы измененного проекта при ЩЛК на:

Чтобы открыть существующий проект необходимо ЩЛК на:

Для того чтобы система Delphi начала компиляцию и выполнение составленной программы (проекта) необходимо ЩЛК на:

Если в программе (проекте) нет синтаксических ошибок, то система Delphi создает программу на языке процессора и на экране появляется рабочее окно проекта. В противном случае активизируется окно Редактора текста программы, в котором полосой коричневого цвета выделяется строка с предполагаемой ошибкой. В нижней части этого окна на английском языке указывается название ошибки и её системный код.

2.2. Основные этапы составления программы

Программа, созданная в Delphi, состоит из основной программы и одного или большего числа модулей. Основная программа автоматически создается Delphi, практически не изменяется программистом и хранится в файле, имеющим тип .dpr. Модули, в которых программист осуществляет программирование задач, хранятся в файлах, имеющих тип .pas.

Все компоненты окна программы размещаются на форме. Для каждой формы, которую проектирует программист, Delphi создает отдельный модуль.

Модуль – это автономно компилируемая программная единица, предназначенная для размещения в ней программистом фрагментов программы.

Программирование в Delphi проводится с учетом взаимодействия 2-х процессов: процесса создания (оформления) окна программы и процесса написания фрагментов программы на языке Object Pascal, которые по общепринятой терминологии будем называть кодом. Между содержимым окна формы (Form1) и окна Редактора текста программы (Unit1.pas) существует неразрывная связь, которая строго отслеживается системой Delphi. Поэтому при составлении программы условно выделим следующие этапы: – оформление окна программы (размещение компонентов на форме);

– изменение свойств компонентов;

– получение заготовок процедур-обработчиков событий и их программирование (составление модуля программы).

2.3. Оформление окна программы (размещение компонентов на форме)

Окно формы Form1, как прообраз окна будущей программы, должно быть тщательно продумано и скомпоновано, так – чтобы оно было понятным и ‘дружелюбным’ для пользователя.

Для оформления окна программы необходимо иметь описание алгоритма решения задачи с высокой степенью детализации, в котором указываются виды представлений и места расположения в окне исходных данных, промежуточных и окончательных результатов. Естественно, программист обязан знать назначение и основные свойства многих компонентов системы Delphi (их число превышает 387).

При оформлении окна программы желательно придерживаться следующих положений:

– управляющие элементы и функционально связанные с ними компоненты окна должны быть зрительно объединены в группы, заголовки которых коротко и четко поясняют их назначение;

– в окне должно отображаться главное, а все детали и дополнительную информацию можно отнести на вспомогательные окна;

– соблюдать единство стилистических решений в окне или во всех окнах в многооконной программе. Недопустимо, чтобы сходные по функциям компоненты назывались по-разному или размещались в разных местах окна.

Размещение компонента на форме производится просто. Для этого на палитре компонентов выбирается панель, ЩЛК на нужной вкладке, например на вкладке Standard (Стандартная), на вкладке Additional (Дополнительная) и т.д. По всплывающей подсказке находится нужный компонент, например Edit. Всплывающая подсказка появляется при наведении курсора мыши на любую кнопку панели. Затем компонент размещается на форме в следующей последовательности:

– компонент выбирается щелчком левой клавиши мыши на нём;

– курсор мыши подводится к точке рабочей области формы, где должен располагаться левый верхний угол прямоугольного компонента и производится ЩЛК. В месте щелчка появится элемент управления, например Edit1. Его можно перетаскивать по форме и изменять размеры при помощи маркеров, расположенных на сторонах и в углах прямоугольника. Для этого необходимо: щелкнуть левой кнопкой мыши внутри компонента, а затем при нажатой левой кнопке перемещением мыши перетаскивать компонент в нужное место формы.

Аналогично, ЩЛК на одном из маркеров (черный квадратик) при нажатой левой кнопке перемещением мыши можно изменять размеры прямоугольного компонента.

2.4. Назначение и основные свойства некоторых компонентов

При оформлении окна, под компонентом будем понимать функциональный элемент, имеющий определенные свойства и размещаемый в окне формы. Компонент будем рассматривать как заранее приготовленный фрагмент программы, который вставляется программистом в разрабатываемую программу. В этом смысле он является образцом (заготовкой), с помощью которого можно создать несколько похожих элементов, вначале различающихся только именами (например: Label1, Label2 и т.д.).

После размещения компонентов на форме им следует задать нужные свойства. Обычно изменение нескольких свойств производится в окне Object Inspector’ (‘Инспектор объекта’). Эти изменения называются статическими. Свойства объектов можно также изменять операторами, которые пишутся программистом в программе и называются динамическими изменениями. В этом случае в записях операторов применяются составные имена.

Составное имя – это два или большее число слов английского языка, разделенных десятичной точкой. Первое слово является именем компонента, а последующие являются именами его свойств, их подсвойств или методов (подпрограмм). Эти имена следует читать справа налево.

– имя Label1.Caption читается: свойство Caption (Надпись) компонента

– имя Memo1.Lines.Add читается: метод Add (Добавить) свойства Lines

(Строки) компонента Memo1.

В окне ‘Object Inspector’ свойства изменяются в следующей последовательности:

– выбирается нужный компонент, помещенный на форме, ЩЛК на нем. Выбор компонента можно произвести и в выпадающем списке в верхней части окна ‘Object Inspector’;

– в окне ‘Object Inspector’ выбирается страница ‘Properties’ (‘Свойства’), которая открывается при ЩЛК на вкладке ‘Properties. Отметим что, после первого запуска, Delphi автоматически открывает вкладку Properties’;

– в левой колонке страницы находим название свойства, а в правой колонке – его значение, которое меняется на новое. Изменение можно производить вводом нового значения с клавиатуры или выбором одного из предопределенных значений из списка.

Свойства могут быть простыми, определяемыми одним значением, или сложными (многосоставными), определяемыми совокупностью значений. Слева от названия сложного свойства помещен символ ‘+’. При двойном щелчке левой клавиши мыши (2ЩЛК) на его названии, свойство ‘раскрывается’ и показывает все свои вложенные подсвойства. В некоторых случаях для редактирования свойства вызывается специальный редактор.

Программист при оформлении окна программы изменяет только нужные ему свойства компонентов, которые будем называть основными. Остальные свойства компонентов определяются системой Delphi и остаются неизменными. В этом случае принято считать, что свойства определены ‘по умолчанию’.

Компонент Form

Пустая форма с заголовком Form1 является окном будущей программы, имеет множество различных свойств. Заголовок формы задается в свойстве Caption (Надпись). Чтобы его изменить, надо в окне ‘Object Inspector’ найти строку, в левой части которой написано Caption, и в правой части этой строки (в небольшом поле ввода) указать новое название, например ‘Вычисление суммы’. Это название появляется в заголовке формы по мере его ввода.

Форма TForm1 имеет свойства Height (Высота) и Width (Ширина), которые автоматически определяются системой Delphi так, чтобы форма не казалась слишком маленькой или слишком большой на экране. Свойство Position (Позиция) управляет размещением формы относительно границ экрана: его значение по умолчанию poDesigned (При конструировании) размещает форму так, как она размещена на этапе оформления. Значение этого свойства можно изменить из программы на poScreenSenter (По центру экрана). Свойство Name (Имя) определяет имя, под которым компонент будет известен программе. На первых шагах программирования (для исключения ошибок в программе) рекомендуется оставлять значение свойства Name по умолчанию.

Нижеприведенные компоненты Label, Edit, Memo и ComboBox находятся на панели Standard (Стандартная) палитры компонентов и применяются для ввода и отображения текстовой информации.

Компонент Label (Метка)

Используется для размещения в окне коротких надписей. Основное его свойство – Caption (Надпись), значением которого является текст, отображаемый в компоненте.

Если поместить компонент на форме (по умолчанию в нем будет текст Label1), затем в окне ‘Object Inspector’ найти строку, в левой части которой написано Caption , и в правой части этой строки вместо Label1 ввести новый текст (например, ‘Ввести значение x=’), то этот текст появится в компоненте. В дальнейшем описанную в этом абзаце процедуру будем называть короче: свойству Caption задать значение ‘Ввести значение х=’.

Значение этого свойства, определенного на этапе оформления окна, можно изменить при выполнении программы (т.е. программно) оператором присваивания: Label1. Caption: = ‘Новое значение х =’;

Этот оператор свойству Caption (Надпись) компонента Label1 присвоит строковую константу ‘Новое значение x=’.

Компонент Edit (Редактор)

Предназначен для ввода, отображения и редактирования одной текстовой строки. Система Delphi автоматически изменяет значения свойств Height (Высота) и Width (Ширина), если программист изменяет размеры Edit с помощью маркеров, расположенных на его сторонах. Основное свойство – Text (Текст), значением которого является вводимый или выводимый текст. Обычно вначале, на этапе оформления окна, этому свойству, задают пустую строку. Затем значение свойства Text изменяется программно, например оператором присваивания:

Edit1.Text: = ’Ввести элемент матрицы а [1,1]’;

Этот оператор свойству Text (Текст) компонента Edit1 присвоит строковую константу ‘Ввести элемент матрицы a[1,1]’.

Компонент Memo (Многострочный текстовый редактор)

Используется для ввода, отображения и редактирования многострочного текста. Текст является значением свойства Lines (Строки), имеет тип String (Строковый) и представляет собой пронумерованный набор строк. Нумерация строк начинается с нуля. Для занесения текста в очередную строку окна редактора вызывается стандартная процедура Add (Добавить), которая называется методом. Например, вызвать процедуру Add и отобразить в очередной строке редактора текст ‘Данные введены’ можно, записав в модуле оператор:

Memo1.Lines.Add (‘Данные введены’);

Этот оператор вызывает стандартную процедуру Add (Добавить) свойства Lines (Строки) компонента Memo1, которая реализует отображение строковой константы ‘Данные введены’ в очередной строке окна Memo1. При записи параметров процедуры Add часто применяется символ +, который является знаком операции склеивания (конкатенации) строк. Например, если в программе имеется целая переменная n, определяющая число студентов в группе, то вывести в окно Memo1 информацию об этом можно, записав в модуле оператор вызова процедуры Add:

Memo1.Lines.Add (‘Число студентов в группе: ’+IntToStr(n));

где IntToStr(n) – стандартная функция, которая преобразует целый тип переменной n в строковый.

Для очистки окна Memo1 вызывается стандартная процедура без параметров Clear (Очистить) оператором:

На этапе оформления окна система Delphi автоматически изменяет значения свойств Height (Высота) и Width (Ширина), если программист изменяет размеры Memo с помощью маркеров, расположенных на его сторонах.

Компонент Button

Командная кнопка применяется для управления работой программы. Кнопка Button является компонентом операционной системы Windows. Связанная с кнопкой процедура – обработчик события OnClick (На щелчок) реализует алгоритм решения задачи, записанный программистом на языке Object Pascal. Основное свойство кнопки – Caption (Надпись), значение которого должно коротко и четко пояснять назначение кнопки.

Компонент ComboBox (Блок с комбинированным

раскрывающимся списком)

Предназначен для создания раскрывающегося списка (например, списка фамилий) и выбора одного элемента списка. Основным свойством является Style (Стиль), значение которого определяет тип списка. Создать список можно в такой последовательности:

– в окне ‘Object Inspector’ свойству Style присваивается значение DropDownList (Раскрывающийся вниз список);

– задается набор пунктов, которые входят в список. Для этого в окне ‘Object Inspector’ находим свойство Items (Пункты), которое имеет кнопку … Редактора списка строк. При ЩЛК на кнопке … открывается диалоговое окно String List Editor (Редактор списка строк), в рабочую область которого вводятся пункты списка (например, Иванов, Петров и т.д.) по одному в каждую строку, завершая ввод каждой строки нажатием клавиши Enter. После ввода списка необходимо ЩЛК на кнопке Ok Редактора списка строк.

Нумерация элементов списка начинается с 0, а их выбор обычно производится программно. Для выбора элемента списка свойству ItemIndex (Индекс пункта) задается номер элемента. Обычно вначале задают свойству ItemIndex значение 0 оператором присваивания:

который отображает в компоненте ComboBox1 нулевой элемент списка (например, Иванов). Затем свойству ItemIndex присваивают нужное значение. Например, выполнение оператора присваивания

приведёт к отображению в компоненте ComboBox1 случайно выбранного элемента из введенного списка.

В вышеприведенном операторе для определения номера элемента списка применяется стандартная функция Random(N). Эта функция вычисляет псевдослучайное число, равномерно распределенное на отрезке [0,N]. Верхняя граница N отрезка задается подсвойством Count (Число пунктов) свойства Items (Пункты) компонента ComboBox1. Поскольку подсвойство Count предназначено только для чтения, то его нет в окне ‘Object Inspector’ и его нельзя ввести вручную.

1. Фаронов В.В. Delphi. Программирование на языке высокого уровня. Учебник для вузов. – СПб.: Питер, 2007. – 640 с.

Блог GunSmoker-а

. when altering one’s mind becomes as easy as programming a computer, what does it mean to be human.

3 июля 2010 г.

Как настроить Delphi 2010, чтобы она выглядела как Delphi 7

Я не собираюсь обсуждать, какой интерфейс лучше — умалчиваемый в Delphi 2010 или old-school Delphi 7 (лично я предпочитаю новый), но я хочу показать, как вы можете настроить Delphi 2010 так, чтобы она выглядела и «чувствовалась» как Delphi 7.

Один из самых частых затыков при обновлении версии Delphi — незнакомый интерфейс. Человек вроде уже и хочет обновиться (всякие вкусности пощупать, часто — поддержку Windows Vista/Windows 7), но. родная 7-ка ближе к телу. Что ж, с этой статьёй у вас будет на одну причину меньше использовать Delphi 7 (а желающие всё же остаться на Delphi 7 читают тут).

Итак, по-умолчанию 2010-я студия имеет такой вид:

Ниже я приведу набор шагов, которые нужно сделать, чтобы «превратить» Delphi 2010 в Delphi 7. Заметьте, что не все из перечисленных шагов нужно выполнять на вашей конкретной конфигурации — это зависит от ваших настроек. Некоторые шаги могут быть у вас уже сделаны.

1. Отстыковка окон.

Первое, что мы сделаем — отстыкуем окна. Для этого вы можете щёлкнуть на любом окне и сбросить галочку «Dockable»:

После этого окно отстыковывается от главного окна и будет плавать отдельно. В принципе, даже необязательно снимать галку: просто схватили блок за заголовок — и тащите. Он сам отстыкуется. Вот вид окна Delphi после отстыковки инспектора объектов:

Вы можете руками отстыковать все окна. Или вы можете просто переключиться на предопределённый шаблон раскладки окон (такой шаблон называется Desktop-ом или рабочим столом). Для этого разверните список рабочих столов в главном окне и выберите рабочий стол «Classic undocked»:

Если вы не видите этой панели — вы можете переключиться на другой рабочий стол через меню («View»/»Desktops»/»Classic undocked»):

В результате у вас должно получиться что-то такое:

Как видите, все окна плавают — всего в два щелчка мыши!

2. Отстыковка дизайнера форм.

Второе, что мы сделаем — отстыкуем дизайнер форм, ведь отстыковать его методом, указанным выше, нельзя. Для этого мы идём в опции IDE («Tools»/»Options»):

В появившемся окне сбрасываем галочку «Embedded designer» в разделе «Environment Options»/»VCL Designer»:

После сброса галочки среда попросит у вас перезапуск:

Закрываем все окна и перезапускаем Delphi. После перезапуска дизайнер форм будет плавающим окном:

Окей, щелчков здесь было больше и нам потребовался перезапуск IDE. Но всё равно не сложно.

Примечание: Начиная с Delphi XE3, опция «Embedded designer» скрыта из настроек среды, но её всё ещё можно изменить вручную, отредактировав ключ реестра HKEY_CURRENT_USER\Software\Embarcadero\BDS\10.0\Form Design (10.0 — это для XE3), изменив значение Embedded Designer в False . Учтите только, что FireMonkey поддерживает только интегрированный дизайнер.

3. Палитра компонент.

Далее — включение палитры компонент «как в Delphi 7». Во-первых закройте плавающее окошко «Tool Palette» (вернуть обратно его можно из меню «View»/»Tool Palette»), затем щёлкните правой кнопкой по главному окну и выберите палитру «Component»:

Кстати, если панельки «Desktop» вы у себя не нашли (помните, выше, когда мы переключались на «Classic undocked»?), то вы также можете включить её тут — щёлкайте по пункту «Desktop». В любом случае, в итоге вы получаете свою палитру компонентов «в стиле Delphi 7»:

Три щелчка — и любимая палитра компонент снова с вами.

4. Переключение сортировки в инспекторе объектов.

Последний шаг — инспектор объектов. В принципе, нельзя сказать, что это специфично для Delphi 2010 — в Delphi 7 у инспектора объектов тоже было два варианта отображения. Но, на всякий случай, я упомяну про это тут.

Вы можете переключаться между двумя видами инспектора объектов, щёлкая правой кнопкой по нему и выбирая «Arrange»/»be Category» или «Arrange»/»by Name»:

Вот вид инспектора с сортировкой по категориям:

А вот с сортировкой по именам:

Выберите вид, к которому вы привыкли в Delphi 7.

5. Устанавливаем справку из D7 в D2010.

Ещё одна претензия к Delphi 2010 — её изменившаяся справочная система. Позвольте мне снова остаться в стороне от вопроса что лучше — я просто покажу, как вы можете встроить свою любимую справку от Delphi 7 в Delphi 2010.

Для этого есть два способа:

  1. Минимальная интеграция — открытие справки отдельной командой.
  2. Максимальная интеграция — подмена штатной справки.

Первый способ проще и он не требует сторонних решений, плюс вы не теряете существующую функциональность. Но и по удобству он ниже: вам придётся вызывать справку отдельной командой.

Способ два посложнее, вам также понадобится скачать сторонний эксперт, но зато вы можете подменить встроенную справку. К сожалению, при этом вы лишаетесь справки по диалоговым окнам и прочим изменившимся за это время вещам. Впрочем, никто не запрещает вам вызывать встроенную справку руками через меню Help.

Итак, способ первый: скопируйте файлы справки от Delphi 7 на вашу машину (куда — не суть важно, главное, чтобы в записываемую папку). Далее, идите в меню настройки утилит «Tools»/»Configure tools»:

В открывшемся окне щёлкайте по кнопке «Add» для добавления новой утилиты:

После этого открывается окно создания команды вызова новой утилиты. Вводите такую информацию:

  • Title — любое. Это имя команды будет показываться в меню.
  • Program — «winhlp32.exe». Если вы работаете на Windows Vista или выше, вам нужно доустановить поддержку устаревшего формата справки, как указано в этой статье.
  • Working dir — каталог, куда вы положили файлы от справки Delphi 7.
  • Parameters — «-k $CURTOKEN d7.hlp». Вы также можете указать полный путь к D7.hlp (включая каталог, только не забудьте про кавычки, если ваш путь содержит пробелы), если у вас возникают проблемы с открытием справки. $CURTOKEN — это текущее слово в редакторе Delphi (раскройте список Macros, чтобы увидеть другие варианты). А «-k» — указание на открытие справки по слову в индексе. В принципе, вы можете убрать эту часть, оставив только имя файла справки.

После сохранения команды, вы теперь можете вызывать справку Delphi, выбирая её из меню:

Что касается способа два, то вам также нужно скопировать файлы справки Delphi 7 на свою машину (кто-бы сомневался!). Кроме того, вам также нужно доустановить поддержку справки WinHelp, если вы работаете в Vista или выше.

После подготовки вам нужно скачать с CodeCentral эксперт (расширение) к IDE для интеграции справки. Вот вариант 1. Вот вариант 2. Они весьма похожи и ставятся примерно одинаково, но мне больше понравился второй — он и покрасивше и позволяет использовать кнопку F1. Поэтому я буду описывать процесс для второго эксперта, но первый ставится полностью аналогично — надеюсь, вы сумеете при желании разобраться с ним самостоятельно по аналогии.

Для качала распакуйте скачанный архив. Лучше всего распаковывать в свою папку с проектами или вроде того. Далее, запускаете Delphi 2010 и открываете пакет из папки Packages. Варианта для Delphi 2010 там нет, но это не имеет значения — просто открывайте вариант для самой последней версии Delphi. Вот открытый пакет в менеджере проектов Delphi 2010:

Далее щёлкайте по нему правой кнопкой и выбирайте Install:

При этом эксперт будет скомпилирован и установлен в IDE. Всё, можете закрывать все файлы (сохранив изменения). Файлы с диска, понятно, удалять не надо :)

Теперь осталось только настроить эксперт. Для этого открываем меню «Help»/»Delphi Help Expert»:

Откроется окно настроек, где вы можете задать аж три разных вида справки!

Тут вообще всё тривиально: есть три типа справки — CHM, HLP и интернет. Вы можете указать источник для любой справки и забиндить любую справку на любую из комбинаций кнопок: F1, Ctrl + F1, Shift + F1, Alt +F1. Достаточно просто.

К примеру, на снимке экрана выше я указал открывать справку от Delphi 7 по кнопке F1, а по Ctrl + F1 — открывать справку по Delphi в интернете (вот вам строка для Copy&Paste: «http://www.google.ru/search?q=%s+site:http://docwiki.embarcadero.com/»). docwiki.embarcadero.com — это Вики для продуктов Embarcadero. Т.е. пополняемая сообществом справка. Более полный вариант обычной справки.

Итак, когда вы всё настроили, закрывайте окно настроек и жмите F1. Бац, вылезает справка Delphi 7. Если при этом вы стояли в редакторе кода на каком-то слове, то это слово будет указано в индексе (в этом примере я стоял на TRegistry):

Если же вы нажмёте Ctrl + F1, то откроется ваш браузер по-умолчанию с online-справкой (пример с тем же TRegistry):

Итак, последняя преграда пала перед нашим натиском :)

Бонус-примечание: если вы хотите ещё больше возможностей со справкой и чувствуете, что вы уже не совсем начинающий — вы можете установить этот навороченный IDE Expert, вместо простых экспертов, упомянутых выше. Для него есть даже видео-инструкция. Посмотрите, не пожалеете: будете потом облизываться и срочно его себе поставите :D (лично я поставил себе именно его)

6. Прочие финты ушами.

В заключение хотелось ещё сказать, что вы можете стыковать любые окна с любыми другими в любых комбинациях. Чтобы окно можно было пристыковать — оно должно быть «Dockable». Помните, мы снимали такую галочку в первом пункте? Вот, если хотите пристыковать окно — её надо установить, если она не стоит. А если вы двигаете окно, и оно очень некстати хочет пристыковаться — зажмите Ctrl.

Кроме стыковки вы также можете «приколоть» окно к другому, на манер панелек в Photoshop. Для этого перетащите окно на закладку панели в другом окне. А если закладок у вас на экране нет — то кидайте одно окно на центр другого (если кидать на сторону — оно пристыкуется вместо прикалывания). К примеру, бывает достаточно удобно совместить все вспомогательные окна в одно окно:

Когда я ещё сидел на Delphi 7, я именно так и делал.

7. Итог.

Итак, мы смогли «сделать из Delphi 2010 Delphi 7» и сделать это достаточно просто. Никаких сторонних прибамбасов — всё штатными средствами (окей: кроме справки). Ну а теперь, найдите 10 отличий (фоновый рисунок не считается! :D ):

Работа на языке программирования Borland Delphi 7.0

Borland Delphi —интегрированная среда разработки ПО для Microsoft Office, Mac OS, iOS и Android на языке Delphi (ранее носившем название Object Pascal). Embarcadero Delphi является частью пакета Embarcadero RAD Studio и поставляется в четырёх редакциях: Starter, Professional, Enterprise и Architect. В данной работе используется редакция Borland Delphi 7 Enterprise.

Delphi 7, выпущенная в августе 2002 года, стала стандартном для многих разработчиков Delphi. Это один из самых успешных продуктов Borland из-за стабильности, скорости и низких требований к аппаратному обеспечению. В Delphi 7 добавлены новые компоненты для Windows XP и увеличено число компонентов для создания Web-приложений.

Далее на рисунке 9 представлено само программное обеспечение Borland Delphi 7. Интерфейс его достаточно интуитивен и дружелюбен к пользователю. Кроме связки языка программирования непосредственно с самой базой данных здесь осуществляется и реализация интерфейса оболочки программы-базы данных.

Рисунок 9. Интерфейс Borland Delphi 7.

Для этого необходимо предпринять следующие шаги: на основной панели выбрать вкладку ADO, на которой нужно воспользоваться функцией ADOConnection. И после того как вы выбрали данный пункт, необходимо сделать клик на форме, которую мы ходим связать с нашей базой данных. Затем в поле ConnectionString выбрать из множества возможных типов подключения Microsoft Jet 4.0 OLE DP Provider, после чего на следующей вкладке этого окна указать связываемую базу данных. Двойной ОК, и теперь в поле Loginprompt определить значение как ложь, чтобы в дальнейшем не указывать всякий раз пароль и логин доступа к базе данных.

Рисунок 10. Добавление элементов связки БД с Delphi.

Из того же окна, откуда мы брали ADOConnection, мы берем ADOQuery, в одной из полей которого мы выбираем Connection — ADOConnection. Этот элемент позволяет нам осуществлять чтение, выполнение, запись в нашей БД. После чего мы устанавливаем в свойствах этого элемента в ячейке SQL следующий код (Рисунок 11):

Рисунок 11. Выборка всех столбцов одной из таблиц для дальнейшего отображения в БД.

Далее на форме располагается элемент Data Source вкладки Data Access, в которой в поле DataSet выбирается ADOQuery. Для отображения содержимого на форме используется элемент DBGrid закладки DataControls. Результат операций, описанных выше, приведет к следующему (Рисунок 12).

Рисунок 12. Результат действий, приводящих к отображению содержимого таблиц в форме.

Затем на форму кидаются 4 элемента BitBtn панели Additional. Это будущие кнопки данной формы. Как видно на рисунке 13 названия кнопок, задаваемые в поле Caption, и, следовательно, их функционал следующие: добавление новой записи в таблицу, ее изменение, и две еще не переименованные кнопки — удалить (запись из таблицы) и кнопка возврата на главную форму, о которой будет дана информации дальше по работе.

Рисунок 13. Добавление кнопок на панель.

Следующим этапом идет создание новой формы для того, чтобы было отдельное окошко, позволяющее осуществлять ввод и изменение записей в таблицу. После создания этой формы на ней располагается такое количество элементов DBEdit, которое соответствует количеству столбцов в таблице, причем только те столбцы, информацию в которые нужно записывать механически, и когда не нужен выбор из предлагаемых вариантов. В случае с базой данных текущей работы такими столбцами являются все.

Рисунок 14. Вид второй формы.

На рисунке 14 отображено содержание формы ввода и изменения записей после всех действий, описанных в предыдущем абзаце, а также были добавлены подписи к каждому окошку ввода в соответствии со столбцами таблицы, к которой привязана первая форма. Далее были добавлены два элемента BitBtn, которые сразу были переименованы в ОК и Назад, для возврата к первой форме.

После чего появляется необходимость связки второй формы со первой. Это осуществляется следующим образом: например, на кнопку Назад мы прописываем такой код путем двойного клика по этому элементу «Form1.Show;». После чего необходимо запустить проект, и тогда среда программирования автоматически спрашивает, не связать ли ей обе формы (Рисунок 15).

Рисунок 15. Связка двух форм.

Теперь для каждого элемента DBEdit в поле DataSource выбрать тот источник информации, который имеется на первой форме. А в поле DataField выбрать тот столбец, ввод в которой мы хотим осуществить. Когда работа со всеми элементами завершена, можно закончить со второй формой, предварительно прописав событие на кнопку ОК. Код выглядит так: «Form1.ADOQuery1.Post; close;».

Далее остается закрепить события на кнопки, расположенными на первой форме. Для кнопки Добавить это «Form2.show; ADOQuery1.Insert;», для Изменить просто «Form2.show». Для изменений значений строк необходимо выбрать ее из списка, и после нажатия кнопки открывается вторая форма с заполненными полями всех DBEdit готовая к редактированию. На операцию удаления код такой: «ADOQuery1.Delete;». Сейчас можно запустить проект, и тогда будет предложено связать первую форму со второй.

Для задания события для кнопки возврата в главное меню, необходимо его сначала создать. Этим можно заняться в последнюю очередь. Так что код на кнопку «В главное меню» будет прописываться позже. Теперь последней функционально полезной добавкой будет поиск.

Он делается следующим образом. На вкладке Standart выбрать функцию Edit и кинуть на форму 1 в количестве двух штук для поиска по фамилии клиента и по предоставленной ему скидке (Рисукок 16). Рядом добавляем подписи, чтобы было понятно, в какое окно надо вводить текст для поиска интересующего пользователя параметра.

Рисунок 16. Запросы первой формы.

Осталось лишь поставить фоновый рисунок для придания базе данных более дружелюбного вида. Для этого во вкладке Additional выбрать функцию Image, в поле которой указывается ссылка на хранящийся на жестком диске рисунок, который остается лишь подогнать под размеры окна.

Рисунок 17. Конечный вид первой формы.

Данный алгоритм операций нужно выполнить для каждой таблицы в нашей базе данных. В нашем случае имеется 4 основных таблицы. А значит форм будет 8. Но при компиляции стандартно запустится первая форма, именно поэтому последним этапом в создании базы данных является создание главной формы, о которой многократно говорилось в работе.

Рисунок 18. Главная форма.

Она нужна для ориентирования в формах (рисунок 18). То есть девятой формой мы создаем Главную форму. Для того чтобы запуск программы начинался с нее, заходим в настройки самого проекта и меняем номер таблицы в меню Main Form вкладки Forms. Девятая форма представляет собой просто окно с, в данном случае, 4 кнопками, нажимая на которые пользователь будет переходить на нужные таблицы. Код для каждой кнопки прост «Form(номер формы).show;». И, соответственно, на каждой форме, на которую идет ссылка, мы заранее делали кнопку «В главное меню», код которой такой же простой, только в номере ссылки будет стоять девятая — главная форма, а после этого прописана команда «close;».

Введение. Назначение Delphi и его особенности

СБОРНИК МетодическиХ указаниЙ

ПО выполнению лабораторных работ

ИНФОРМАТИКА

Уровень профессионального образования: высшее образование – бакалавриат

Направление подготовки:15.03.01 «Машиностроение»

Профиль подготовки: «Оборудование и технология сварочного производства»

Квалификация выпускника: Академический бакалавр

Методические указания по выполнению лабораторных работ составлены доцентом А. В. Масленниковым и обсуждены на заседании кафедры СЛиТКМПолитехнического института

Протокол № 1 от « 29 » августа 2014 г.

Зав. кафедрой ______________________А.А. Протопопов

Методические указания по выполнению лабораторных работ пересмотрены и утверждены на заседании кафедры СЛиТКМ Политехнического института

протокол №___ от « » августа 20____ г.

Зав. кафедрой ______________________А.А. Протопопов

Министерство образования и науки Российской Федерации

Федеральное государственное бюджетное образовательное учреждение

высшего профессионального образования

«Тульский государственный университет»

Кафедра «Сварка, литье и технология конструкционных материалов»

МетодическиЕ указаниЯ

ПО выполнению лабораторнОЙ работЫ №1

ИНФОРМАТИКА

Основы работы в среде Borland Delphi

Уровень профессионального образования: высшее образование – бакалавриат

Направление подготовки:150700 «Машиностроение»

Профиль подготовки: «Машины и технология литейного производства»

Квалификация выпускника: 62, бакалавр

1. ЦЕЛЬ И ЗАДАЧИ РАБОТЫ

Изучить назначение и базовые возможности приложения Borland Delphi.

2. ТЕОРЕТИЧЕСКИЕ ПОЛОЖЕНИЯ

Введение. Назначение Delphi и его особенности

В последнее время резко возрос интерес к программированию. Это связано с развитием и внедрением в повседневную жизнь информационно-коммуникационных технологий. Если человек имеет дело с компьютером, то рано или поздно у него возникает желание, а иногда и необходимость, программировать.

Среди пользователей персональных компьютеров в настоящее время наиболее популярно семейство операционных систем Windows и, естественно, что тот, кто собирается программировать, стремится писать программы, которые будут работать в этих системах.

Несколько лет назад рядовому программисту оставалось только мечтать о создании собственных программ, работающих в среде Windows, т. к. единственным средством разработки был Borland C++ for Windows, явно ориентированный на профессионалов, обладающих серьезными знаниями и опытом.

Бурное развитие вычислительной техники, потребность в эффективных средствах разработки программного обеспечения привели к появлению систем программирования, ориентированных на так называемую «быструю разработку», среди которых можно выделить Borland Delphi и Microsoft Visual Basic. В основе систем быстрой разработки (RAD-систем, Rapid Application Development — среда быстрой разработки приложений) лежит технология визуального проектирования и событийного программирования, суть которой заключается в том, что среда разработки берет на себя большую часть рутинной работы, оставляя программисту работу по конструированию диалоговых окон и функций обработки событий. Производительность программиста при использовании RAD-систем -фантастическая!

Delphi (произносится «Делфàй») – среда программирования для Windows, разработанная компанией Borland International. Название происходит от древнегреческого города Дельфы – того самого, где жил дельфийский оракул. Поэтому на значке системы Delphi изображена греческая колонна. Delphi соединяет в себе компилятор языка программирования Object Pascal, интегрированную среду разработки (IDE), библиотеку визуальных компонентов VCL, средства для работы с базами данных (BDE) и многое другое. При помощи Delphi можно решить практически любую программистскую задачу, включая работу с базами данных, написание приложений для Интернета, экранных заставок, системных утилит и пр.

Delphi — это среда быстрой разработки, в которой в качестве языка программирования используется язык Delphi.

Язык Delphi — строго типизированный объектно-ориентированный язык, в основе которого лежит хорошо знакомый программистам Object Pascal. Delphi – близкий родственник обычного языка Pascal, что обеспечило ему широкую популярность. В настоящее время Delphi стал основным инструментом разработки программного обеспечения во всем мире. Существует и версия Builder, в которой можно совместно использовать процедуры, написанные на языках C и Pascal.

Система Delphi постоянно развивается. По состоянию на 2003 г. наиболее стабильной и отработанной являлась версия 6.0. Версия 7.0 заявлена разработчиком как переходная к 8.0 и не рекомендуется для широкого использования. В то же время почти все рассматриваемые далее примеры будут работать практически в любой версии Delphi, начиная с 3.0. Содержательные различия между версиями 3.0 … 7.0 незначительны, и для самостоятельной работы можно использовать литературу, описывающую любую из этих версий.

Borland Delphi 7 Studio позволяет создавать самые различные программы: от простейших однооконных приложений до программ управления распределенными базами. В состав пакета включены разнообразные утилиты, обеспечивающие работу с базами данных, XML-документами, создание справочной системы, решение других задач. Отличительной особенностью седьмой версии является поддержка технологии .NET.

Borland Delphi 7 Studio может работать в среде операционных систем от Windows 98 до Windows XP и выше. Особых требований, по современным меркам, к ресурсам компьютера пакет не предъявляет: процессор должен быть типа Pentium или Celeron с тактовой частотой не ниже 166 МГц (рекомендуется Pentium II 400 МГц), оперативной памяти — 128 Мбайт (рекомендуется 256 Мбайт), достаточное количество свободного дискового пространства (для полной установки версии Enterprise необходимо приблизительно 475 Мбайт).

Официально бесплатной версией Delphi является Lazarus, примерно соответствующий по своим возможностям Delphi 5.0.

Русской версии Delphi не существует. Все так называемые «русские версии» – продукция криворуких пиратов, работающая нестабильно. Всегда устанавливайте только исходную английскую версию.

Не нашли то, что искали? Воспользуйтесь поиском:

Канал в Telegram

Вы здесь

Установка Borland Delphi 7 на Windows XP и Windows 7

Цель урока: Подготовить среду разработки Borland Delphi 7 для наших дальнейших экспериментов.

Почему выбрана именно среда Borland Delphi 7 ?
Borland Delphi 7 — это одна из стабильных и проверенных временем версий языка Delphi (получить можно здесь). До сих пор в ней ведутся разработки, как крупных проектов, так и мелких. И по сей день она успешно справляется с задачами. Многие программы, разработанные в Borland Delphi 7, благополучно работают и на операционных системах Windows 7 (x84, x64). Есть небольшая проблема в новых версиях ОС Windows с отображением справки Delphi, но пара манипуляций позволяет это исправить. Кстати, по поводу справки Delphi, она очень подробная и понятная (как правило, это редкость в языках программирования), хотя и англоязычная. В далеких «нулевых», когда я только начинал знакомиться с данной средой (точнее первое знакомство было с Borland Delphi 4, 5 и 6), справка была спасателем и путеводителем. На то время, интернет еще был не настолько развит и наполнен форумами, статьями как сейчас (да и вообще, доступ к инету это была мечта :) ), а книги дороги и по существу в них информации минимум, справка была вещь не заменимая. Так же, IDE среда разработки Borland Delphi 7, на мой взгляд, для начинающих (да и вообще для разработчиков) интуитивно более понятна и проста в освоении, чем более младшие версии языка (в последующих версиях очень запутали и усложнили интерфейс). Но, есть один приятный момент, большинство приложений написанных в Delphi 7, легко открываются и компилируются в более поздних версиях языка (только с используемыми сторонними компонентами могут возникнуть некоторые проблемы).
Что-то увлекся я :)

После того, как Вы вставили диск с дистрибутивом Delphi 7 произойдет автозапуск и Вы увидите меню с выбором приложений для установки (если запуск не произошел, то зайдите на диск и запустите install.exe). Нас пока интересует только пункт «Delphi 7». Щелкаем по нему.

После подготовки к установке появится окно приветствия. Жмем «Next>»

В этом окне нас просят ввести серийный номер и ключ авторизации. Для прохождения данного шага введите ключи указанные на диске или поищите в содержимом диска.

После того, как Вы ввели регистрационную информацию, будет предложено ознакомится с лицензионным соглашением и дать свое согласие. Как только Вы «прочтете» соглашение, необходимо отметить «I accept the terms in the license agreement». Жмем «Next>»

На следующем шаге предложен выбор типа установки: Typical (полный), Compact(установка только необходимых компонентов языка), Custom(ручной). Выбираем тип «Typical». Жмем «Next>»

Возможно, выскочит следующее сообщение. Жмем «Нет».

На данном шаге нам будет предложено включить или отключить установку VisiBroker/Corba. В рамках обучения данная поддержка нам не пригодится, так что отключаем. О том, что это такое можете почитать в Wiki здесь. Жмем «Next>»

На данном этапе, будет предложено выбрать, какой офис будет поддерживаться по умолчанию. Ставим Office XP. Жмем «Next>»

Здесь нам предлагают установить InterBase Client. В ближайшей перспективе он нам не нужен. Снимаем галочку. О том, что это такое, читаем здесь. Жмем «Next>».

На этом этапе, нам предложено указать пути установки. Не будем заморачиваться, да и путаница в дальнейшем нам не нужна. Оставляем все по умолчанию. Жмем «Next>»

На этом шаге нам рекомендуют сохранить установочную базу на жестком диске. В дальнейшем при доустановке компонентов или просто деинсталляции нам не нужен будет CD. Рекомендую оставить. Жмем «Next>»

Итак, наконец-то процесс установки пошел. Сидим, пьем кофе, ждем окончания процесса. :)

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

Все. Поздравляю! Установка завершена. Жмем «Finish» и приступаем к работе (Пуск->Программы->Borland Delphi 7-> Delphi 7 ). Возможно, потребуется перезагрузка системы.

П.С.: Данная версия отлично работает на Windows 7 x86 и Windows 7 x64. Одно НО!. В Windows 7 нет поддержки старой справки WinHelp32 из-за чего нет возможности пользоваться справкой Delphi. А без нее как без рук :) . Но не переживайте, получите дополнение Windows6.1-KB917607 на официальном сайте Microsoft. Устанавливаете и справка работает :). Все!

Создать игру, Конструкторы игр, Игровые движки, Разработка игр, Игровые ресурсы

Навигация по сайту
Сайт:
  • С чего начать?
  • Онлайн поддержка
  • Главная страница
  • Наши баннеры
  • Каталог новостей

Дополнительно:

  • Блоги пользователей
  • FAQ (Вопросы — Ответы)
  • Видео каталог
  • Фотоальбом
  • Каталог сайтовКаталог игр (на разработке)
  • Мини-чат

Файловый архив:

  • Конструкторы игр
  • Игровые движки
  • Модули для разработки игр
  • HTML5 игровые движки
  • Среды программирования
  • Игры пользователей
  • Исходники и примеры игр
  • Программы пользователей
  • Исходники и примеры ПО
  • Ресурсы для игр
  • Полезный софт
  • Литература по ЯП
  • Литература по созданию игр

Каталог статей:

  • Конструкторы игр
  • Программирование
  • Игровые движки
  • Разработка игр
  • Остальное

Форум:

  • Новые сообщения
  • Разработка игр
  • Конструкторы игр
  • Игровые движки
  • Проекты пользователей
  • Статьи, примеры, исходники
  • Команды разработчиков
  • Программирование
  • Дополнительно
  • Популярные игры
  • Игровые ресурсы

Интересное

Категории раздела

10 Лучших пользователей

/

Партнеры сайта
.

Borland Assembler (BASM) уроки для начинающих (урок 7 часть 1)

Урок 7

Добро пожаловать на урок номер 7. Темой сегодняшнего урока является плавающая запятая в BASM. Это уже было темой в более раннем уроке, но этот урок даст дополнительную информацию. Мы посмотрим, как кодировать скаляры на SSE2 и как инструкции обслуживаются в конвейерах FP. Сегодняшний пример это расчет полинома третьего порядка.

function ArcSinApprox1a(X, A, B, C, D : Double) : Double;
begin
Result := A*X*X*X + B*X*X + C*X + D;
end;

Вместо анализа и оптимизации этой функции мы посмотрим, как реально мы можем ее использовать. Полином третьего порядка может аппроксимировать функцию в ее интервале, [-1;1], с максимальной абсолютной ошибкой 0.086. Это не очень высокая точность, но то что мы разработаем в данном уроке можно будет расширить до более высоких порядков, в той же манере для получения большей точности.

Параметры A, B, C и D определяют форму кривой для функции и значения для аппроксимации в ArcSin с минимальной ошибкой. Для этой цели мы разработаем оптимизатор, который будет использоваться для измерения производительности. Поскольку ARCSIN(0) = 0 мы непосредственно видим, что D=0 и D можно вывести из оптимизации. Мы также знаем, что ArcSin это нечетная функция и поэтому выражение второго порядка B*X*X не используется в аппроксимации. Это поскольку выражение второго порядка четное и симметрично относительно оси Y. Функции нечетных порядков имеют анти симметрию вокруг оси Y с F(X) = -F(-X). Все это означает, что наша функция может быть уменьшена до

Тем не менее, мы не поступим так, поскольку это будет более наглядно с полной функцией. ArcSin это особый случай, и мы хотим сделать его обычным, насколько это возможно.

В функции номер 1a имеется 6 умножений и три сложения. Напишем ее в виде формы Хорнера (Horner form).

Result := ((A*X + B)*X + C)*X + D;

Уменьшив этим до трех умножений и сложений.

Другая форма такая

Здесь четыре умножения и три сложения.

На современных процессорах очень важно распараллеливания можно извлечь из формулы и как много умножений и сложений она имеет. Современные процессоры, такие как AMD Athlon, Intel P4 и P3 имеют конвейеры. Конвейеры необходимы на процессорах, работающих на высокой частоте, поскольку основные операции сложения, вычитания, умножения или деления не могут быть выполнены за один такт частоты. На P4 есть конвейер называемый FP_ADD, который предназначен для операций сложения и вычитания. Этот конвейер имеет 5 состояний, это означает, что процесс сложения или вычитания может быть разбит на 5 подзадач. Следовательно, сложение и вычитание выполняются за 5 тактов. Преимущество конвейера состоит в том, что хотя операция требует 5 тактов, но зато каждая новая операция может начинаться в каждом такте. Это потому что первое сложение покидает первую подзадачу при втором такте и эта подзадача может начинать сложение для второго числа. Если мы имеем серию сложений, то первое сложение покидает конвейер на такте 5, второе на такте 6 и так далее. Производительность Throughput получается всего в один такт. Параллельность составляет до 5 сложений или вычитаний в конвейере одновременно. Проблема в том, что если второе или следующие сложения связаны с первым сложением, то придется ожидать, когда закончится первое сложение. Мы можем сказать, что здесь есть зависимость данных между двумя инструкциями, и мы видим, что полная латентность для сложения составляет 2 раза по 5 тактов.

Посмотрим на основе нашей функции работу конвейера.

Result := A*X*X*X + B*X*X + C*X + D;

Также видно, что четвертое выражение может выполняться параллельно, и затем сложено в конце действия. A*X это первая инструкция, готовая для обработки в конвейере F_MUL. Латентность для FMUL на P4 составляет 7 тактов и выражение A*X будет готово через 7 тактов. FMUL имеет максимальную пропускную способность (throughput) в 2 такта. Отсюда ясно, что FMUL не полностью конвейеризирован. Конвейер принимает новую инструкцию на такте три, а не на втором. B*X это вторая инструкция, готовая к выполнению и процессор начнет ее выполнение на такте 3. В такте 5 конвейер снова готов к принятию новой инструкции и это будет инструкция C*X. В такте 7 выполнение инструкции A*X будет закончено и выражение (A*X)*X можно будет начать вычислять в такте 8. В такте 10 вычисление выражения B*X будет закончено и процессор начнет выполнению выражения (B*X)*X. В такте 12 также будет закончено выполнение C*X и конвейер F_ADD прибавит значение D. В такте 15 будет закончено вычисление (A*X)*X и можно будет начинать выражение (A*X*X)*X. В такте 17 выражения (B*X)*X и (C*X) + D будут закончены и можно начать работу с конвейером F_ADD. Данное сложение будет закончено на такте 21, где выражение (A*X*X)*X также будет готово. Последнее сложение можно будет начать на такте 22. Осталась только одна операция в действии, и мы должны подождать до полной латентности FADD, которая составляет 5 тактов. На такте 27 последнее сложение будет закончено и работа будет выполнена.

Данные таблицы покажут это в деталях. Левая колонка символизирует конвейер F_MUL , с 7 состояниями 7, а правая конвейер F_ADD на 5 состояний.

indbooks

Читать онлайн книгу

Часто задаваемые вопросы по Borland Delphi

Примечание: ответ на интересующий вас вопрос вполне может оказаться в разделе, который дает описание версии, отличной от вашей. Материал не дублируется, где возможно приводятся перекрестные ссылки. Рекомендуется читать все разделы.

Условные обозначения, используемые в данном FAQ:

Материал относительно Delphi 1.0

Пример (исходный текст программы) для Delphi 1.0

Материал относительно Delphi 2.0

Пример (исходный текст программы) для Delphi 2.0

Материал относительно Delphi 3.0

Пример (исходный текст программы) для Delphi 3.0

Общие вопросы по Delphi и данному FAQ (часть 1)
Введение

1. Какова цель этого FAQ?

Этот FAQ предназначен для ответов на некоторые вопросы относительно новой cреды разработки Borland International, называемой Delphi. Этот документ, в действительности, не FAQ в полном смысле этого термина, потому что некоторые из вопросов, на которые здесь есть ответы, не очень часто задают на самом деле.

Вначале мы выпускали FAQ, куда помещали все доступные сведения о Delphi в текстовом виде. Далее была промежуточная версия в формате WinHelp. Теперь, после ряда трансформаций FAQ обличен в форму HTML.

2. Как я могу получить последнюю версию FAQ?

Проще всего зайти на наш WWW-сервер (www.demo.ru) и загрузить оттуда свежие версии всех имеющихся материалов, которые, кстати, помимо Delphi, охватывают весь спектр продуктов, выпускаемых фирмой Borland International. Также вы можете получить текстовую версию данных материалов, загрузив файл delfaqs.zip.

Вопросы общего характера

1. Что такое Delphi?

Delphi — это достаточно новый продукт Borland International для быстрого создания приложений (RAD). Высокопроизводительный инструмент визуального построения приложений, работающих с базами данных в архитектуре клиент-сервер, Internet/Intranet, а также для локальных машин и файл-серверной архитектуры. Этот инструментарий включает в себя настоящий компилятор кода и предоставляет средства визуального программирования, несколько похожие на те, что можно обнаружить в Microsoft Visual Basic или в других инструментах визуального проектирования. Лежащий в основе Delphi язык — Object Pascal, который является расширением объектно-ориентированного языка Pascal (Turbo/Borland Pascal, начиная с версии 5.5). В Delphi также входят локальный SQL-сервер InterBase 4.0, генераторы отчетов, библиотеки визуальных компонентов, и прочее хозяйство, необходимое для того, чтобы чувствовать себя совершенно уверенным при профессиональной разработке информационных систем или просто программ для Windows-среды. Поскольку в архитектуре клиент-сервер де-факто сложилось такое положение, что клиентские станции работают, как правило, в Windows-среде, а SQL-сервер — в операционной системе UNIX, Delphi Client-Server может служить удобным инструментом для скоростной разработки приложений.

2. Для кого предназначен Delphi?

Прежде всего профессиональным разработчикам, желающим очень быстро разрабатывать приложения в архитектуре клиент-сервер. Delphi производит небольшие по размерам (до 15-30 Кбайт в Delphi 3.x!) высокоэффективные исполняемые модули (.exe и .dll), поэтому в Delphi должны быть прежде всего заинтересованы те, кто разрабатывает продукты на продажу. С другой стороны небольшие по размерам и быстро исполняемые модули означают, что требования к клиентским рабочим местам существенно снижаются — это имеет немаловажное значение и для конечных пользователей. Помимо стандартных клиентских приложений (Delphi 1.0 и 2.0), Delphi 3.x также имеет средства для созданий приложений в многозвенной архитектуре.

3. Преимущества Delphi по сравнению с аналогичными программными продуктами.

• Быстрота разработки приложения.

• Высокая производительность разработанного приложения.

• Hизкие требования разработанного приложения к ресурсам компьютера.

• Hаращиваемость за счет встраивания новых компонент и инструментов в среду Delphi.

• Возможность разработки новых компонент и инструментов собственными средствами Delphi (существующие компоненты и инструменты доступны в исходниках)

• Удачная проработка иерархии объектов

• Де-факто уже доступно огромное количество визуальных компонентов третьих фирм, часть из которых freeware, часть shareware, часть — коммерческие.

4. Какие есть версии Delphi?

В феврале 1995 года была выпущена первая версия Delphi, которая генерировала код, исполняемый под операционной системой Windows 3.1x.

В начале февраля 1996 года объявлено о выходе второй версии продукта, которая генерирует уже 32-разрядный код для Windows 95 и Windows NT и использует все преимущества 32-разрядных приложений — более высокая скорость обработки данных, большее количество возможностей для приложения и др. Вторая версия Delphi предлагается уже в трех вариантах: Delphi Desktop, Delphi Developer и Delphi Client/Server Suite. Версии Desktop и Developer включают в себя Delphi Desktop 1.0, а Client/Server Suite — Delphi Client/Server 1.0.

В ближайшем будущем ожидается версия Delphi 3.0, которая также будет создавать 32-разрядные приложения со встроенной поддержкой стандартов COM/DCOM, ActiveX, улучшенными средствами работы с базами данных и т.д. Варианты поставки, судя по всему, будут аналогичны второй версии.

5. Сколько дискового пространства, памяти, и т.д., нужно для работы Delphi?

Минимальная установка Delphi 1.0 требует приблизительно 30 Мбайт на диске, и полная установки — 80 Мбайт. Чтобы Delphi работал хорошо, нужен 486 процессор с 8 Мбайт ОЗУ, хотя мы рекомендовали бы 16 Мбайт. Практика показывает, что скорость CPU не является критическим параметром.

Для 32-разрядных версий Delphi требования увеличиваются. Полная установка занимает чуть более 100 Мбайт, оперативной памяти желательно иметь не менее 16 Мбайт. 32 Мбайт ОЗУ достаточно, чтобы комфортно работать и отлаживать программы в Delphi, используя при этом загруженный на этой же машине Local Interbase.

6. Сколько занимает места программа, выводящая текст «Hello, World!», изготовленная на Delphi?

Меньше 170Кб, если имеется в виду программа, «собранная» обычным для Delphi способом. При этом сразу же подключается стандартная поддержка форм и пр. Тем не менее при помощи Паскаля, поддержимаемого Delphi, можно написать программу, которая ничем по своим качествам не будет отличаться от программы, написанной в BP7.0. (То есть размер такой программы может быть около 15Кб) Рекорд — 3.5 Кб!!

Но и это еще не все. Концепция пэкиджей (paсkages), введенная в Delphi 3.0, позволяет создавать программы, код которых будет составлять всего несколько килобайт + разделяемые между всеми приложениями библиотеки времени выполнения, оформленные в виде DLL.

7. Hасколько трудно научиться работе с Delphi?

Если вам повезло, то вы уже имеете большой опыт работы и с Borland Pascal With Objects, и с Visual Basic. Если вам подходит данное описание, тогда Delphi будет для вас сразу понятен. А теперь для остальных: Чтобы полностью использовать возможности среды Delphi, вы должны знать Pascal , вы должны иметь некоторые знания об объектно-ориентированном программировании и вы должны знать о программировании событий. Если вы преодолели эти три препятствия, то вы имеете все необходимые знания. С другой стороны , большинству людей не нужно полностью использовать все возможности среды. Если вы хотите создать приложение, которое не делает ничего особенно причудливого, то даже без особого программирования вы в течение 5-10 минут сможете собрать из визуальных компонент Delphi что-нибудь достаточно мощное и на удивление работоспособное.

Приложения, созданные в среде Delphi, отличаютя повышенной надежностью. Встроенные механизмы RTTI и обработки исключений вместе со строго типизированным языком Object Pascal изначально закладывают в программы устойчивость к всевозможным сбоям, которые могут произойти в операционной системе, на SQL-сервере или непосредственно в вашей программе. Даже ничего не делая самому, всегда можно как минимум узнать, что произошла ошибка и где, а зачастую и получить исчерпывающую дополнительную информацию. Во многом это заслуга и компилятора Borland с языка Pascal, история которого насчитывает более 13 лет.

8. Можно ли создавать многопользовательские приложения для баз данных в Delphi Desktop или Developer?

Используя Delphi Desktop 1.0 или Delphi Developer 2.0, можно разработать приложение, которое общается с каким-нибудь SQL сервером, используя ODBC драйвер. Hе было особых проблем, чтобы заставить работать ODBC, и скорость доступа к данным была вполне приемлема. Тем не менее те, кто уже успел опробовать оба варианта, в один голос утверждают, что через IDAPI работать быстрее. В Delphi Desktop 2.0 работа через ODBC не поддерживается.

9. Какова история появления Delphi?

Delphi — потомок Турбо-Паскаля , который впервые появился в 1983г для операционной системы CP/M . Турбо-Паскаль был перенесен в MS-DOS в начале 1984г. Hа протяжении всего начала истории IBM PC, Турбо-Паскаль был действительно наиболее популярным языком для серьезных разработок — главным образом потому, что это был настоящий компилятор, включающий редактор текстов программ и все необходимое, что стоило $19.95 и выполнялось на компьютере со 128 Кбайт. Borland представил Турбо-Паскаль для Windows в 1990г. Последней версией Borland Pascal (как это стало называться), не считая Delphi, был версии 7.0 в конце 1992г.

Delphi 1.0 разрабатывался что-то около 18 месяцев или двух лет. Выпускались различные beta-версии и пререлизы, включая несколько сотен копий, которые отдали во время выставки Software Development ’95. Delphi официально анонсирован в США 14 февраля 1995г, и первые копии были разосланы 28 февраля. В России Delphi появился в первых числах апреля, хотя ранее действовала программа раннего ознакомления (EEP) в рамках которой те, кто спешил начать осваивать новый продукт, получали бета-версию Delphi и пререлиз документации.

После выпуска первой версии продукта компания Borland направила свои усилия на перенос Delphi в 32-разрядные операционные системы — Windows 95 и Windows NT. Этот процесс успешно завершился и 10 февраля 1996г. Borland Intrenational объявил о выходе второй версии продукта, которая генерирует уже 32-разрядный код для Windows 95 и Windows NT и использует все преимущества 32-разрядных приложений — более высокая скорость обработки данных, большее количество возможностей для приложения и др.

На данный момент ожидается выход третьей версии Delphi, окончательный которой предположительно появится в конце весны-начале лета 1997г. На основании предварительных версий можно сказать, что Delphi 3.0 — это еще более мощный продукт, чем Delphi 2.0, который позволяет использовать в своих разработках все основные стандарты, имеющиеся на платформе Win32/Intel — ActiveX, COM/DCOM, ISAPI/NSAPI и т.д.

10. Где можно приобрести копию Delphi?

У любого дилера Borland, а сейчас Delphi Desktop продаются, кажется, даже в книжных магазинах. Тем не менее перед приобретением Delphi поинтересуйтесь, какую поддержку обеспечивает дилер. Delphi — это довольно большой продукт, и его поддержка всегда будет нелишней.

11. Приведите сравнение производительности IDAPI и других аналогичных продуктов.

Демо-центр такими исследованиями не занимался, в них не было ни интереса ни необходимости. Однако кто-то такие тесты проводил, например по данным Jin Mai (mwj@pipeline.com) на одной таблице с 60 тыс. записей производительность операции SELECT следующая [1] :

Инструмент Формат базы данных Время в секундах
Delphi Paradox 22
VB Access 60
Delphi ODBC to Access 30
Access ODBC to local Watcom 48
VB ODBC to local Watcom 33

Hесмотря на весьма странные данные во второй строке (VB/Access), автор тестов их подтверждает.

12. Как можно войти в контакт с представителями Borland?

Если вы имеете соответствующие возможности, вы можете получать информацию прямо из Borland:

• anonymous to ftp.borland.com.

Телефоны Borland АО — российского представительства Borland International:

(095)-366-4298

• (095)-366-3973

Вы можете поговорить с представителями Демо-центра по клиент-серверным технологиям Borland (компания Epsylon Technologies) по телефонам:

(095)-913-5608

• (095)-913-2934

• (095)-459-1333

• (095)-535-0319

• (095)-535-5349

Можете отправить письмо с вопросами по адресу:

13. Какую техническую поддержку может получить покупатель Delphi?

Можете звонить напрямую в Borland International, все необходимые адреса есть в сопроводительных документах в коробке с Delphi.

Можете направить письмо по электронной почте в Borland International по адресу techinfo@borland.com, однако следует отметить, что качество поддержки в большой степени зависит от дилера.

Hачала свою деятельность Ассоциация пользователей Delphi. В Борланд АО организованы семинары (пока бесплатные). Раз в две недели по средам с 14:00 до 16:00 проходит тематический семинар о Delphi и других продуктах Borland. Его проводят практические специалисты по Delphi из различных организаций, в том числе и из демо-центра. Даже если вы издалека, имеет смысл посетить семинар — наверняка вы услышите что-либо интересное для себя. Тематика семинаров — самая разнообразная.

Для того, чтобы попасть на семинар, надо позвонить в Демо-центр по телефону: 913-5608, и записаться на семинар.

Методические материалы для проведения таких семинаров сохраняются, так что тем, кто желает у себя в регионе организовать нечто подобное, звоните в Демо-центр Александру Сергееву.

14. Выйдет ли версия Delphi, где в качестве компилятора будет использоваться BC++?

Вопрос устарел. Такой продукт (Borland C++Builder) вышел 4 февраля 1997г. По своим возможностям он практически равноценен Dehlpi 2.0. Получить более подробную информацию о данном продукте вы можете получить на страничках нашего сервера, посвященных C++Builder.

15. Сколько стоит Delphi в России?

Полная стоимость текущих версий продукта составляет:

Delphi 1.02 Client/Server $
Delphi 1.02 for Windows (Desktop) $
Delphi 2.01 Client/Server Suite $
Delphi 2.0 Developer $
Delphi 2.0 Desktop $

Цены на Delphi 3.0 не объявлены (продукта пока нет), но предполагается, что они будут на уровне Delphi 2.0. Полный список цен на продукты, а также всевозможных вариантов Upgrade приведен в нашем прайс-листе.

16. Что можно, и чего нельзя разработать в среде Delphi? В частности, можно ли разработать в Delphi внутреннюю структуру данных для SQL-cервера, хранимые процедуры и пр.?

Понятно, что для такого открытого инструмента, как Delphi, границы «дозволенного» весьма условны. В частности, хороший пример — появление в более поздних версиях визуального компонента для работы с хранимыми процедурами. То есть это было нельзя для FieldTest 4 и стало возможным для пререлиза.

Второй пример, который появился только с версии 1.15 Delphi FAQ. В стандартной поставке Delphi не существует визуального компонента, поддерживающего обработку event alerts (событий) в InterBase. Тем не менее оказалось, что изготовить такой компонент не так уж и трудно. В Delphi 2.0 есть пример аналогичного компонента, который на самом деле оказался весьма кривым и потребовал существенной доработки для возможности нормального использования.

Вышли компоненты, позволяющие проводить процедуру инсталляции разработанного вами приложения, проводить сетевой обмен, обмениваться данными через cc:mail или Lotus Notes.

Появились компоненты, реализующие прямые линки к BTrieve, AS/400, мэйнфреймам, Informix.

17. Чем можно воспользоваться для создания инсталляционных версий приложений, разработанных в Delphi?

Для Delphi 1.0 можно, например, попробовать:

1. Wise. Он неплохо подходит и для VB, и для BC++.

2. Kurt. Создает иконы, меняет INI, распаковывает сжатые файлы.

3. Существует несколько компонентов, которые помогают в создании инсталляторов и Shareware-версий продукта. Однако, последнее время практически стандартом стал инсталлятор InstallShield . Его 32-разрядный вариант для Delphi ( InstallShield Express for Delphi ) входит в стандартную поставку всех версий Delphi 2.0.

18. Должен ли я знать все относительно Windows API, чтобы использовать Delphi?

Может возникнуть чувство, что вы должны знать относительно Windows API в Delphi больше, нежели в Visual Basic. Это не так; вы можете работать в обеих средах с минимальным пониманием внутренней организации Windows. Однако, в обоих случаях, вы должны знать, по крайней мере, кое-что относительно Windows API, чтобы «выжать» максимум из того, что у вас есть. Различие в том, что Delphi предоставляет вам гораздо больше возможностей, чтобы делать все эти интересные вещи.

19. Должен ли я знать объектно-ориентированное программирование, чтобы использовать Delphi?

Хорошо бы. Инструментальные средства проектирования интерфейса пользователя Delphi производят объектно-ориентированный код. Однако, если вы знакомы с Visual Basic или Powerbuilder, вы, вероятно, имеете достаточное понимание OOP (Object Oriented Programming). Вы можете сделать многое в Delphi без необходимости создавать ваши собственные объекты; но при создании новых объектов действительно важно знать тонкости OOP.

Совместимость

1. Какие операционные системы Delphi поддерживает?

Версия Delphi 1.0 предназначается для Windows 3.1x. Hет причин, по которым Delphi 1.0 не работал бы в системах, которые обеспечивают эмуляцию Windows 3.1, подобно OS/2 Warp, Windows NT, UnixWare 2.0 и т.д.

Delphi 2.0 предназначена для работы под Win32/Intel — на данный момент это Windows 95 (в т.ч. OSR2), Windows NT (3.5 и 4.0).

Delphi 3.0 также работает под Win32, но на данный момент некоторые возможности, предоставляемые продуктом можно использовать только в ОС Windows NT 4.0. Возможно, очередная версия Windows 95 (Windows 97), будет обладать этими функциями.

2. Какие средства управления проектом совместимы с Delphi?

Delphi 1.0 Client/Server поддерживает совместимость с PVCS компании InterSolv.

Delphi 2.0 Client/Server Suite включает в себя комплект PVCS, интегрированный в IDE.

Кроме того, должна быть возможность совмещения с большинством систем контроля исходных текстов. Однако, формы в Delphi сохраняются в двоичном формате, так что пакет управления исходными текстами должен поддерживать двоичные данные для того, чтобы это работало с Delphi . Если у вас есть администратор исходных текстов, который просто не может иметь дело с двоичными файлами, то согласно документам, вы может сохранять формы в виде ASCII текста для редактирования или в целях контроля за версиями. Файлы ASCII могут также загружаться и снова сохраняться в двоичном *.DFM формате.

MKS Source Integrity (MKS SI — 2-ой на рынке администраторов исходного текста для PC/PCLAN с более чем 35,000 разработчиками, использующими SI) также предлагает средства интеграции в Delphi. Эти средства в настоящее время поставляются наряду с MKS SI.

3. Можно ли в Delphi использовать DLL, разработанные в C или C ++?

Delphi способен вызывать и получать обратные вызовы (callback) из любого стандартного модуля DLL для Windows.

4. Можно ли вызывать код, созданный в Delphi из C или C ++?

Delphi может генерировать DLL, которые можно вызывать из C, C++, Visual Basic, PowerBuilder, или чего-нибудь еще, что понимает стандартные Windows DLL. Имеется пример DLL в каталоге DEMOS\DB\DLL из комплекта Delphi.

5. Что известно о пакетах других фирм, которые работают (или не работают) с Delphi?

6. Есть ли поддержка Dynamic Data Exchange (DDE), VBX, OLE, OCX, OpenDoc?

Да, Delphi позволяет с разной степенью комфорта использовать все технологические стандарты, имеющиеся в Windows.

7. Можно ли на Delphi написать VBX или OCX?

Можно. Ведь по сути дела VBX — это .dll, написанная по определенным правилам. Однако скорее всего вам потребуется дополнительно соответствующий SDK от компании Microsoft. Существует даже статья, где обсуждаются все аспекты такой работы.

Относительно OCX все то же самое, что и относительно VBX.

Delphi 3.0 позволяет визуально создавать элементы ActiveX.

8. Какие генераторы отчетов можно использовать с Delphi кроме ReportSmith?

В порядке предпочтения:

1. Имеется QuickReport — генератор отчетов, сделанный в виде компонентов и встраиваемый непосредственно в приложение. Успех 16-разрядной версии привел к тому, что начиная с версии Delphi 2.0 32-разрядный QuickReport входит в стандартный вариант поставки.

2. Crystal Reports — подключается через VBX.

3. R&R Report Writer — хорошо работает с Delphi, позволяет выполнять запросы, preview, вызовы DLL, передачу параметров. (производитель — Concentric Data Systems)

4. Также есть еще несколько генераторов отчетов, выполненных аналогично QuickReport в виде компонентов.

Следует также заметить, что на данный момент Borland International продал ReportSmith другой фирме, так что его присутствие в Delphi 3.0 под вопросом.

Базы данных — Interbase и локальные данные

1. Каково определение IDAPI? Что такое SQL Links?

IDAPI это Integrated Database Application Program Interface. BDE (Borland Database Engine) — средство доступа ко множеству источников данных через один API. IDAPI — это просто API для BDE. IDAPI включает все функции, необходимые для доступа к данным, манипулирования ими и т.д. Delphi, Borland C++, C++Builder, Intrabulder, dBASE for Windows, и Paradox for Windows используют эти функции. Вы можете использовать их в своих программах. Вы получите документацию, если купите BDE. Там перечислены все доступные функции и что они делают. Если посмотреть на исходники VCL в Delphi, то можно увидеть, как они используются. Они начинаются с «Dbi» (e.g. DbiCreateTable ).

SQL Links — набор родных драйверов (native drivers), которые нужны для работы с удаленными серверами баз данных.

2. Hеобходим ли IDAPI для доступа к данным в Delphi? Можно ли включить IDAPI внутрь EXE, чтобы распространять программу без установки IDAPI на пользовательском компьютере?

IDAPI необходим для доступа к данным в Delphi. Сам IDAPI во внутрь исполняемого файла ни коим образом не встраивается (да это было бы и не целесообразно). Вместе с Delphi поставляется редистрибутивный вариант BDE, которая устанавливает на «чистую» машину лишь только BDE. может создавать инсталляторы, которые устанавливают на машину как ваше приложение, так и BDE.

InstallShield Express for Delphi

Delphi 3.0 включает средства для создания «тонких» клиентов, работающих на машине, на которой не установлен BDE. Подробности смотрите в FAQ по Delphi 3.0.

3. Где можно найти описание функций и типов данных BDE?

DBIPROCS.INT в директории DELPHI\DOC\ содержит список функций BDE, передаваемые параметры, возвращаемое значение и краткое описание каждой. DBITYPES.INT — список типов, используемых функциями BDE. Для вызова любой функции BDE добавьте следующие модули в раздел uses: DBITYPES, DBIPROCS и DBIERRS.

Delphi 2.0 включает в себе описание функций BDE в формате WinHelp. Также все три модуля из Delphi 1.0 (DBITYPES.DCU, DBIPROCS.DCU и DBIERRS.DCU) теперь объединены в единый BDE.DCU.

4. Можно ли программным образом добавить псевдоним (alias) в IDAPI.CFG?

В BDE есть для этого функция DbiAddAlias .

В Delphi 2.0 данная функциональность находится внутри компонента TSession (методы AddAlias , AddStandardAlias ).

5. Я получаю сообщение от BDE при редактировании записи ‘Multiple records found but only one expected’. Что бы это значило?

Вам может потребоваться создать уникальный индекс в таблице для того, чтобы каждую строку в таблице можно было однозначно идентифицировать. Например, попытайтесь изменить структуру таблицы и добавить поле для заполнения его уникальными значениями.

6. Обработка исключений (exceptions) BDE.

Информация об ошибке BDE может быть получена для использования в приложении из объекта EDBEngineError . Исключительная ситуация EDBEngineError обрабатывается в программе с помощью конструкции try … except. Когда возникает исключительная ситуация BDE, то может быть создан объект EDBEngineError и различные поля этого объекта могут быть использованы для программного определения, что не в порядке и что требуется для исправления ситуации. Далее, для данной исключительной ситуации может быть сгенерировано несколько сообщений об ошибках. Это требует организации перебора сообщений об ошибках для получения нужной информации.

7. Какому стандарту SQL соответствует SQL в InterBase?

SQL в Local & Remote InterBase соответствует SQL-92 с элементам SQL III (более поздними расширениями).

8. Как удалить генераторы (GENERATORS) из базы данных InterBase?

Никак. К сожалению, в существующих версиях InterBase это невозможно.

9. Как выбрать протокол при соединении с InterBase из Delphi?

В Server Manager (ibmgr.exe), Windows interactive SQL (wisql.exe) и Communication Diagnostic Tool (comdiag.exe) Вы отдельно задаете имя сервера, протокол и ‘путь на базу’ (локальный путь на сервере, а не путь до базы с Вашей машины)

А в BDE Configuration Utility все немного не так — на странице Drivers у драйвера Interbase есть параметр SERVER NAME, заполненный как IB_SERVER:/PATH/DATABASE.GDB, а у любого InterBase Alias есть параметры SERVER NAME и PATH, но ни у драйвера ни у алиаса нет протокола. Для Interbase протокол указывается стилем написания пути к базе:

Протокол SERVER NAME Пример
TCP/IP IB_SERVER:PATH\DATABASE.GDB nt:c:\ib\base.gdb; unix:/ib/base.gdb
IPX/SPX IB_SERVER@PATH\DATABASE.GDB nw@sys:ib\base.gdb
NETBEUI \\IB_SERVER\PATH\DATABASE.GDB \\nt\c:\ib\base.gdb

10. Можно ли использовать какие-нибудь ODBC драйверы, которые получены с другими СУБД?

В общем, да. Мы не столкнулись с какими-то ODBC драйверами, которые не работают с Delphi, но, с другой стороны, мы не пробовали действительно экзотические драйверы. Основные трудности вызвали специфические ODBC-драйверы от Microsoft. Похоже, что ODBC и ODBC от Microsoft — это разные вещи.

11. Проблемы с именами таблиц в ODBC-драйверах.

При использовании ODBC-драйверов, если у вас появляются ошибки при открытии таблицы — установите порядок сортировки (SORT ORDER) хотя-бы Paradox ASCIIi. Это, например, помогает при доступе к базам данных Lotus Notes (ODBC-драйвер фирмы Casahl).

12. Какой формат данных предпочесть в Delphi? dBase или Paradox?

Если вам действительно все равно, то вот несколько пунктов ‘за’ формат Paradox:

1. Широкий выбор типов полей, включая автоинкремент, BLOBs, и т.п.

2. Соблюдение целостности данных, контроля данных, обновления индексов на уровне ядра BDE.

3. Первичный индекс таблицы автоматически соблюдает уникальность записей, вторичные индексы обеспечивают отсортированный «вид» на записи таблицы.

13. Как нужно писать функцию «change password» для таблицы Парадокса?

Нет способа сделать это в пределах Delphi VCL. Кажется, это довольно серьезное упущение. Однако, есть возможность сделать это напрямую через Borland Database Engine через интерфейс предоставляемый модулями DBIPROCS.DCU и DBITYPES.DCU () или BDE.DCU (). Нужно использовать функцию DbiDoRestructure .

14. Есть ли какая-нибудь процедура для перестройки разрушенного индекса, типа TUTILITY.EXE из PdoxWin?

BDE включает функцию для этого — DbiRegenIndexes .

15. Есть ли какая-нибудь процедура для упаковки таблицы dBase?

В BDE есть функция DbiPackTable .

16. Как для .dbf таблицы создать индекс по выражению?

Нужно использовать процедуру AddIndex с параметром ixExpression , например:

Table1.AddIndex(‘NewIndex’,‘Field1 * Field2 + Field3’, [ixExpression]);

17. Как создать в Paradox вторичный индекс с упорядочиванием по убыванию?

Используйте флаг ixDescending :

Table1.AddIndex(‘NewIndex’, ‘CustNo;CustName’, [ixDescending]);

18. Хочу узнать номер текущей записи, как это сделать?

В общем случае — никак. В случае таблицы Paradox — есть в BDE функция DbiGetSeqNo , которая возвращает логический номер записи. Но при использовании на форме TDBGrid она может давать не всегда правильные значения.

19. Как посмотреть удаленные записи в таблице .dbf? А как их восстановить?

Для того, чтобы удаленные записи были доступны, нужно установить соответствующее свойство для курсора с помощью функции BDE DbiSetProp :

DbiSetProp(hObj(Table1.Handle), curSoftDeleteOn, 1);

Проверка удалена запись или нет производится через функцию чтения записи DbiGetRecord . Для восстановления записи применяется функция DbiUndeleteRecord .

20. Упаковка таблицы.

Упаковать таблицу DBF можно открыв ее компонентом TTable и вызвав функцию BDE DbiPackTable :

Result := DbiPackTable(Table1.DbHandle, Table1.Handle, nil, szDBase, True);

21. Почему я получаю ошибку ‘Index out of range’ когда использую TTable.FindNearest и TTable.FindKey для таблицы dBase с индексом по выражению?

Методы TTable.FindKey и TTable.FindNearest не могут работать с таким видом индексов. Вместо этих методов используйте TTable.GotoKey и TTable.GotoNearest , которые прекрасно работают с ними.

22. Как программным образом создать таблицу Paradox с автоинкрементным полем?

Вам следует использовать компонент TQuery и SQL-предложение типа:

CREATE TABLE «PDoxTbl.db» (ID AUTOINC, Name CHAR(255), PRIMARY KEY(ID));

23. Почему я не могу использовать опцию ixUnique при создании индекса в таблице Paradox с помощью метода AddIndex компонента TTable?

Опции, используемые в методе AddIndex компонента TTable зависят от типа таблиц. Например, опция ixUnique работает с таблицей dBase, но не с Paradox. Следующая таблица показывает, как эти опции используются для таблиц dBase и Paradox.

Index Options dBase Paradox
ixUnique *
ixExpression *
ixDescending * *
ixNonMaintained * *
ixPrimary *
ixCaseInsensitive *

24. Генерация уникальных идентификаторов для таблиц.

Для более полного ознакомления с этим вопросом рекомендуется обратится к статье Максима Михеенкова в 1-ом номере российского журнала СУБД за 1995 год. А коротко можно сказать следующее.

Для таблиц Paradox вы можете пользоваться специальными типами полей, гарантирующими уникальность значения поля в записи — типы AutoIncrement и TimeStamp (с использованием функций DateXXX — модуль SysUtils).

Для Interbase вы можете использовать генераторы, которые возвращают уникальное значение.

Если же такое решение вам не подходит, то можно перед помещением записи в таблицу отыскивать максимальное уже имеющееся в таблице значение этого поля и заполнять поле в записи значением, на единицу больше. Для разграничения пользователей при одновременном доступе можно хранить это значение в отдельной таблице и открывать ее эксклюзивном режиме.

25. Можно ли использовать Crystal Report с таблицами формата Paradox 5.0?

Да, можно, только если вам удастся получить ODBC-драйвер для таблиц Paradox. Во всяком случае на Crystal BBS находится файл bde.zip, который и содержит этот драйвер.

26. Как открыть таблицу dBase, у которой поврежден (утерян) индексный MDX файл?

Как я могу использовать таблицу dBase без необходимого для нее MDX файла?

При создании таблицы dBASE с индексным файлом MDX в заголовке DBF файла устанавливается байт со смещением 28 (десятичное) от начала файла. При открытии таблицы, у которой данный байт установлен, также происходит попытка открыть MDX файл; если это не удается, то возникает исключение (exception). Для решения проблемы достаточно прописать в DBF файл 0 по указанному смещению.

27. Как определить номер текущей записи для набора данных?

Если набор данных основан на таблицах Paradox или dBASE, то номер записи можно определить с помощью вызовов BDE. BDE не поддерживает номер записи для наборов данных на SQL сервере; если ваш сервер поддерживает нумерацию записей, вам нужно обратиться к его документации.

Базы данных — прочие SQL сервера

1. Как осуществляется доступ к базе данных из Delphi?

Сначала вы должны в утилите BDE Configuration Utility (bdecfg или bdecfg32) определить псевдоним для базы данных, с которой вы хотите работать. Это позволит вам избежать написания сложного пути к базе данных в вашем приложении; вы теперь только ссылаетесь на псевдоним. Затем вы создаете минимум три объекта на форме: TTable или TQuery , который фактически общается с базой данных через псевдоним и получает данные; объект TDataSource , который связывает данные и визуальные компоненты; по крайней мере один компонент, отображающий данные.

Если вы потратили несколько часов, чтобы заставить все это работать, но ничего не получилось, попробуйте установить свойство Active у TTable или TQuery в True . Это откроет таблицу в базе данных.

2. Какие серверы данных поддерживает Delphi?

Delphi (в старших вариантах поставки) напрямую работает с Oracle, Informix, InterBase, DB/2, Sybase, MS SQL Server. Вы можете использовать ODBC драйверы третьих фирм, чтобы работать с любым сервером. Наиболее известные производители качественных ODBC драйверов:

Есть специализированный вариант Delphi 2.0 — Delphi/400, который ориентирован исключительно на работу с AS/400.

3. Cуществует ли способ работать из Delphi с AS/400, исключая ODBC?

В состав Delphi 1.0 не входит, но доступен отдельно визуальный 16-разрядный компонент компании Gerald Limited.

Есть специализированный вариант Delphi 2.0 — Delphi/400, который ориентирован исключительно на работу с AS/400.

4. Cуществует ли способ работать из Delphi с Lotus Notes (IBM Notes), за исключением ODBC?

Существует только 16-разрядный линк для Notes. В состав Delphi он не входит (разработан компанией Brainstorm) и поставляется отдельно по каналам Borland. Спрашивайте дилеров Borland.

5. Можно ли создавать с помощью Delphi сетевые приложения не для схемы клиент-сервер, а для схемы с разделяемыми файлами (как, например, в FoxPro)?

Компонент TTable имеет свойство Exclusive ; если Exclusive=False , то одну и ту же таблицу могут просматривать и редактировать несколько пользователей. При редактировании таблицы текущая запись автоматически блокируется. Если есть необходимость заблокировать несколько записей или всю таблицу, то для этого придется использовать функции BDE — модуль DBIPROCS (

). Кстати, существенно, что это можно делать и на Delphi Desktop — отсюда вывод: сетевые приложения (в файл-серверной архитектуре) можно делать и на Delphi Desktop.

6. Можно ли работать при помощи Delphi не с IDAPI — или ODBC-драйверами, а с «родными» API каких-либо СУБД?

Да, можно. Это еще один пример открытости Delphi. В одном из проектов Демо-центра появилась необходимость прямого обращения к API SQL-сервера. Был написан соответствующий интерфейс поверх Borland InterBase API — и все заработало. Аналогично: существуют написанные компоненты для работы с AS/400 и для мэйнфреймов.

7. Какие версии Informix (Online, I-NET) поддерживают SQL Links?

BDE версии до 2.51 поддерживает работу с клиентской частью Informix ESQL/C I*NET 4.x. BDE версии 2.51-2.52 поддерживается ESQL/C I*NET 5.x.

32 SQL Link версии 3.5 и выше поддерживает ESQL/C I*NET 7.x.

8. Как работать с таблицами в виде текстовых файлов (ASCII)?

Информацию об этом вы можете найти в каталоге DELPHI\DOC. Файл называется ASCIIDRV.TXT.

9. Как правильно указать имя сервера Oracle?

Пишите имя по правилам Oracle — перед именем не забудьте поставить @.

10. Что такое транзакции (Transactions)?

SQL database серверы обрабатывают запросы в ‘логических единицах работы’ которые и называются транзакциями. То есть транзакция — это группа связанных операций (SQL запросов) которые все должны быть выполнены успешно перед тем, как сервер закончит (commit) изменение базы данных. Либо вся это группа будет выполнена, либо нет. Транзакции обеспечивают целостность базы данных …

11. Как в Delphi управлять транзакциями?

В Delphi может управлять транзакции так:

1. Implicitly — сам стартует и коммитит транзакции по необходимости, когда программа вызывает метод Post .

2. Explicitly

1. StartTransaction , Commit & RollBack методы TDatabase .

2. При помощи SQL запросов через TQuery — это зависит от конкретного SQL сервера.

Неявные (1) транзакции выполняют TTable & TQuery .

Для явных (2.1) транзакций требуется TDatabase .

Для явных (2.2) транзакций требуется TQuery .

Важно:

При определении параметров драйвера SQLPASSTHRU MODE — определяет будут ли passthrough SQL (PSQL) & стандартные вызовы BDE (BDEC) использовать один и тот же connect к SQL серверу.

1. NOT SHARED — PSQL & BDEC используют разные соединения с базой и следовательно влияют (интерферируют) друг на друга также как разные пользователи одной базы (см. Transaction isolation levels)

1. SHARED AUTOCOMMIT — PSQL & BDEC используют одно соединение с базой, каждый PSQL запрос автоматически коммитятся.

2. SHARED NOAUTOCOMMIT — PSQL & BDEC используют одно соединение с базой, PSQL запросы коммитятся ‘вручную’ (способом 2.1).

Еще важнее:

Если Вы все-таки решили управлять транзакциями при помощи SQL запросов через TQuery , то SQLPASSTHRU MODE должно быть NOT SHARED, иначе Implicit & Explicit транзакции могут влиять друг на друга и привести к ‘неожиданным результатам’!

12. Использование формата Access 2.0 в Delphi.

Подробное описание подключения:

• Откройте Windows Control Panel, откройте икону ODBC.

• Добавьте драйвер Access в список доступных, если он не указан в списке текущих драйверов.

• Укажите какое-либо имя в «Data Source Name».

• Выберите файл БД кнопкой Select Database.

• Если вы хотите создать новый — выполните пункт Create Database

• Запустите Database Engine Configuration

• Нажмите кнопку New ODBC Driver

• Выберите драйвер типа ACCESS DATA

• В качестве Default Data Source Name выберите предложенное.

• Создайте новый псевдоним в разделе Alias

• Укажите тип драйвера, путь и имя к нужному файлу БД Access.

• Сохраните изменения и закройте Database Engine Configuration

Примечание: избегайте русских названий имен таблиц, использования пробела в именах таблиц, а также русских имен полей в DB Access.


13. Можно ли при помощи Delphi реализовывать проекты, не имеющие отношения к базам данных? Если да, то имеет ли это смысл?

В таком случае стоит воспользоваться вариантом Delphi Desktop или Developer. Выигрыш по скорости разработки очевидно будет значительным; в частности, разработка интерфейса программы под Windows производится действительно скоростными методами. Хороший пример — Screen Saver для Windows.

Общие вопросы по Delphi и данному FAQ (часть 2)
Базы данных — компоненты и VCL.

1. Какие визуальные компоненты для работы с данными входят в Delphi?

Различные версии Delphi содержат следующие наборы компонентов:

Компоненты Краткое описание Версии Delphi
TDBGrid Представление данных в виде таблицы (очень сложный и наиболее популярный компонент) 1 2 3
TDBEdit Редактирования одного поля 1 2 3
TDBNavigator Как видно из названия, компонент позволяет перемещаться по таблице 1 2 3
TDBLabel Статическое отображение содержимого поля 1 2 3
TDBMemo Редактирования текста в поле типа BLOB 1 2 3
TDBImage Отображение картинок из BLOB-а 1 2 3
TDBRadioGroup, TDBCheckBox Дополнительные средства отображения данных 1 2 3
TDBComboBox, TDBListBox Упрощают ввод данных, предлагая несколько заранее определенных вариантов 1 2 3
TDBLookupListBox, TDBLookupComboBox То же самое, но возможные варианты выбираются из другой таблички 1 2 3
TDBCtrlGrid Вариант представления записей с произвольным расположением полей 2 3
TDBChart Компонент для построение графиков и диаграмм на основании данных, хранящихся в таблице 3
TDecisionGrid, TDecisionChart Компоненты для поддержки принятия решений 3

2. Использование псевдонимов в запросе SQL.

Я делаю запрос по двум таблицам разных форматов, находящихся по разным псевдонимам.

SELECT DB1.Column1, DB2.Column2 FROM :Alias1:DB1, :Alias2:DB2

но в результате получаю ошибку ‘неизвестный тип поля «Alias1:DB1″‘

На самом деле вы получаете ошибку Unknown Keyword, следовательно всего-лишь нужно заключить псевдоним и имя таблицы в двойные кавычки.

SELECT D1.Column1, D2.Column2 FROM «:Alias1:DB1» D1, «:Alias2:DB2» D2

Вообще экспериментировать с SQL-запросами проще следующим образом — создайте запрос QBE, настройте его так, как вам нужно, а затем оттранслируйте его в SQL. В результате вы получите правильный текст нужного вам SQL-запроса. Владельцы Delphi Client/Server могут использовать также и Visual Query Builder. Однако, не все QBE-запросы могут быть оттранслированы в SQL.

3. Ошибка в SQL запросе.

У меня есть TQuery и TDataSource . В свойстве SQL для TQuery я пишу

SELECT * FROM dbo.AnyTable

база данных на MS SQL Server. Когда я устанавливаю Active в True , то получаю ошибку: ‘Token not found. Token :dbo. line number:1’ . Что не так?

Если свойство RequestLive=True , то имя таблицы нужно брать в кавычки:

SELECT * FROM «dbo.table»

Если свойство RequestLive=False , кавычек не требуется:

SELECT * FROM dbo.table

4. Проблемы при работе с MS Access через TQuery.

Я безуспешно пытался использовать данные из Microsoft Access иначе, нежели просто с помощью TTable . Используя TQuery я могу только читать результат, но не могу редактировать. После «login screen» возникает сообщение типа ‘Passthrough SQL connection must be shared’ .

Измените в настройке псевдонима (alias) пункт ‘SQLPASSTHRU MODE’ на ‘SHARED AUTOCOMMIT’.

5. Как создать таблицу при помощи SQL (или почему не работает TQuery.Open)?

TQuery.Open возвращает результат в виде курсора, в связи с этим он работает только для тех выражений, которые возвращают курсор. CREATE TABLE возвращает только результат операции — поэтому для выполнения этого выражения необходимо использовать TQuery.ExecSQL . Но и это может не сработать, если конкретный драйвер БД не поддерживает операцию создания таблиц — для получения характеристик драйвера используйте функции BDE ( DbiOpenDriverList , DbiGetDriverDesc ).

6. Возврат значения select max() и подобных SQL-выражений.

Я хочу выполнить SQL-выражение и получить результат в свою переменную, что-то типа

SELECT MAV(FieldA) FROM TableB INTO :VariableC;

Вам не нужно использовать оператор INTO для программного доступа к результату — его можно получить используя свойства Fields или FieldByName соответствующего компонента TQuery .

TQuery1.Add(‘ SELECT MAX(FiledA) FROM TableB ‘);

Или, если результат нужно визуально отобразить, достаточно подключить к используемому TQuery компоненты TDataSource и TDBText .

7. Автоматический подсчет сумм при помощи TQuery.

Меня интересует возможность подсчета суммы по таблицам, которые уже находятся на форме.

Есть очень простой способ — предположим, что у вас есть на форме Query1 , DataSource1 , DBGrid1 . Добавьте на эту же форму компоненты Query2 , DataSource2 , DBText1 . Установите property Query2.DataSource=DataSource1 . В Query2.SQL напишите

SELECT SUM(FieldName) FROM TableName

где TableName — имя той же таблицы что и у Query1 , а FieldName — имя столбца по которому производится подсуммирование. Далее свяжите между собой Query2 , DataSource2 и DBText1 .

При изменении Query1 (если конечно Query1.RequestLive=True ) Query2 будет автоматически перевыполняться. Это решение хоть и простое, но неэкономичное — особенно при большом количестве записей в исходной таблице. Более того, запрос Query2 должен иметь WHERE идентичный Query1 .

Для подсчета сумм правильнее использовать событие TQuery.OnCalcFields . Хорошим примером является X:\DELPHI\DEMOS\DB\MASTAPP\MASTAPP.DPR.

8. Использование кавычек в параметризированном запросе.

Мой запрос получает параметр. Проблема в том, что строка параметра содержит » (двойную кавычку), которая приводит к Runtime Error.

Вам необходимо использовать динамический SQL-запрос, иначе при указании например

WHERE TABLE.FIELD = ‘let»ter’

вы получите ошибку.

9. Как создать отдельный компонент TTable?

Легко и просто — точно также как и обычный компонент. При этом в качестве параметра конструктору можно передавать значение nil.

var

begin

MyTable := TTable.Create(nil);

try

MyTable.DatabaseName := ‘MyDB’;

MyTable.TableName := ‘MyTable.db’;

Mytable.IndexName := ‘MyIndex’;

finally

end;

end;

10. Как узнать, какая ячейка при просмотре TDBGrid текущая?

Здесь процедура для сохранения текущего номера строки и колонки. Следующий код в методе MyDBGridDrawDataCell обновляет переменные Col и Row (которые не должны быть локальными для этого метода) каждый раз, когда таблица перерисовывается. Используя этот код, вы можете считать, что Col и Row указывают на текущую колонку и строку соответственно.

var

Col, Row: Integer;

procedure TForm1.MyDBGridDrawDataCell(Sender: TObject; const Rect: TRect;

Field: TField; State: TGridDrawState);

var

begin

if gdFocused in State then

begin

RowHeight := Rect.Bottom — Rect.Top;

Row := (Rect.Top div RowHeight) — 1;

end;

end;

11. Как выделить цветом текущую строку в TDBGrid?

Для TDBGrid в свойстве Options установите dgRowSelect в True .

12. Как изменить цвет ячейки в TDBGrid?

Введите следующий код в обработчике события OnDrawDataCell :

procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect;

Field: TField; State: TGridDrawState);

begin

if gdFocused in State then

with (Sender as TDBGrid).Canvas do

begin

TextOut(Rect.Left, Rect.Top, Field.AsString);

end;

end;

Установите свойство DefaultDrawing в True . Здесь перерисовывается только выделенная ячейка. Если установить DefaultDrawing в False , то вы должны самостоятельно перерисовать все ячейки аналогично примеру.

13. Как узнать, что пользователь перешел на другую запись, например, в TDBGrid?

Переход на новую запись — это событие, которое относится не к визуальному компоненту, а к источнику данных. Соответствующее событие называется OnDataChange и имеется у компонента TDataSource .

14. Как устанавливать собственный цвет или шрифт для столбца TDBGrid?

Выключите property DefaultDrawing , и обрабатывайте событие OnDrawDataCell :

procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect;

Field: TField; State: TGridDrawState);

begin

if Field.FieldName = ‘Name’ then DBGr >

DBGrid1.DefaultDrawDataCell(Rect, Field, State);

end;

Это приведет к тому, что содержимое столбца ‘Name’ будет показываться жирным шрифтом.

В Delphi 2.0 вы можете использовать редактор столбцов для той же самой цели.

15. Почему указатель ползунка в TDBGrid не показывает текущее положение в таблице?

Дело в том, что TDBGrid предполагает многопользовательский доступ к таблице. В этом случае другие пользователи этой же таблицы могут добавлять или удалять записи, в результате информация о количестве записей на текущий момент становится неопределенной.

Конечно, в однопользовательском варианте количество записей всегда известно, но поскольку TDBGrid работает через промежуточный источник данных DataSource , ему неизвестен конкретный способ доступа к данным — навигационный или SQL. Например, для SQL существует только один способ узнать количество записей — выполнить специальный запрос с их подсчетом, а на это может потребоваться значительное время.

По всем этим причинам TDBGrid является универсальным средством для просмотра таблиц, которое работает во всех случаях и с любыми источниками данных.

16. Как установить фокус на определенное поле в TDBGrid?

17. Как создать обработчик события OnClick для TDBGrid?

Как и всякий TControl (иерархия наследования TControlв†’TWinControlв†’TCustomControlв†’TCustomGridв†’TCustomDBGridв†’TDBGrid ) у TDBGrid есть событие OnClick , но оно protected. Так что можно либо создать новый класс, производный от TDBGrid , в котором объявить это свойство как published, либо использовать другой вариант. Например, вы можете использовать событие OnColEnter .

18. Как создать маску для TDBEdit?

Маска относится к полю в таблице (компонент TField ) а не к самому TDBEdit . Дважды щелкните мышкой на TTable и в FieldEditor’е добавьте все нужные вам поля. Когда поле выбрано в списке, его свойства показаны в Object Inspector, включая маску ввода. Связывание TDBEdit и любых других компонентов с этим TTable будет вызывать наложение маски на соответствующее поле.

19. Хотелось бы иметь для OLE объектов, сохраненных в базе данных, компонент вроде TDBImage.

В стандартном наборе такого компонента действительно нет. Возможно, кто-нибудь скоро напишет что-нибудь в этом роде. В принципе, можно обойтись и без данного компонента. Например, есть табличка .db с BLOB полем для OLE объекта. При движении по записям можно OLE сохранять в базе, уничтожать, создавать новый, считывать из базы.

• создать поток, связанный с BLOB полем

• для OLE контейнера выполнить чтение/запись с потоком ( SaveToStream и LoadFromStream )

Естественно, OLE объект должен быть Embedded.

20. Что нужно сделать, чтобы при открытии запароленной таблицы не появлялся диалог запроса пароля?

Просто дайте этот пароль объекту Session перед открытием таблицы:

Session.AddPassword(‘PASSWORD’);

После закрытия таблицы, пароль можно удалить RemovePassword(‘PASSWORD’) , можно удалить все пароли: RemoveAllPasswords .

Если ваш компонент доступа к данным ( TTable или TQuery ) связан с сессий, отличной от той, которая выставляется по умолчанию, то добавлять пароль нужно именно у этого компонента TSession .

21. Как определить реальный размер поля типа BLOB, которое сохранено в таблице?

Ниже приведена функция GetBlobSize , которая возвращает размер данного BLOB или MEMO поля.

function GetBlobSize(Field: TBlobField): Longint;

begin

with TBlobStream.Create(Field, bmRead) do

try

Result := Seek(0, 2);

finally

end;

end;

procedure TForm1.Button1Click(Sender: TObject);

begin

end;

22. Как осуществить поиск по неиндексированному полю в таблице?

Вы можете добавить следующую функцию в ваш модуль и вызвать, например:

Locate(Table1, Table1LName, ‘Beman’);

Table1 — компонент TTable , Table1LName — TField , который вы добавили с помощью Fields Editor и ‘Beman’ — имя, которое вы хотите найти.

23. Как узнать, что изменилась текущая запись?

Событие TDataSource.OnDataChange когда State=dsBrowse .

24. Как считать даты для вычисляемых полей?

При вычислении дат важно удостовериться в том, что все используемые значения подходят по типу. В документации не совсем явно отражен тот факт, что на самом деле тип TDataTime эквивалентен типу Double , который можно использовать далее.

В примере, D1 и D2 (поля в Table1 ) могут быть типа или Date , или TDateTime , а D3 — поле типа Integer .

procedure TForm1.Table1CalcFields(DataSet: TDataset);

var

T1, T2: TDateTime;

begin

Table1D3.AsInteger := Trunc(Double(T1) — Double(T2));

end;

Компоненты и VCL

1. Почему возникает ошибка компиляции при обращении к объекту Sender в обработчике события?

Я в обработчике события OnChange для компонента TEdit пытаюсь получить содержимое его текстового буфера. Однако, следующая конструкция вызывает ошибку компиляции ‘неизвестный идентификатор’:

Если вы рассматривали декларацию, объект Sender имеет тип TObject , который является классом, который наследуется почти всеми остальными объектами. Вы, вероятно, пробуете обращаться к свойству, которое не определено в TObject , вроде Text или Caption . По этой причине, выражение Sender.Text вызовет ошибку, но если (для примера) вы знаете, что Sender имеет тип TEdit, тогда вы можете использовать выражение:

Caption := (Sender as TEdit).Text;

Если вы не уверены, что объект Sender будет всегда иметь данный тип, то рекомендуется предварительно проверить это:

if Sender is TEdit then

2. Проблемы с полями класса типа TObject, TTable и т.д.

Я объявляю поле класса как TTable , но при обращении к нему происходит ошибка.

Дело в том, что в Delphi все экземпляры объектов, объявленых как class, являются динамическими. Соответственно поле MyTable, объявленное как

type

public

constructor Create;

destructor Destroy; override;

end;

является указателем на класс TTable , и должно быть инициализировано в конструкторе вашего объекта и соответственно разрушено в деструкторе следующим образом:

constructor TMyClass.Create;

begin

MyTable := TTable.Create(nil);

MyTable.DatabaseName := ‘DBDEMOS’;

end;

destructor TMyClass.Destroy;

begin

end;

Подробнее см. Changes in Object Pascal Language в документации или on-line help.

3. Как закрыть модальную форму (ShowModal)? И вообще, каков лучший способ закрыть любую форму?

Вообще говоря, нужно вызывать метод Close для формы. Close вызывает событие OnClose (обработчик которого может решить, что форму нельзя закрывать, например, если имеются несохраненные данные). Close не освобождает память, связанную с формой, если вы, конечно, не поместите в обработчик события вызов метода Release .

Если вы хотите уничтожить форму без вызова события OnClose , используйте метод Release . Этот метод работает подобно Free , но позволяет всем обработчикам событий данной формы закончить работу перед тем, как память будет освобождена.

Модальные формы «прекращают свой модальный статус», когда вы устанавливаете свойство ModalResult формы в любое значение, отличное от нуля. Если вы поместите кнопку на модальную форму и установите свойство ModalResult для кнопки в некоторое значение, то, когда пользователь нажмет на эту кнопку, форма закроется с результатом, который вы определили. Этот результат можно узнать вызывая ShowModal как функцию. То есть:

4. Перемещение существующих компонентов на TPanel, TGroup и т.п.

Я поместил кнопку (или что-то другое) на форму, затем поместил панель, и решил переместить кнопку на панель, но ничего не получилось.

Действительно, чтобы поместить кнопку на панель, необходимо на форму сначала поместить панель, выбрать ее, а затем уже помещать кнопку.

Но и в вашей ситуации есть решение. Скопируйте (Copy) или вырежьте (Cut) нужный компонент, выберите панель, и сделайте вставку (Paste). Рекомендуется предварительно «подогнать» копируемый компонент в левый верхний угол формы, иначе компонент на панели может выпасть из «пределов видимости» панели (или любого другого группового компонента).

Если компонент все-таки «выпал» из пределов видимости — найдите этот компонент в Инспекторе Объектов, и установите нужные значения его свойств Left и Top .

Используя группы компонент можно огранизовать форму-шаблон, на которой можно складывать (например в Notebook) компоненты с предварительно заданными свойствами, отличными от стандартных. Это решение проще чем добавлять такие компоненты в палитру компонент — не увеличивается размер библиотеки компонентов DCL (Delphi 3.0 не считается), не загромождается палитра компонент.

Учтите, что при таком копировании компонент их имена меняются на новые ( Button1 , Button2 и т.д.).

5. Как можно добавить новый компонент на страницу TTabbedNoteBook во время выполнения программы? Как нужно определить свойство Parent для этого компонента?

Для того, чтобы добавить компонент на страницу TabbedNotebook , свойству Parent нового компонента нужно присвоить указатель на требуемую страницу. Способ для доступа к любой странице TTabbedNotebook во время выполнения — массив свойств Objects у свойства Pages компонента TTabbedNotebook . Другими словами, страницы сохранены в виде объектов в свойстве Pages (тип TStringList ). Пример демонстрирует создание кнопки TButton на второй странице TabbedNotebook1 :

var

begin

То же самое справедливо и для компонента TNotebook .

6. Как включить символ & в надпись (Caption)?

7. Как сделать окно (TForm) без заголовка (Caption)?

Попробуйте использовать следующий код:

constructor TPanelForm.Create(AOwner: TComponent);

var

begin

inherited Create(AOwner);

LStyle := GetWindowLong(Handle, GWL_STYLE);

LStyle := LStyle and not WS_CAPTION;

SetWindowLong(Handle, GWL_STYLE, LStyle);

end;

procedure TPanelForm.ForceRepaint;

var

WWidth, WHeight: Integer;

begin

SetWindowPos(Handle, HWND_TOP, 0, 0, 0, 0, SWP_NOMOVE);

SetWindowPos(Handle, HWND_TOP, 0, 0, WWidth, WHeight, SWP_NOMOVE);

end;

Можно поступить другим способом — выставить у формы свойство BorderStyle = bsNone , и написать следующий обработчик OnPaint :

procedure TForm1.FormPaint(Sender: TObject);

begin

Canvas.Rectangle(0, 0, Width, Height);

end;

8. Почему некоторые компоненты типа TPanel и TEdit не имеют свойства Canvas?

Все наследники TCustomControl имеют Canvas , однако, в большинстве случаев это свойство объявлено protected для предотвращения рисования ‘чужаками’ на компоненте. Наследники компонента всегда могут получить доступ к унаследованным protected свойствам (типа Canvas ), но пользователь компонента — никогда.

type

TCanvasPanel = class(TPanel)

public

property Canvas;

end;

Если вы хотите рисовать на компоненте, у которого нет public свойства Canvas , то используйте, например, компонент TPaintBox : положите его на панель TPanel , сделайте Align = Client и рисуйте на TPaintBox.Canvas .

9. Почему при уничтожении компонента в методе OnClick происходит ошибка?

Допустим, вы поместили на форму кнопку, и создали метод OnClick в котором вызываете Button1.Free . Вы видите, что это метод формы — казалось бы, какие препятствия для правильного уничтожения кнопки?

На самом деле Button1.OnClick является свойством и после запуска вашего приложения содержит адрес метода Form1.Button1Click . Именно кнопка вызывает этот метод как свой собственный. А это означает, что кнопка не может удалить себя в своем-же методе. Даже если вы попытаетесь удалить ссылку в OnClick :

Button1.OnClick := nil;

то это не поможет — стек настроен на возврат в обработчик TButton , который и вызвал OnClick . Поскольку к моменту возврата объект разрушен — возникает GPF или Access Violation.

10. Есть ли у TDBGrid события OnMouseDown, OnMouseUp и OnMouseMove?

Они есть, но не объявлены published. Вы можете создать наследника TDBGrid и сделать их published.

11. Поиск компонента в форме по имени.

Я хочу делать текущими в форме произвольные компоненты. Как выставить фокус у конкретного компонента ясно — ListBox1.SetFocus . А если я хочу обращаться к некоему компоненту по имени (свойство Name )?

Свойство TForm.Components — массив компонентов формы, который и нужен вам. Вы можете перемещаться по этому массиву пока не найдете компонент с нужным Name . Например:

procedure TForm1.DooDah;

var

begin

while (Count ‘Button1’) do Inc(Count);

end;

procedure TForm1.DooDah;

var

begin

Target := FindComponent(‘Button1’);

end;

Оба этих примера показывают как найти компонент TButton с именем Button1 , и вызвать его метод SetFocus .

12. Как получить горизонтальный ScrollBar на ListBox?

Пошлите сообщение LB_SETHORIZONTALEXTENT в ListBox . Например, сообщение может быть отослано в момент создания формы:

procedure TForm1.FormCreate(Sender: TObject);

begin

SendMessage(Listbox1.Handle, LB_SETHORIZONTALEXTENT, 1000, Longint(0));

end;

13. Как определить текущую колонку и строку каретки в компоненте TMemo?

Вы можете использовать сообщения Windows API EM_LINEFROMCHAR и EM_LINEINDEX для определения положения.

var

begin

LineNum := SendMessage(Memo1.Handle, EM_LINEFROMCHAR, Memo1.SelStart, 0);

CharsBeforeLine := SendMessage(Memo1.Handle, EM_LINEINDEX, LineNum, 0);

Label1.Caption := ‘Line ‘ + IntToStr(LineNum + 1)

Lebel2.Caption := ‘Position ‘ + IntToStr(Memo1.SelStart — CharsBeforeLine + 1);

end;

14. Постранична прокрутка TMemo, реализация Undo и определение строки курсора.

Как прокрутить содержимое компонента TMemo ?

Приведенная ниже процедура предполагает, что фокус находится на Edit1 и осуществляет прокрутку в соответствии с нажатыми клавишами.

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);

begin

if Key = VK_F8 then

else if Key = VK_F7 then SendMessage(Memo1.Handle, WM_VSCROLL, SB_PAGEUP, 0);

end;

Если определено всплывающее (popup) меню для TMemo ,и заданы клавиши для операций Cut, Copy, Paste, то я могу обрабатывать эти события, вызывая методы CutToClipboard, CopyToClipboard, и т.д. Однако, если я поместили пункт Undo в меню (обычно Ctrl+Z), то как дать знать TMemo , что нужно выполнить Undo?

Если встроенного Undo достаточно, то это очень просто:

Memo1.Perform(EM_UNDO, 0, 0);

Для переключения свойства Enabled пункта меню Undo1 :

Undo1.Enabled := Memo1.Perform(EM_CANUNDO, 0, 0) <> 0;

Как можно определить, на какой строке в TMemo находится курсор?

Весь фокус в сообщении EM_LINEFROMCHAR . Попробуйте:

procedure TMyForm.BitBtn1Click(Sender: TObject);

var

begin

ILine := Memo1.Perform(EM_LINEFROMCHAR, $FFFF, 0);

MessageDlg(‘Line Number: ‘ + IntToStr(ILine), mtInformation, [mbOK], 0);

end;

15. Как поместить BLOB Memo в компонент TMemo?

procedure TForm1.Button1Click(Sender: TObject);

var

begin

S := TBlobStream.Create(Table1BBBMemo, bmRead);

end;

1. Table1BBBMemo — имя поля BLOB Memo ( TMemoField ).

2. Memo1 — имя компонента TMemo . Естественно, что этим же способом можно обмениваться информацией с BLOB-полями произвольного типа.

16. Как показать содержимое Memo поля в TDBGrid?

Используйте следующий код для обработки события OnDrawDataCell у TDBGrid . (Перед запуском программы создайте объект TMemoField для memo поля в Fields Editor).

procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect; Field: TField; State: TGridDrawState);

var

P: array [0..1023] of Char;

S: string;

begin

if Field is TMemoField then

with (Sender as TDBGrid).Canvas do

begin

BS := TBlobStream.Create(Table1Notes, bmRead);

FillChar(P, SizeOf(P), #0);

while Pos(#13, S) > 0 do S[Pos(#13, S)] := ‘ ‘;

while Pos(#10, S) > 0 do S[Pos(#10, S)] := ‘ ‘;

TextOut(Rect.Left, Rect.Top, S);

end;

end;

17. Не возникает событие TSpeedButton.OnDblClick.

Я создаю событие на SpeedButton1.OnDblClick , но оно, похоже, вообще никогда не возникает. OnClick работает. Что делать?

На самом деле работает, только в определенных ситуациях. Если вы помещаете на панель несколько кнопок, то по умолчанию они независимы и соответственно не фиксируются в нажатом состоянии. Поскольку одиночное нажатие мыши на кнопку отрабатывается немедленно, двойной щелчок мыши воспринимается как два нажатия и отпускания. Поэтому OnDblClick и не срабатывает.

Если же кнопки связаны в группу ( GroupIndex <> 0 ), то они могут фиксироваться, и соответственно могут воспринимать двойной щелчок мыши.

18. Как разделить обработку OnClick и OnDblClick? Ведь OnClick будет вызываться всегда, и перед DblClick.

Именно так и происходит в Windows — посылаются оба сообщения. Для того чтобы обработать только какое-то одно событие необходимо чуть «задержать» выполнение OnClick . Сделать это можно следующим способом:

procedure TForm1.ListBox1Click(Sender: TObject);

var

begin

TargetTime := GetTickCount + GetDoubleClickTime;

while GetTickCount

if PeekMessage(Msg, ListBox1.Handle, WM_LBUTTONDBLCLK, WM_LBUTTONDBLCLK, WM_NOREMOVE)

then Exit;

MessageDlg(‘Single clicked’, mtInformation, [mbOK], 0);

end;

19. Как определить из обработчика события OnClick в Popup.MenuItem, для какого объекта это произошло?

Используйте свойство PopupComponent компонента TPopupMenu для определения, где была нажата правая кнопка.

procedure TForm1.PopupItem1Click(Sender: TObject);

begin

end;

Свойство ActiveControl для формы тоже можно использовать, однако, ActiveControl не обязательно является тем элементом, для которого произошло событие.

20. Как использовать case, чтобы определить, какой объект вызвал процедуру?

Используйте свойство Tag . Установите значение Tag свое у каждого объекта для опознания. (Использование констант, которые описывают объект — идеально подходит).

case (Sender as TComponent).Tag of

end;

Таким образом вы можете обрабатывать события как от однотипных компонент, так и от компонент разного типа.

21. Как обрабатывать события от множества однотипных компонентов.

На моей форме находится примерно 10 кнопок. Я хочу обрабатывать нажатие на любую из них одним событием, но как их отличить внутри обработчика события?

Для этого базовый класс VCL TComponent имеет поле Tag типа Longint . В момент разработки вы можете присвоить этому полю любое значение, а в момент исполнения использовать его (или переопределять). В вашей ситуации достаточно присвоить полю ButtonX.Tag значение от 1 до 10 (или от 0 до 9, как удобнее), а в обработчике написать примерно следующее:

procedure MyForm.Button1Click(Sender: TObject);

begin

case (Sender as TComponent).Tag of

end;

end;

22. Использование TPanel в качестве «индикатора».

Я пытаюсь использовать TPanel как индикатор процесса обновления БД. Однако надпись на панели не обновляется пока не закончится цикл обработки БД. В цикле вызывается Panel.Caption := …

После присвоения Panel.Caption вызывайте Panel.Refresh или Application.ProcessMessages (второй вариант предпочтительней, так как позволяет перерисовать себя всем клмплнентам, которые в этом нуждаются).

23. Включение и выключение подсказок (Hints) для всех элементов на форме.

Если ваша форма содержит панель подсказки в нижней части формы, то вы можете определить подменю для этой панели, и выставлять Form.ShowHint в True или False в зависимости от состояния Checked элемента меню.

Например, в TMenuItem.OnClick напишите:

ShowHint := not (Sender as TMenuItem).Checked;

В результате на локальном меню панели будет видно, включены подсказки для всех элементов или нет.

24. Как в меню поместить bitmap?

Можно поступить таким образом:

var

begin

Bmp1.LoadFromFile(‘C:\WHERE\B1.BMP’);

SetMenuItemBitmaps(MenuItemTest.Handle, 0, MF_BYPOSITION, Bmp1.Handle, Bmp1.Handle);

end;

• MenuItemTest — имя пункта меню (горизонтальная строка)

• 0,1 … — позиция пункта меню, в который надо вставить BMP

• первый Handle — для показа невыбранного пункта меню (Unchecked)

• второй Handle — для выбранного (Checked). Они могут быть разные

Код можно вставить в обработчик OnCreate для формы. При уничтожении меню TBitmap не уничтожается, это надо делать отдельно.

25. Каким образом можно поместить двумерный массив в TImage?

Представим, что данные находятся в массиве:

TestArray: array [0..127, 0..127] of Byte;

Картинка будет иметь размер 128Г—128 точек:

Вызываем функцию Windows API для формирования bitmap:

SetBitmapBits(Image1.Picture.Bitmap.Handle, SizeOf(TestArray), @TestArray);

Однако, если вы используете свою палитру, то ее нужно создавать специально.

26. Как из программы ‘открыть’ TComboBox?

У TComboBox есть run-time свойство, не упомянутое в on-line help — DroppedDown .

Для открытия ComboBox напишите:

Естественно, False закроет его.

27. Как заменить надпись ‘Read only’ в компонентах TSaveDialog и TOpenDialog?

Попробуйте посмотреть в Windows API Help разделы, связанные с lpTemplateName . Вообще говоря, вы можете заменить стандартный Open Dialog Box своим собственным шаблоном.

28. Проблема в использовании компонента TCustomGrid.

1. Создаю новый компонент при помощи Эксперта Компонент

2. Имя класса TSampleCalendar

3. Имя родителя TCustomGrid

4. Использую страницу ‘Samples’

5. Сохраняю модуль с именем CALSAMP.PAS

6. Подключаю к Палитре компонент

7. Создаю форму, помещаю новый компонент на форму и получаю Runtime Error 210 В чем дело?

Проблема в том, что TCustomGrid имеет метод DrawCell , который является абстрактным. То, что его безусловно надо переписывать у любого наследника TCustomGrid , к сожалению, не отражено в документации. Создайте этот метод (пусть даже пустой) и ваша проблема исчезнет.

29. Как установить формат для поля таблицы?

В Fields Editor выберите поле для форматирования. Используя свойства DisplayFormat и EditFormat сделайте то, что нужно. DisplayFormat работает для поля, на которое не установлен фокус. EditFormat работает для поля, на которое фокус установлен. Форматирование аналогично первому параметру в функции FormatFloat , но без скобок.

30. Можно ли использовать клавишу ENTER при вводе данных для перехода от поля к полю?

Используйте данный код для события OnKeyPress компонента TEdit .

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);

begin

if Key = #13 then

begin

SelectNext(Sender as TWinControl, True, True);

Key := #0;

end;

end;

Теперь Enter ведет себя как Tab. Затем, выберите все объекты, которые должны вести себя как Edit1 (за исключением кнопок) и в Object Inspector установите обработчик OnKeyPress в Edit1KeyPress . Каждый выбранный вами объект воспринимает Enter как Tab. Если вы хотите обрабатывать событие на уровне формы (а не в каждом отдельном компоненте), уберите обработчики события у всех компонент и создайте FormKeyPress — обработчик OnKeyPress для формы:

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);

begin

if Key = #13 then

begin

SelectNext(Sender as TWinControl, True, True);

Key := #0;

end;

end;

Все объекты на форме будут воспринимать Enter как Tab.

Общие вопросы по Delphi и данному FAQ (часть 3)
Object Pascal и Windows API

1. Как работает информация времени выполнения (RTTI)?

Имеются два новых оператора: as и is. as — оператор защищенного преобразования типов (typecasting). Вы можете использовать его, чтобы заставить компилятор преобразовать объект из одного типа в другой, но, если в во время выполнения эти типы окажутся несовместимыми, то вы получите ошибку. Hапример, если вы имеете класс TSport , с потомоками TBasketball и TFootball , вам может потребоваться переменная типа TSport ; далее может так случиться, что в программе эта переменная будет фактически содержать экземпляр типа TFootball . Тогда вы можете обратиться к этой переменной

(MySport as TFootball)

чтобы получить доступ к специфическим свойствам из типа TFootball . Однако, если вы ошиблись и на самом деле это экземпляр типа TBasketball , то при обращении к несуществующим свойствам будет возникать ошибка. Оператор is определяет, принадлежит ли экземпляр объекта к данному классу, либо к классу одного из его предков, и используется для проверки, сработает ли преобразование типов с данным объектом. Если вы имеете переменную MySport типа TSport , и в настоящее время она содержит экземпляр TBasketball , тогда следующие выражения истинны:

(MySport is TSport)

(MySport is TBasketball)

not (MySport is TFootball)

Следует иметь ввиду, что компилятор разрешает использовать данные конструкции только для выполнения преобразования типов, связанных родственными отношениями. Так, конструкция (Button1 as TEdit) (переменная Button1 имеет тип TButton ) вызовет ошибку компиляции, так как ни при каких условиях не может быть выполнено преобразование типов от TButton к TEdit или наоборот. Комбинация двух операторов может привести к выражению типа следующего :

function PlayerGoodness(var MySport: TSport): Integer;

begin

if (MySport is TBasketball) then

Result := (MySport as TBasketball).ReboundShots

else if (MySport is TFootball) then

Result := (MySport as TFootball).TotalYardage;

end;

Также, базовый класс TObject имеет набор методов, которые возвращают информацию, созданную компилятором в момент компиляции текста для поддержки RTTI. Hапример, метод TObject.ClassName возвращает имя класса любого объекта, наследованного от TObject . Hапример, TButton.ClassName вернет значение ‘TButton’ .

2. Как работает обработка исключительных ситуаций в Delphi?

Основная структура выглядит примерно так:

try

try

except

raise;

end;

finally

end;

Первая строка распределяет большой блок памяти. Затем, в блоке try, выполняется несколько операторов, каждый из которых может вызвать ошибку, или, другими словами, «вызвать исключительную ситуацию». Если возникает ошибка, оставшаяся часть блока try пропускается, и выполняются блоки except и finally. Если ошибок нет, то после выполнения всех операторов в блоке try выполнится блок finally. В любом случае, блок памяти будет освобожден. Блок try … finally ловит все, включая Windows GPF или Access Violation. Обратите внимание на вызов raise в блоке try … except. Он снова вызывает исключительную ситуацию, которая вызовет сообщение об ошибке после того, когда закончится блок finally. Если не вызвать raise, то считается, что вы обработали исключительную ситуацию самостоятельно в пределах блока except.

3. Есть ли простой способ перехватить exception?

Создайте метод для формы, перехватывающий исключения. Этот метод будет вызываться обработчиком OnException объекта Application . В вашем методе проверьте, тот ли это исключение, что вы ожидаете, например EDatabaseError . Почитайте on-line help для события OnException . Там есть информация, как вызвать собственный метод для события.

procedure TForm1.MyExcept(Sender: TObject; E: Exception);

begin

if E is EDatabaseError then MessageDlg(‘Поймали exception’, mtInformation, [mbOk], 0)

else raise E;

end;

procedure TForm1.FormCreate(Sender: TObject);

begin

end;

4. Delphi используют строки в стиле Pascal или C?

И те и другие. Delphi имеет два различных набора функций манипулирования строками, один — для PChar ; но в Delphi также есть функция MessageDlg , которая принимает строки типа Pascal.

Delphi 2.0 добавляет так называемые длинные строки ( AnsiString ), которыми можно манипулировать как обычными строками в Pascal, но они имеют динамически изменяющийся размер и могут быть размером до 4Гбайт. Можно выполнять преобразования от PChar к AnsiString и наоборот. Старый строковый тип теперь называется ShortString . По умолчанию кличевое слово string соответствует типу AnsiString .

5. Есть ли в Delphi битовые множества?

В явном виде битовых множеств в языке Object Pascal нет. Но вместо этого можно использовать обычные множества, которые на самом деле и хранятся как битовые. Если множество вам нужно для проверки, установлен ли какой то бит в слове (байте и т.д.) можно попробовать такую конструкцию:

type

TByteSet = set of Byte;

var

if 3 in PByteSet(@W)^ then .

В Delphi 2.0 есть специальный класс TBitSet , который ведет себя как битовое множество.Для Delphi 1.0 вы можете написать такой класс самостоятельно.

6. Проблема с числом типа Single в DLL.

Я написал на C++ DLL, в которой у меня функция использует число типа float, передал из Delphi число типа Single и получил GPF ‘Invalid Opcode’. Что неправильно?

Если вы используете числа с плавающей точкой, лучше передавать их не по значению, а по ссылке (указатель в C++). Вероятно DLL написана на MS Visual C++, так как Microsoft и Borland используют разные соглашения о передаче параметров при работе с сопроцессором. В случае Borland C++ и Delphi должны использовать одинаковый способ передачи параметров и значений (через стек сопроцессора). В любом случае вместо Single лучше использовать Double (double или long float в C++), так как вообще говоря, реальный тип, который соответствует типу Single точно не определен и может измениться в будущем.

7. Как заставить приложение Delphi отвечать на сообщения Windows?

Используем сообщение WM_WININICHANGED в качестве примера. Объявление метода в TForm позволит вам обрабатывать сообщение WM_WININICHANGED :

procedure WMWinIniChange(var Message: TMessage); message WM_WININICHANGE;

Код в implementation может выглядеть так:

procedure TForm1.WMWinIniChange(var Message: TMessage);

begin

inherited;

end;

Вызов inherited метода очень важен. Обратите внимание также на то, что для функций, объявленных с директивой message (обработчиков событий Windows) после inherited нет имени наследуемой процедуры, потому что она может быть неизвестна или вообще отсутствовать (в этом случае вы в действительности вызываете процедуру DefaultHandler).

8. Как обработать события от других приложений?

Попробуйте сделать это следующим образом:

type

TForm1 = class(TForm)

private

procedure WMNCActivate(var Msg: TMessage); message WM_NCACTIVATE;

end;

procedure TForm1.WMNCActivate(var Msg: TMessage);

begin

end;

9. Как перехватить сообщения Windows и обработать их перед тем, как выполнится строка Application.Run?

Пример проекта показывает, как получить сообщения Windows в данном случае. Это редкий случай, в большинстве случаев переопределение процедуры Application.OnMessage будет делать то же самое.

program Project1;

uses

Unit1 in ‘UNIT1.PAS’ < Form1 >,

Messages, WinTypes, WinProcs,

var

function NewWndProc(hWndAppl: HWnd; Msg, wParam: Word; lParam: Longint): Longint; export;

begin

Result := CallWindowProc(OldWndProc, hWndAppl, Msg, wParam, lParam);

end;

begin

OldWndProc := TFarProc(GetWindowLong(Application.Handle, GWL_WNDPROC));

SetWindowLong(Application.Handle, GWL_WNDPROC, Longint(@NewWndProc));

end.

10. Проблема с DragDrop для внешних программ.

Я пишу небольшую программку — «мусорную корзину». В FormCreate вызывается DragAcceptFiles(HANDLE, True) . Проблема в том, что когда размер окна восстанавливается и затем минимизируется Drag and Drop перестает работать. Я безуспешно пробовал помещать DragAcceptFiles в разные методы формы. Однако если сделать вызов DragAcceptFiles(Application.Handle, True) в MainForm.Create , то все работает. Как перехватить событие WM_DROPFILES ?

Это можно сделать так:

type

TMainForm = class(TForm)

procedure FormCreate(Sender: TObject);

private

procedure DropFiles(var Msg : TWMDropFiles); message WM_DROPFILES;

end;

procedure TMainForm.DropFiles(var Msg : TWMDropFiles);

begin

NrOfFiles := DragQueryFile(Msg.Drop, Word(-1), FileName, BufSize);

DragQueryFile(Msg.Drop, 0, FileName, BufSize);

end;

procedure TMainForm.FormCreate(Sender: TObject);

begin

end;

Подробнее о перехвате событий Windows см. Главу 7 руководства Component Writers Guide.

11. Как обрабатывать WM_DROPFILES (Drag/Drop)?

Следующий код показывает как обрабатывать это событие. Обрабатываются имена всех «брошенных» файлов. Для загрузки каждого файла вызывается CreateChild(FName) . В обработчике OnCreate данной формы вы должны вызвать DragAcceptFiles .

type

TFrameForm = class(TForm)

protected

procedure WMDropFiles(var Msg: TMessage); message WM_DROPFILES;

end;

procedure TFrameForm.WMDropFiles(var Msg : TMessage);

var

FName: string;

begin

N := DragQueryFile(HDrop, $FFFF, nil, 0);

for I := 0 to (N-1) do

begin

Size := DragQueryFile(HDrop, I, nil, 0);

if Size

begin

DragQueryFile(HDrop, I, @FName[1], Size+1);

end;

end;

inherited;

end;

12. Как может выделить время CPU другим задачам , подобно «DoEvents» в VB?

Эквивалент в Delphi — Application.ProcessMessages .


Если вы выполняете долгие вычисления, то вызов данного метода позволит в Win 16 выполняться параллельно другим приложениям, а в Win 32 — корректно перерисовываться вашему приложению.

13. В каком порядке происходят события при создании и показе окна?

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

14. UpCase для русского языка.

Данная функция (UpCase) производит преобразование только латинских символов в верхний регистр. Для правильного преобразования необходимо использовать функции Windows API, поскольку именно Windows должна «знать» о кодировке национальных символов. Причем к конфигурации BDE кодровка Windows не имеет никакого отношения — имея английские Windows без русификатора и выставив в BDE кодировку Paradox ANSII Cyrillic нормальных русских букв получить не удастся.

А функции для преобразования следующие — OemToAnsi, AnsiToOem, OemToAnsiBuf, AnsiToOemBuf в Win16 (модуль WinProcs) и OemToChar, CharToOem, OemToCharBuf и CharToOemBuf в Win32 (модуль Windows)..

15. Приложение, написанное на Delphi, не запускается минимизированным.

Проверьте глобальную переменную CmdShow для того чтобы определить, в каком состоянии запускается приложение, и модифицируйте ее как вам необходимо:

procedure TForm1.FormCreate(Sender: TObject);

begin

if CmdShow = SW_SHOWMINNOACTIVE then WindowState := wsMinimized;

end;

Например, если необходимо запускать приложение либо минимизированным, либо максимизированным, используйте следующий код:

procedure TForm1.FormCreate(Sender: TObject);

begin

if CmdShow = SW_SHOWMINNOACTIVE then WindowState := wsMinimized

else WindowState := wsMaximized;

end;

16. Объясните разницу в помещении uses в секцию interface или implementation.

Секция interface — интерфейсная. Туда попадают объявления констант, типов (в т.ч. и объектов или классов) переменных, процедур и функций. Поэтому для этой части uses должен содержать ссылки на те модули, которые используются для объявлений в этой части.

Секция implementation — описание реализации интерфейсной части, здесь в uses должны быть упомянуты те модули, которыми вы пользуетесь для написания кода. Например, Вы хотите в модуле пользоваться функциями API Windows, для этого добавьте в объявлении implementation строку uses WinTypes, WinProcs; или uses Windows;. Таким образом, вы явно указываете что данными модулями будете пользоваться только в секции реализации.

Конечно, можно упоминать модули только в части interface, но правильная расстановка имен модулей в соответствующем uses гарантирует исключение циклических ссылок, а также улучшает читаемость программы.

17. Как спрятать окна MDI Child?

Я пытаюсь это сделать, выставляя Form1.Visible := False , но это не помогает.

Windows не позволяет прятать окна MDI Child.

18. Как убрать заголовок у формы MDIChild?

Как убрать заголовок ( Caption ) из MDIChild?

Для MDIChild установка свойства BorderStyle := bsNone не убирает заголовок. Это можно сделать так:

procedure TMDIChildForm.CreateParams(var Params: TCreateParams);

begin

inherited CreateParams(Params);

Params.Style := Params.Style and (not WS_CAPTION);

end;

19. Сохранение данных в Clipboard.

Мне нужно использовать clipboard для сохранения данных в собственном формате и я хочу для этого написать набор процедур ввода/вывода с использованием потоков (streams). Возможно ли создать объект TMemoryStream , эаполнить его и поместить в Clipboard?

Не только возможно, именно так поступают функции Clipboard.GetComponent и Clipboard.SetComponent . Сначала вы должны зарегистрировать свой собственный формат данных для Clipboard с помощью функции RegisterClipboardFormat :

CF_MYFORMAT := RegisterClipboardFormat(‘My Format Description’); Далее вы должны выполнить шаги:

1. Создать поток (memory stream) и записать туда данные.

2. Создать глобальный буфер в памяти и скопировать поток туда.

3. Вызвать Clipboard.SetAsHandle(), чтобы поместить буфер в Clipboard.

Пример:

var

begin

try

hBuf := GlobalAlloc(GMEM_MOVEABLE, MStream.Size);

try

try

Move(MStream.Memory^, BufPtr^, MStream.Size);

finally

end;

except

raise;

end;

finally

end;

end;

Внимание: не уничтожайте буфер, созданный с GlobalAlloc . Поскольку вы поместили его в Clipboard, это уже дело clipboard’а его уничтожить. Опять же, получая буфер из Clipboard, не уничтожайте этот буфер — просто сделайте копию содержимого.

Для обратного получения потока и данных, сделайте что-нибудь вроде этого:

var

begin

if hBuf <> 0 then

begin

if BufPtr <> nil then

try

try

finally

end;

finally

end;

end;

end;

20. Что означает Key<>#0 ?

В исходном тексте одного из компонентов третьих фирм я увидел строку:

if Key <> #0 then inherited KeyPress(#0);

В Windows виртуальные коды находятся в диапазоне 1-145 (Dec). Зачем нужна такая проверка?

В соответствии с соглашением Windows код клавиши #0 означает отсутствие реального нажатия. Управление в данную точку программы могло попасть, например вследствие прямого вызова, а не нажатия клавиши или же нажатие уже было обработано предком, вследствие чего код нажатой клавиши был сброшен в 0.

21. Аналог процедуры TP/BP Delay.

procedure TForm1.Delay(MSecs: Longint);

var

begin

repeat

until GetTickCount — FirstTick >= MSecs;

end;

В Win32 API существуют также функции Sleep и SleepEx .

22. Каким образом создать форму, которую можно таскать за поле?

Как сделать форму (окно), которое перетаскивается не за заголовок ( Сaption ), а за все поле ?

Нужно обрабатывать сообщение WM_NCHITTEST :

type

TForm1 = class(TForm)

private

procedure WMNCHitTest(var M: TWMNCHitTest); message WM_NCHITTEST;

end;

procedure TForm1.WMNCHitTest(var M: TWMNCHitTest);

begin

inherited;

if M.Result = htClient then

end;

Примечание: окно можно сделать вообще без Сaption .

23. Как программно спрятать или показать заголовок у формы?

Как программно спрятать или показать заголовок ( Caption ) у формы?

Вы можете попробовать следующее:

procedure TForm1.HideTitlebar;

var

begin

if BorderStyle=bsNone then Exit;

Save := GetWindowLong(Handle, GWL_STYLE);

if (Save and WS_CAPTION) = WS_CAPTION then

begin

case BorderStyle of

SetWindowLong(Handle, GWL_STYLE, Save and (not WS_CAPTION) or WS_BORDER);

SetWindowLong(Handle, GWL_STYLE, Save and (not WS_CAPTION) or DS_MODALFRAME or WS_DLGFRAME);

end;

end;

end;

procedure TForm1.ShowTitlebar;

var

if BorderStyle = bsNone then Exit;

Save := GetWindowLong(Handle, GWL_STYLE);

if (Save and WS_CAPTION) <> WS_CAPTION then

begin

case BorderStyle of

SetWindowLong(Handle, GWL_STYLE, Save or WS_CAPTION or WS_BORDER);

SetWindowLong(Handle, GWL_STYLE, Save or WS_CAPTION or DS_MODALFRAME or WS_DLGFRAME);

end;

Height := Height + GetSystemMetrics(SM_CYCAPTION);

end;

end;

24. Как сделать приложение модальным?

Мне нужно сделать приложение модальным, для того чтобы обезопасить систему и в то же время позволить работать с программой.

Ok, пара предложений на эту тему:

1. Создайте форму, занимающую весь экран (maximized) без системных кнопок (Maximize, Minimize, System)

2. В обработчике FormDeactivate для формы вызовите метод SetFocus — это предотвратит Ctrl+Esc:

3. В обработчике события FormActivate , нужно присвоить метод Deactivate для приложения:

4. Создайте всплывающее меню TPopupMenu с единственным пунктом. В свойствах данного компонента нужно установить Visible=False . Создайте процедуру для этого пункта меню, и в теле поставьте две фигурные скобки <> (для того, чтобы Delphi не удалил эту процедуру)

5. Присвойте созданное Popup-меню форме (св-во PopupMenu )

6. Задайте горячую клавишу (shortcut) для Popup-меню в методе FormActivate как показано ниже:

NullItem1.ShortCut := ShortCut(VK_Tab, [ssAlt]);

( NullItem1 нужно заменить на название созданного вами объекта — пункта меню)

Шаги 4-6 предотвращают переход на приложение по Alt-Tab.

25. Как изменить шрифт у Application.Title (заголовка приложения)?

Никак. Это ограничение Windows — вы не можете изменить шрифт ни у одного заголовка ни у приложения, ни у окна. Для окна можно предложить следующее — создать свое окно без заголовка ( Caption ) и рамки, которое будет само выводить нужную надпись нужным шрифтом и одновременно будет способно изменять свои размеры.

26. Каким образом (желательно не специфичным для Delphi) узнать, открыто меню или нет?

type

TForm1 = class(TForm)

private

public

procedure WMMenuSelect(var M: TWMMenuSelect); message WM_MENUSELECT;

end;

implementation

procedure TForm1.WMMenuSelect(var M: TWMMenuSelect);

begin

inherited;

if M.Menu = MainMenu1.Handle then MessageBeep(MB_ICONASTERISK);

end;

end.

Разное

1. Передача переменной в отчет ReportSmith.

Следующий код показывает, как передать переменную в отчет.

В примере строковой переменной отчета ‘City’ присваивается значение ‘Bombey’ . Подразумевается, что есть готовый отчет с данной переменной. Поместите компонент TReport на форму и установите требуемые свойства для вызова печати отчета. Напишите обработчик OnClick для кнопки Button1 на форме (кнопка — для простоты):

procedure TForm1.Button1Click(Sender: TObject);

begin

Report1.InitialValues.Add(‘@City= ‘);

end;

2. Как получить русские буквы в DBD?

Имя шрифта для отображения русских букв берется из файла PDOXWIN.INI секция [Properties] строка SystemFont. Если очень хочется, то можно исправить имя ‘PDOXWIN.INI’ на ‘DBD.INI’ в файле DBSRV.DLL (он лежит там же где и DBD.EXE) по смещению $E9D8 (не забудьте после ‘DBD.INI’ поставить шестнадцатеричный ноль), и в секции [Properties] файла DBD.INI добавить строку типа

SystemFont = Courier New Cyr

По умолчанию имя фонта для отображения русских букв — Arial.

Действительно, если у Вас Pan Euro или русская версия Windows95, то DBD не будет показывать шрифты Cyr в Preferences/General/Default system font.

Решить эту проблему можно двумя способами:

1. записать в каталог WINDOWS/FONTS шрифты Arial Cyr от русских Windows и сделать ShutDown. После загрузки Arial Cyr будет доступен для выбора.

2. поменять шрифт в Registry вручную например на MS Sans Serif — HKEY_CURRENT_USER/SOFTWARE/Borland/DBD/7.0/Preferences/Properties ключ SystemFont.

3. Как печатать отчеты из приложения Delphi без использования ReportSmith?

1. Лучше всего использовать специализированные генераторы отчетов в виде компонентов, например QuickReport или Ace Reporter.

2. Можно использовать печать формы, например: Form1.Print .

3. Можно использовать свойство Canvas объекта Printer .

4. Как узнать количество точек на дюйм для принтера?

VertPixelsPerInch := GetDeviceCaps(Printer.Handle, LogPixelsX);

HorzPixelsPerInch := GetDeviceCaps(Printer.Handle, LogPixelsY);

5. Как определить, приложение запущено из под Delphi IDE или как отдельный файл?

Для этого следует проверить существование определенных окон:

Delphi 1.0

function DelphiLoaded: Boolean;

function WindowExists(ClassName, WindowName: string): Boolean;

var

PClassName, PWindowName: PChar;

AClassName, AWindowName: array [0..63] of Char;

begin

if then P >

else P >

if WindowName = » then PWindowName := nil

else PWindowName := StrPCopy(@AWindowName[0], WindowName);

Result := FindWindow(PClassName, PWindowName) <> 0;

end;

begin

Result := WindowExists(‘TPropertyInspector’, ‘Object Inspector’)

and WindowExists(‘TMenuBuilder’, ‘Menu Designer’)

and WindowExists(‘TApplication’, ‘Delphi’)

and WindowExists(‘TAlignPalette’, ‘Align’)

and WindowExists(‘TAppBuilder’, »);

end;

Delphi 2.0

function DelphiLoaded: Boolean;

function WindowExists(ClassName, WindowName: string): Boolean;

begin

Result := FindWindow(PChar(ClassName), PChar(WindowName)) <> 0;

end;

begin

Result := WindowExists(‘TPropertyInspector’, ‘Object Inspector’)

and WindowExists(‘TMenuBuilder’, ‘Menu Designer’)

and WindowExists(‘TApplication’, ‘Delphi’)

and WindowExists(‘TAlignPalette’, ‘Align’)

and WindowExists(‘TAppBuilder’, »);

end;

Другой вариант для Delphi 1.0, работает только в EXE файлах (не в DLL).

function InIDE: Boolean;

begin

Result := Bool(PrefixSeg) and Bool(PWordArray(MemL[DSeg:36])^[8]));

;end

6. Что нужно предусмотреть при разработке приложения, которое будет работать при различном разрешении дисплея?

На ранней стадии создания приложения решите для себя хотите ли вы позволить форме масштабироваться. Преимущество немасштабируемой формы в том, что ничего не меняется во время выполнения. В этом же заключается и недостаток (ваша форма может бать слишком маленькой или слишком большой в некоторых случаях).

1. Если вы не собираетесь делать форму масштабируемой, установите свойство Scaled=False и дальше не читайте.

2. В противном случае Scaled=True .

1. Установите AutoScroll=False . AutoScroll = True означает ‘не менять размер окна формы при выполнении’ что не очень хорошо выглядит, когда содержимое формы размер меняет.

2. Установите шрифты в форме на самые распространенные TrueType шрифты, например Arial, Times New Roman, Courier. Если вдруг выбранного шрифта не окажется на пользовательском компьютере, то Windows выберет альтернативный шрифт из того же семейства. Этот шрифт может не совпадать по размерус исходным, что вызовет проблемы.

3. Установите св-во Position в любое значение, отличное от poDesigned . poDesigned оставляет форму там, где она была во время дизайна, и, например, при разрешении 1280Г—1024 форма может оказаться в левом верхнем углу и совершенно за экраном при 640Г—480.

4. Оставляйте по крайней мере 4 точки между компонентами, чтобы при смене положения границы на одну позицию компоненты не «наезжали» друг на друга.

5. Для однострочных меток TLabel с выравниванием alLeft или alRight установите AutoSize=True . Иначе AutoSize=False . Убедитесь, что достаточно пустого места у TLabel для изменения ширины фонта — 25% пустого места многовато, зато безопасно. При AutoSize=False Убедитесь, что ширина метки правильная, при AutoSize=True убедитесь, что есть свободное место для роста метки.

7. Для многострочных меток (word-wrapped labels), оставьте хотя бы одну пустую строку снизу.

8. Будьте осторожны при открытии проекта в среде Delphi при разных разрешениях. Свойство PixelsPerInch меняется при открытии формы. Лучше тестировать приложения при разных разрешениях, запуская готовый скомпилированный проект, а редактировать его при одном разрешении. Иначе это вызовет проблемы с размерами. Не изменяйте свойство PixelsPerInch самостоятельно!

9. В общем, нет необходимости тестировать приложение для каждого разрешения в отдельности, но стоит проверить его на 640×480 с маленькими и большими шрифтами и на более высоком разрешении перед продажей.

10. Уделите пристальное внимание принципиально однострочным компонентам типа TDBLookupCombo . Многострочные компоненты всегда показывают только целые строки, а TEdit покажет урезанную снизу строку. Каждый компонент лучше сделать на несколько точек больше. Даже при выполнении перечисленных инструкций, у вас могут возникнуть проблемы при переходе, например от Large fonts к Small fonts в Windows 95 при одном и том же разрешении. Бороться с этим помогают специально для этого разработанные компоненты. Если же вы решите самостоятельно изменять размеры компонентов, лежащих на форме, то вам могут помочь методы TCanvas.TextWidth и TCanvas.TextHeight .

7. Конвертация ICO в BMP.

Я создают toolbar, у меня есть иконки, но нет картинок в виде bitmap. Помогите!

Для преобразования файлов из одного формата в другой лучше всего иметь что-нибудь вроде HiJaak, который может преобразовывать форматы напрямую. Однако, будем считать, что у вас нет ничего, кроме Windows и Delphi. Следующая процедура может использоваться чтобы преобразовывать иконку в формат Windows Bitmap:

1. Покажите на экране иконку. Не имеет значения, как вы это сделаете.

2. Нажмите Alt-PrintScreen, чтобы скопировать текущее окно в буфер Clipboard.

3. Загрузите Paintbrush и сделайте Edit/Paste.

4. Выберите нужный кусок изображения и сделайте Edit/Copy. Перейдите к пункту Options/Image Attributes и установите размер области 32×32 точки.

5. Снова сделайте Edit/Paste.

6. Сохраните результат как BMP файл.

Лучше всего для редактирования и создания ресурсов (икон, картинок и т.п.) подходит Resource Workshop. Он включен в состав пакетов Borland Pascal 7.0 или Borland C++ 4.5, а также интегрирован в Borland C++ 5.0.

В Delphi 1.0 есть специальный файл (X:\DELPHI\BIN\WORKOPT.DOS) который необходимо поместить в каталог, где находится Workshop — в этом случае последний будет «понимать» ресурсы, создаваемые Delphi 1.0 (например *.DCR).

8. Когда используется свойство Glyph, как узнать, какой цвет прозрачный?

Delphi всегда принимает, что цвет пикселя в левом нижнем углу картинки является фоновым цветом и должен отображаться на экране как прозрачный. Это нигде не документировано, но если у вас есть исходники VCL, вы можете посмотреть код в BUTTONS.PAS .

9. Как отобразить bitmap в 256 цветах?

Как подгрузить 256 цветный bitmap из ресурса и отобразить его в нормальной палитре?

Обычно это делается следующим образом. Код Вадима Пузанова (Красноярск).

Image1.Bitmap.Handle := LoadBitmap(hInstance, ‘BMP_NAME’);

LoadBitmap загружает только картинку, без палитры. Если палитра у картинки отличается от системной, то ее надо устанавливать «вручную». Могут возникнуть проблемы, если на одной форме расположены две картинки с разными палитрами.

procedure XLoadBitmap(Instance: THandle; BitmapName: PChar; var HB: HBitmap; var HP: Palette);

var

OldPalette, Palette: HPalette;

begin

if ResIDHandle <> 0 then

begin

ResDataHandle := LoadResource(Instance, ResIDHandle);

if ResDataHandle <> 0 then

begin

if BI <> nil then

begin

if BI^.bmiHeader.biBitCount = 8 then

begin

GetMem(Pal, SizeOf(TLogPalette) + 256*SizeOf(TPaletteEntry));

for I := 0 to 255 do with Pal^.palPalEntry[I] do

begin

end;

FreeMem(Pal, SizeOf(TLogPalette) + 256 * SizeOf(TPaletteEntry));

DC := CreateDC(‘Display’, nil, nil, nil);

OldPalette := SelectPalette(DC, Palette, False);

BitMap:= CreateDIBitmap(DC, BI^.bmiHeader, CBM_INIT,

@PByteArray(BI)^[SizeOf(TBitMapInfo) + SizeOf(TRGBQuad) * 256 — 4], BI^, DIB_RGB_COLORS);

SelectPalette(DC, OldPalette, False);

end else

begin

BitMap := LoadBitmap(Instance, BitmapName);

end;

end;

end;

end;

end;

procedure TForm1.FormCreate(Sender: TObject);

var

begin

XLoadBitmap(hInstance, ‘PHOTO’, HB, HP);

end;

10. Если я хочу рассылать EXE файл, созданный в Delphi, какие еще файлы нужно посылать с ним?

Hикакие. Все компилируется в .EXE файл. Конечно, если вы разработали другие файлы (HLP, данные и т.д. ), или если вы используете VBX/OCX файлы, тогда вы должны распространять и их заодно. Если вы используете файлы VBX, то в поставку нужно также включать BIVBX11.DLL.

Если приложение использует функции BDE, вы также должны включать Borland DataBase Engine.

Полезные хитрости

1. Может ли редактор текстов в Delphi вырезать и вставлять прямоугольные фрагменты текста?

Конечно, может: Нажмите кроме Shift еще и Alt и режьте на здоровье. Alt можно сразу отпустить. Чтобы вернуться в старый режим, нужно выделить что-либо мышкой.

2. Редактирование файлов SQL в Delphi IDE.

Если вы в Delphi 2.0 IDE редактируете файл с расширением SQL, то, хотя это нигде не документировано, происходит автоматический Syntax Highlighting. Наибольший недостаток — не отслеживается конец комментария ‘*/’.

В Delphi 3.0 комментарии отрабатываются нормально.

3. Встроенный отладчик/дизассемблер.

Если вы создадите в ключе

HKEY_CURRENT_USER\Software\Borland\Delphi\2.0\Debugging

строковое значение EnableCPU = «1» , то после перезапуска среды у вас появится пункт меню View|CPU, которые вызывает появление простейшего отладчика/дизассемблера.

Для Delphi 3.0 справедливо тоже самое (… \Delphi\3.0\Debugging , естественно), причем отладчик там по возможностям сравним с Turbo Debugger.

Вопросы по Delphi 1.0
Вопросы общего характера

1. Какие существуют варианты поставки Delphi 1.0?

Версия Delphi 1.0 имеет два варианта: Delphi Desktop и Delphi Client/Server.

Версия Delphi 1.0 Desktop включает:

• Среду разработки Delphi IDE

• Механизм Borland Database Engine доступа к локальным данным Paradox и dBase, а также через ODBC

• 16-разрядный Local Interbase

Версия Delphi 1.0 Client/Server включает в себя все, что имеется в Delphi Desktop плюс:

• SQL-Links 2.5, которые включают родные драйверы для Oracle, Sybase (MS SQL), Informix, и InterBase, и включают полные неограниченные права распространения к этим драйверам (что стоит $995 если это куплено отдельно);

• Local InterBase Deployment Kit , $495 [2] ;

• Средства поддержки групповой разработки — не доступно отдельно;

• Visual Query Builder, который, как говорят, немного лучше, чем MSQuery, который входит в Microsoft Excel , Access , и т.д.). VQB также недоступен отдельно;

• Исходные тексты библиотеки визуальных компонент, которые доступны отдельно за $100.

• Дополнительно 2 тома документации.

На данный момент версия Delphi 1.0 фирмой Borland отдельно не поставляется и имеется только в составе старших версий продукта.

2. Какие форматы скомпилированных модулей можно получить в Delphi 1.0?

Delphi может создавать EXE- и DLL-файлы для Windows 3.1. Естественно, Вы может также создавать VBX, но для этого нужно знать соглашения по написанию DLL в формате VBX. Имеется информация о написании VBX для Borland Pascal for Windows, которая с небольшими изменениями подходит и для Delphi.

Delphi не создает EXE-файлы для DOS.

3. Есть ли проблемы в Delphi с русским языком?

Что касается визуальных компонент, то все они, включая меню, допускают надписи (Caption) и ввод киррилицей; «горячие клавиши» тоже могут быть русские, например комбинация Alt-Ф для пункта меню &Файл (конечно, должен быть включен драйвер русской клавиатуры). Для работы с таблицами нужно в утилите конфигурации BDE установить:

1. В разделе драйверы для всех типов баз данных установить соответствующий драйвер языка (например Pdox ANSI Cyrillic).

2. Если таблица (в частности, в формате Paradox) уже была создана с использованием другого драйвера языка, то ее можно перенастроить в DataBase Desktop на нужный драйвер.

3. Для того, чтобы Database Desktop нормально ‘видел’ русские буквы, его настройки тоже необходимо немного подкорректировать.

Русские буквы в среде:

Поскольку используются разные версии Windows (Eng, Rus, Win-OS2, Win95, WinNT), способы могут быть как разными, так и общими (Windows есть Windows).

Сначала опишем действия, необходимые для русификации Windows:

1. Если вы собираетесь работать в OS/2, то желательно иметь английскую версию Windows 3.1 или OS/2 с Win-OS2 (в последнем случае вы не сможете запускать Windows без OS/2). Windows for WorkGroups здесь не подойдет, т.к. их сетевые функции под OS/2 работать не будут — для этого есть другие средства.

2. Hесмотря на то, что вы собираетесь работать с англоязычной версией Windows найдите русские Windows и «вытащите» оттуда все шрифты *.FON, *.FOT, *.TTF.

3. Каким-нибудь редактором шрифтов (напр FontoGrapher) скопируйте русские буквы с адреса 100 на адрес С0 — в этом случае один шрифт можно использовать и в английских и в русских Windows.

4. Установите какой-либо русификатор — неплохо ведут себя CyrWin и ParaWin, причем для Win-OS2 предпочтительнее ParaWin. Устанавливать можно только русификатор без шрифтов, т.к. шрифты пойдут от русских Windows. Если вы не выполнили пункт 3, то TTF от русских Windows вам не помогут, и нужно будет ставить шрифты из комплекта русификатора.

5. Замените все шрифты *.FON на шрифты из русских Windows.

6. Подключите русские шрифты (Arial Cyr, Courier New Cyr, Times New Cyr).

7. Добавьте в WIN.INI в секцию [FontSubstitutes] следующую строку: Arial=Arial Cyr или вместо Arial Cyr укажите русский шрифт сходный по начертанию (напр. для CyrWin это NTHelvetica/Cyrillic).

Также на всякий случай можно добавить следующие подстановки:

Helvetica=Arial Cyr (или NTHelvetica/Cyrillic)

Одновременно закомментируйте строки, где упоминается английский шрифт Arial.

В русских Windows можно совершенно безболезненно удалить (при помощи Control Panel/Fonts) шрифты, имеющие в названии окончание CE (напр. Arial CE) — это сербо-хорватские шрифты, которые вам вряд-ли когда понадобятся (русских букв там нет).

Далее, возможные варианты работы с русскими буквами в редакторе Delphi.

Нельзя в Windows выставлять TrueType fonts only — редактор использует только FixedFonts, в результате Delphi просто не будет работать.

1. Комментарии и строки могут быть введены только в кодировке 1251 — причина, естественно в том, что русификатор позволит вводить русские буквы только в этой кодировке. Тексты, написанные в DOS (кодировка 866), будут отображаться как «мусор» на экране — редактор HЕ преобразует символы 866в†’1251. Однако если для редактора установить шрифт Terminal — тексты в 866 будут отображаться нормально, а ввести символы не удастся (опять же по причине ввода символов только в кодировке 1251). Уже готовый текст в 866 кодировке лучше преобразовать в 1251 с помощью одной из программ конвертации.

2. Некоторые программные продукты при установке меняют фиксированные шрифты или даже удаляют их. Будьте внимательны при и после установки других программных продуктов, особенно редакторов текстов (WinWord, AmiPro…). Держите под рукой архив с русскими шрифтами *.FON, чтобы была возможность восстановить эти шрифты.

3. Поэкспериментируйте со шрифтами редактора — разные шрифты имеют разное начертание, и разную скорость перерисовки. Выберите нужное для себя — либо скорость перерисовки, либо удобное начертание. Для локального InterBase нормальной русской кодировкой является Win1251 — имена доступных кодировок можно найти открыв любую DB InterBase (в т.ч. и локальную) и заглянув в системную таблицу RDB$CHARACTER_SETS.

4. Какую модель данных использует Delphi?

Delphi использует смешанную (mixed) модель памяти, но она очень похожа на модель large в C.С++:

• Методы дальние (far)

• Процедуры, описанные в интерфейсной части, дальние

• Процедуры, используемые только в implementation по умолчанию ближние

• Данные в Heap и все указатели вообще (включая экземпляры объектов) дальние

• Глобальные переменные ближние (в сегменте DS)

• Параметры процедур и локальные переменные ближние (в стеке)

• Процедуры, объявленные far или export дальние

• VMT дальние для новой модели классов и ближние для старой

Эта схема используется в Borland Pascal долгое время.

5. Можно ли использовать в приложении ресурсы, созданные в BPW 7.0?

Все ресурсы, созданные в других приложениях, можно подключить и использовать в Delphi с помощью директивы компилятора и процедур Windows API. Кроме того, меню из файла ресурсов и графические файлы *.BMP, *.ICO и *.WMF можно импортировать в приложение Delphi на этапе разработки. В настоящее время компанией Borland поставляется программный продукт RAD Pack for Delphi, где в состав поставки входит эксперт, позволяющий преобразовывать ресурсы из BP7.0 в формы Delphi.

6. Возможно ли написать Screen Saver для Windows в Delphi?

Для создания программы, работающей как Screen Saver:

1. В проектном файле (*.dpr) напишите после uses; данная директива вставляет указанный текст (SCRNSAVE ) в раздел описания модуля — в данном случае программы. Это главное, что необходимо для того, чтобы Windows распознал программу как Screen Saver.

2. Hа главной форме выключите Border ( BorderStyle=bsNone ) и иконки. Установите свойства Left и Top =0 , WindowState=wsMaximize .

3. В обработчике события OnCreate , установите Application.OnMessage на процедуру деактивации Screen Saver. Установите Application.OnIdle на любую процедуру для рисования на экране.

4. В обработчике OnCreate должна проверяться командная строка на наличие ключей /c и /s. Эти параметры определяют, нужно ли запускать сам Screen Saver или его конфигурацию (/c — конфигурация).

5. Скомпилируйте программу и переименуйте из .exe в .scr ; поместите файл в каталог Windows — Screen Saver должен появиться на панели управления (Control Panel).

7. Как Delphi обрабатывает функции обратного вызова Windows (сallback)?

Точно так же как C: вы можете получить указатель ( far pointer ) на вашу callback процедуру (не забыть при этом обьявить ее с директивой компилятора , либо спецификатором far) и передать этот указатель в Windows. Это все.

Delphi и Visual Basic

1. Есть ли в Delphi эквивалент массива элементов управления из Visual Basic?

Hет. Компоненты Delphi не имеют свойства Index, подобное VB. Однако, имеются три основные причины, почему вы хотите использовать их в VB, и для каждой из них есть решение в Delphi.

Причина 1. Вы хотите использовать один обработчик события для разных компонент на форме.

Это просто. Все, что вы должны сделать — это выбрать тот же самый обработчик для каждой визуальной компоненты. Это лучше, чем в случае с массивом компонент, потому что вы можете одну и ту же процедуру-обработчик события присвоить различным типам компонент; например, кнопка на форме и пункт меню могут вызывать ту же самую функцию для обработки события OnClick .

Причина 2. Вы хотите динамически создавать и уничтожать визуальные компоненты во время выполнения программы.

Это также довольно просто в Delphi. Предположим, что на форме есть кнопка, и, каждый раз когда она нажимается, вы хотите создавать другую кнопку. Следующий пример показывается, как это делать:

procedure TForm1.Button1Click(Sender: TObject);

var

begin

end;

Причина 3. Вам действительно требуется доступ к компонентам по номеру.

Предположим, что вы решили написать игру вроде Реверси в Delphi. Вам нужно разместить 100 объектов TShape на форме, в виде квадрата 10Г—10. Конечно, размещать каждый элемент вручную на экране — задача трудоемкая и неинтересная, при этом, в декларации формы появляется 100 строк кода, которые, в общем-то, не нужны. Вместо этого можно завести массив вроде

Board: array [1..10, 1..10] of TShape; Далее в программе нужно создать каждый из этих объекты, вызвав TShape.Create(FormXX) ; указать вручную начальные установки для них. Кроме того, в свойстве Parent каждого объекта из массива нужно указать ту панель ( TPanel ) или форму, на которой они располагаются. Это нужно для правильной перерисовки объектов.

Если же вы не используете такие большие массивы, т.е., например хотите одинаково реагировать на нажатие 3-5 кнопок с незначительным различием для каждой из них, то можно использовать свойство Tag.

2. Как использовать DLL, написанные в Delphi, например в Visual Basic?

Допустим, вы написали на Delphi DLL и в нем объявили функцию

function DataFileType(lpStr: PChar): Integer; export;

begin

end;

в Visual Basic Вы должны подключить ее как:

Declare Function DataFileType Lib «File.dll» (ByVal lpStr As String) As Integer

а в программе на VB использовать следующим образом:

sVendorName = Mid$(lpVar, 1, nSize)

3. Конвертация TBasicString (VBX) в string.

Я использую VBX и испытываю проблемы с конвертацией TBasicString в string. Как это сделать?

Существует две функции —

• BStrPCopy — принимает Basic string и конвертирует в string

SetBStr — принимает string и возвращает Basic string Действительно, ссылок на эти функции нет в документации, но имена этих функций можно «обнаружить» в VBXCTRL.DCU.

Базы данных

1. Ошибка инициализации BDE ($2C09).

Когда я пытаюсь запустить приложение из Delphi, то получаю ошибку EDatabaseError и сообщение ‘An error occurred while attempting to initialize the Borland Database Engine (Error $2C09)’

Добавьте SHARE.EXE в AUTOEXEC.BAT или добавьте DEVICE=VSHARE.386 в раздел [386Enh] файла SYSTEM.INI и перезагрузитесь.

2. Ошибка при загрузке языкового драйвера.

У меня есть Quattro Pro 6.0 и IDAPI в сети. После установки Delphi и нового IDAPI поверх сетевого IDAPI при запуске Quattro Pro с другой машины я получаю ошибку ‘Could not load Language Driver’ .

Добавьте раздел [Borland Language Drivers] в WIN.INI файл для указания каталога языкового драйвера. Пример:

[Borland Language Drivers]

LDPATH=C:\IDAPI\LANGDRV

3. Что значит ошибка IDAPI $2C08?

‘Cannot load IDAPI01.DLL’ . Убедитесь, что в файле WIN.INI правильно прописаны пути:

[IDAPI]

DLLPATH=C:\IDAPI

CONFIGFILE01=C:\IDAPI\IDAPI.CFG

4. Отличается ли локальный InterBase, встроенный в Delphi 1.0, от InterBase для других платформ, в частности, от InterBase для Windows NT?

16-Разрядный Local InterBase не поддерживает:

• функции, определяемые пользователем.

• сигнализатор событий (event alerters)

• запись через журнал (Write Ahead Log (WAL)

• тип данных массив (Array Datatype)

• ‘отключение’ и ‘включение’ базы данных (database shutdown or restart)

• ведение теневой базы данных (database shadowing)

Все остальные функции поддерживаются, но структура хранения базы на диске не совпадает.

Можно ли поставить локальный InterBase на файл-сервере и, таким образом, получить доступ к нему из многих приложений?

Работать не будет. И не пытайтесь. Для этой цели вам нужен нормальный многопользовательский InterBase.

5. Что насчет VBX-компонентов для работы с данными?

Delphi поддерживает только VBX 1.0. Это значит что VBX для работы с данными ‘не работает’ с Delphi. В общем случае, все, что работает с Microsoft Visual C++, должно работать в Delphi. Кроме того, некоторые VBX достаточно хорошо написаны, так что их можно использовать в Delphi и без обращения к возможностям работы с данными.

Object Pascal и Windows API

1. Можно ли использовать OWL в Delphi?

Можно, если уже существуют свои разработки с использованием OWL. Однако следует обратить внимание, не используются ли слова class, try, except и ряда других — в Delphi они являются зарезервированными. Если же опыта использования OWL не было, то вряд ли имеет смысл использование этой библиотеки — в Delphi существуют свои, более удобные средства для работы с Windows.

Компиляция приложений, написанных на BP7 с использованием OWL.

Компилятор Delphi способен компилировать приложения, написанные на OWL Borland Pascal 7.0. Для компиляции таких приложений в среде Delphi необходимо сделать следующее:

1. Откройте главный файл приложения пунктом меню File|Open Project

2. Добавьте в список используемых модулей uses модуль Messages в тех файлах, где использовался модуль WinTypes . Модуль Messages должен быть указан ранее модуля OWindows , ODialogs или любого другого OWL-модуля.

3. При помощи пункта меню Options|Project Dialog добавьте путь x:\DELPHI\SOURCE\RTL70 к пути поиска модулей данного проекта. Этот каталог должен содержать файлы OWL, измененные для компиляции в Delphi.

Если Вы забыли указать использование модуля Messages , то Вы при компиляции получите сообщение ‘Unknown identifier’ . Указание Messages после модуля OWindows вызовет сообщение ‘Header does not match previous definition’ .

Идентификатор Result теперь используется особым образом внутри тела функций, поэтому их внимательно посмотрите, где этот идентификатор может встречаться. Недопустимо использование перекрывающихся диапазонов в операторе case.

Изменилась реализация StrDispose . Если Вы распределяете память для строки при помощи GetMem , то освобождение этой области памяти при помощи StrDispose вызовет ошибку выполнения ‘Runtime error 203’ . Для распределения памяти для строк следует использовать функции StrAlloc или StrNew . Объекты OWL не ориентированы на обработку исключительных ситуаций, т.е. при возникновении таких ситуаций не происходит отката инициализации объектов. Мы не рекомендуем использование исключения в приложениях с OWL.

Компилятор теперь производит поиск модулей, ресурсов и OBJ файлов по пути, указываемому в каталогах OPTIONS|Project. Путь ‘EXE and TPU directory’ больше не поддерживается. EXE-файлы могут создаваться в ‘Output directory’, а файлы DCU всегда создаются в том каталоге, где находятся соответствующие файлы PAS. Новые модули WinTypes и Messages могут быть скомпилированы BP7. Для этого не требуется включения дополнительных директив $IFDEF (зато там есть $IFDEF WIN32;).

2. Как можно зааллокировать блоки памяти больше, чем 64 Кбайт?

Используйте GlobalAlloc и GlobalLock из модуля WinProcs .

3. GPF в ToolHelp.DLL в Win-OS/2 2.1.

Поставьте FixPack, или сделайте Upgrade на OS/2 Warp 3 FullPack.

4. Как получить из Clipboard текст большого размера?

Да, стандартный метод TClipboard.AsText ограничивает текст размером строки — 255 байт. Для получения текста длиной более 255 байт можно использовать, например следующую процедуру:

procedure GetLargeText: PChar

var

begin

try

Result := nil;

if Buffer <> nil then

begin

с ними как с обычной Null-terminated строкой >

end;

finally

end;

end;

5. Проблемы Delphi с WinG.

Я слышал, что у Delphi проблемы с WinG, однако кто-то их решил?

Да, Майк Скотт (Mike Scott, 100140.2420@compuserve.com) даже написал коммерческий вариант VCL-компонентов, использующих WinG для Delphi:

WinG Sprite Kit.

Набор компонентов, осуществляющих доступ к WinG из Delphi. Включает компоненты TWinGCanvas для рисования TWinGDC и TWinGBitmap , TWinGSurface , которые можно поместить на форму и спрайтовый компонент, который можно помещать на них.

$99 EEP

Существует статья по использованию WinG в Borland Pascal — #5 Pascal Magazine. Обзор VCL WinG появится в новом Delphi Magazine. Отошлите письмо с вашим почтовым адресом на 70630.717@compuserve.com для получения бесплатной копии этих журналов (наверняка из России это не сработает.

Компоненты и VCL

1. Каковы ограничения на стандартные компоненты Delphi?

Все компоненты, использующие TList для сохранения информации, имеют верхний предел 16368 единиц. Hапример, TTabControl может содержать до 16368 закладок и Delphi Component Palette может содержать до 16368 страниц.

Многие из стандартных компонент Delphi являются надстройкой над стандартными управляющими элементами Windows. Windows 3.1 налагает свои собственные ограничения на эти компоненты. Hапример: TComboBox или TListbox могут содержать до 5440 единиц, а TMemo или TEdit (и соответствующие компоненты) — до 32k текста.

Ресурсы Windows 3.1 ограничивают компонент TNotebook 570 страницами. (Трудно получить более 500 хендлов /handles/ окон в любом приложении Windows). Превышение этих границ вызывает ошибку или послужит причиной странного поведения Windows.

2. Предел буфера редактирования в 32K для TMemo.

Почему в документации написано, что TMemo может редактировать тексты до 256К, а на деле получается не более 32К?

В документации ошибка. 32К — это ограничение Windows. В Windows все стандартные редакторы используют общий буфер в 32К, компонент TMemo использует другую технику, позволяющую каждому TMemo иметь буфер в 32К. В Windows 95 эта проблема решена.

3. Почему компонент TGauge так медленно работает (медленнее, чем VBX BGauge)?

Компонент TGauge — просто пример, и ничего более. В нем отсутствует даже намек на оптимизацию перерисовок. Если вы посмотрите на код процедуры SetProgress , то увидите

Это означает, что как только положение изменилось, весь компонент будет перерисован. Тем не менее, есть пути для того, чтобы сделать компонент более быстрым:

1. Не присваивать Progress каждый раз (напр. 3000 раз), т.е. делать обновление менее часто

2. Проверять, действительно ли позиция на экране изменится. Например, в SetProgress сделать следующее:

if Abs(FCurValue-FLastDrawn) >= FDisplayDelta then

begin

end;

где FDisplayDelta что-то вроде (FMaxValue-FMinValue) div Width (идеально было-бы учитывать реальный размер экрана.

3. Обновлять только часть индикатора, которая действительно меняется. Процедура Refresh стирает и перерисовывает весь компонент. Можно сделать вызов InvalidateRect (Windows API) и вызвать Update .

4. Если вы сделали как в пункте 3, вы дополнительно можете оптимизировать процедуру перерисовки, чтобы не перерисовывать неизменяющийся участок.

Разное

1. Распространение приложений Delphi, использующих Local InterBase.

Для распространения таких приложений, в соответствии с лицензионным соглашением вы должны перенести следующие файлы:

Главные модули (X:\IBLOCAL\BIN)

DSQL.DLL

FILEIO.DLL

GDS.DLL

GBAK.DLL

INTL.DLL

IUTLS.DLL

JRD.DLL

REMOTE.DLL

STACK.DLL

Сообщения, лицензионные файлы и т.п. (X:\IBLOCAL)

INTERBASE.MSG

ISC4.GDB

ISC_LIC.DAT

Утилиты (если они необходимы)

WISQL.EXE

WISQL.HLP

SQLREF.HLP

IBMGR.EXE

SVRMGR.HLP

COMDIAG.EXE

COMDIAG.INI

COMDIAG.HLP

BLINT04.HLP

После копирования этих файлов необходимо проделать следующие операции:

1. Добавить в AUTOEXEC.BAT в команду PATH X:\IBLOCAL\BIN

2. Там же сделать SET INTERBASE=X:\IBLOCAL

3. В WIN.INI создать секцию

[Interbase]

RootDirectory=X:\IBLOCAL

Естественно, если путь к локальному InterBase отличается от IBLOCAL, то вы должны изменить его на нужный.

Для распространения BDE вы должны передать пользователю две инсталляционные дискеты с редистрибутивным BDE (на CD-ROM каталог REDIST\BDE).

Для установки BDE вручную скопируйте содержимое каталога IDAPI (с подкаталогом языковых драйверов), и создайте в WIN.INI следующие секции:

[IDAPI]

DLLPATH=X:\IDAPI

CONFIGFILE01=X:\IDAPI\IDAPI.CFG

[Borland Language Drivers]

LDPath=X:\IDAPI\LANGDRV

После этого ненужные файлы (неиспользуемых языковых драйверов, поддержку ODBC…) можно удалить с диска, или временно перенести, убедиться в работоспособности приложения, и удалить.

Возникает неясность — как добавить драйвер INTRBASE в IDAPI.CFG? Получается, что его необходимо переносить , и затем настраивать псевдонимы на новые каталоги. Иначе драйвер локального InterBase не попадет в IDAPI.CFG.ы

Вопросы по Delphi 2.0
Что нового в Delphi 2.0 по сравнения с Delphi 1.0?

Выпущенная в феврале 1995 года версия Delphi 1.0 стала первым инструментом для Windows, комбинирующим оптимизирующий компилятор, механизмы визуальной разработки Two-Way-Tools и масштабируемую архитектуру обработки баз данных. Сегодня сотни компаний по всему миру заявляют о многократной окупаемости их инвестиций в информационые системы, построенные с применением Delphi в качестве основного инструмента. Borland Delphi 2.0 полностью поддерживает все особенности новых операционных систем Windows 95 и Windows NT. Новый 32-разрядный оптимизирующий компилятор позволяет увеличить производительность разрабатываемых систем на 300-400 процентов при том, что генерируемый в результате код выполняется в 15-50 раз быстрее, чем в системах на базе P-код интерпретаторов. Новые объектно-ориентированные средства, предназначенные для разработки в архитектуре клиент-сервер, включают централизованное хранилище объектов — Object Repository и механизм визуального наследования форм — Visual Form Inheritance. «Всего за один год Delphi был принят на вооружение заказчиками в силу уникальных возможностей этого продукта, сочетающего высокопроизводительную технологию компиляции с единой средой визуального программирования», — говорит вице-президент Borland по маркетингу (Product Marketing and Management) Ричард Горман (Richard Gorman). «С выпуском новых версий мы расширяем рынок Delphi на всем спектре desktop, сетевых и клиент-серверных инструментов».

Как и в любой новой версии продукта, по сравнению с предыдущей, появилось много изменений.


1. Изменения в компиляторе и RTL

1. Новые типы данных:

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

• вариантные структуры для работы с OLE Automation

• тип Currency — 8-байтное число с плавающей точкой

2. Переменные типа Integer и Cardinal теперь 32-битные (4 байта). Для работы с двухбайтовыми целыми числами необходимо использовать типы SmallInt и Word.

3. Генерация 32-битного кода с оптимизацией циклов, передачей параметров через регистры, и т.п.

2. Новые компоненты:

1. набор компонент, свойственных интерфейсу Windows95

2. компоненты OLE Automation

3. новый DBGrid, позволяющий определять атрибуты столбцов.

3. Изменения в работе с БД

1. локальная фильтрация записей для TTable и TQuery

2. поддержка lookup у TField

3. SQL-монитор, отслеживающий выполнение SQL-операций

4. Модуль Данных (DataModule), для централизованного хранения и использования компонент доступа к базам данных

4. Изменения в среде разработчика (IDE)

1. хранилище объектов (Object Repository) — для хранения проектов, форм, модулей данных и др.

2. визуальное наследование форм

3. визуальное связывание форм

4. Database Explorer

5. Редактор полей таблиц в стиле drag-n-drop

5. Изменения в Borland Database Engine

1. полностью 32-разрядная библиотека доступа к данным

2. новое ядро SQL-запросов

3. расширенные возможности SQL Links

4. транзакции и вложенные запросы для локальных форматов данных (dBase и Paradox)

Вопросы общего характера

1. Какие существуют варианты поставки Delphi 2.0?

Выпущенная 4 февраля 1996 года серия продуктов Delphi 2.0 включает три версии, каждая из которых разработана с учетом различного уровня разработчиков и решаемых ими задач:

• Desktop — для создания автономных программ или для начинающих программистов

• Developer — для профессиональных разработчиков, ориентированных на сетевую архитектуру

• Client/Server Suite — для создания систем в архитектуре клиент-сервер Все версии Delphi 2.0 естественно сочетают высокопроизводительный 32-разрядный компилятор, масштабируемые инструменты доступа к базам данных и расширяемую библиотеку «drag-and-drop» компонент в составе объектно-ориентированной среды визуальной разработки.

Состав версий.

Все версии Delphi 2.0 обладают открытой архитектурой, полностью поддерживающей такие технологии, как OLE server, Microsoft OLE Controls (OCX), ODBC, а также Microsoft’s Remote Automation и ожидаемую Network OLE (ActiveX). Все версии Delphi 2.0 также предоставляют разработчикам поддержку новых особенностей и интерфейсов прикладного программирования (API) Windows 95 и Windows NT — многопоточности (threads), Unicode, MAPI и др. Для облегчения перехода разработчиков из 16-разрядного в 32-разрядное операционное окружение каждая версия Delphi 2.0 включает 16-разрядную версию Delphi 1.02 for Windows.

Delphi Desktop 2.0

Delphi Desktop 2.0 наиболее всего соответствует Delphi 1.0 for Windows и предназначен для начинающих Windows-прогрммистов и индивидуальных разработчиков. Некоторые особенности Delphi Desktop 2.0:

• оптимизирующий 32-разрядный компилятор, увеличивающий производительность существующих приложений на 300-400% (относительно Delphi 1.0).

• среда разработки IDE с интерфейсом в стиле Windows95

• расширяемая объектная архитектура компонент

• визуальное наследование форм

• визуальное связывание форм и компонентов, размещенных на различных формах

• 32-разрядный Borland Database Engine для доступа к БД формата dBase и Paradox, обеспечивает ряд расширений языка запросов SQL, транзакции для локальных форматов данных

• Data Modules (модули данных), позволяющие использовать одни и те же таблицы, запросы и др. источники данных и компоненты из многих форм приложения

• Database Explorer — инструмент разработки и модификации структур и содержимого баз данных в стиле Windows Explorer.

• фильтры для таблиц и запросов, развитые Lookup-списки.

• расширенный Grid-компонент с настраиваемыми атрибутами столбцов и «выпадающими» списками

• компонент Quick Report, позволяющий легко создавать встроенные отчеты без использования ReportSmith.

• тип данных currency (деньги), увеличивающий точность финансовых вычислений

• длинные строки и структуры данных (до 2ГБ)

• 16-разрядная версия Delphi 1.02

• полная документация в 5-и томах (более 1100 страниц) включая полное описание языка.

Delphi Developer 2.0

Delphi Developer 2.0 ориентирован на поддержку профессиональных разработчиков многопользовательских (сетевых) приложений. Версия Developer по сравнению с Desktop имеет следующие расширения:

• хранилище объектов (Object Repository), поддерживающее создание и совместное использование форм, модулей данных и других объектов.

• масштабируемый словарь данных (Data Dictionary), содержащий расширенные атрибуты полей (столбцов), квлючая пределы величин, маски редактирования и отображения, параметры шрифтов и т.п.

• низкоуровневая поддержка Borland Database Engine, включая справочные файлы

• Multi-Object Grid для максимально гибкого прдставления информации в приложениях, работающих с базами данных

• расширенный набор примеров компонент и дополнительные OCX

• дополнительные эксперты, среди которых Installation/Deployment Expert для создания рсапространяемых приложений (дистрибутивов)

• расширенный Open Tools API — набор открытых интерфейсов для интеграции с внешними инструментами (CASE’s, Transaction Process Monitor’s и др.), с помощью которых разработчик может создавать и встраивать в среду (IDE) Delphi свои редакторы компонент и их свойств, эксперты и другие инструменты

• интерфейс к средствам групповой разработки (требует Intersolv PVCS 5.2 или выше)

• локальный однопользовательский сервер InterBase для разработки масштабируемых приложений на отдельном компьютере

• 32-разрядный генератор отчетов ReportSmith 3.0 с расширенными возможностями интеграции с Delphi-приложениями

• новая библиотека математических, статистических и бизнес-функций исходные тексты библиотеки компонент VCL32 (32-bit Visual Components Library)

• 8 томов документации и справочных руководств общим объеком свыше 3000 страниц

Delphi Client/Server Suite 2.0

Delphi Client/Server Suite 2.0 ориентирован на организации, разрабатывающие корпоративные системы, предназначенные для работы с данными, хранимыми на серверах БД Oracle, Sybase, InterBase, Informix, MS SQL Server, DB/2; сочетает высокопроизводительный клиентский инструментарий и широкий спектр средств работы с серверами БД. Версия Client/Server Suite по сравнению с Developer имеет следующие расширения:

• SQL Explorer в стиле Windows Explorer, ориентированный на обработку метаданных серверных БД (доменов, триггеров, представлений, хранимых процедур и т.п.)

• SQL Monitor, предназначенный для тестирования, отладки и настройки SQL-запросов для повышения качества и производительности их выполнения

• Cached Updates (буферизированное обновление) обеспечивает более эффективную обработку транзакций в клиент/серверном окружении.

• неограниченное использование высокопроизводительных драйверов SQL Links для доступа к серверным БД Oracle, Sybase, InterBase, Informix и SQL Server (лицензия на распространение SQL Links).

• SQL-сервер Borland InterBase 4.1 для Windows NT с лицензией на 2-х пользователей.

• ReportSmith 3.0 SQL Edition, предназначенный для построения отчетов при работе в клиент/серверном окружении.

• Визуальный конструктор запросов Visual Query Builder

• DataPump Expert — средство переноса/миграции данных для масштабирования приложений. Интегрированная в среду разработчика система контроля версий Intersolv PVCS.

• 12 томов документации и справочных руководств, общим объемом свыше 3500 страниц.

2. Какие форматы скомпилированных модулей можно получить в Delphi 2.0?

Delphi может создавать EXE- и DLL-файлы для Win 32. Естественно, Вы может также создавать OCX, но для этого нужно знать соглашения по написанию DLL в формате OCX.

Delphi может также создавать 32-разрядные консольные приложения для работы под Win 32.

3. Какую модель данных использует Delphi?

Delphi 2.0 использует так называемую плавающую модель памяти (FLOAT), которая принята в Win 32. Отличительной особенностью данной модели памяти является линейная 32-разрядная адресация всего адресного пространства, которое может иметь соответственно размер до 4 Гбайт. При этом все указатели, адреса процедур, указатели на VMT также адресуются через 32-разрядные регистры.

4. Delphi 2.0 может создавать 16-разрядные приложения?

Delphi 2.0 — это полностью 32-разрядный продукт, который создает приложения, функционирующие под Windows 95 и Windows NT. Но в комплект поставки Delphi 2.0 также входит и текущая 16-разрядная версия Delphi (версия 1.0), предназначенная для создания приложения, работающих под Windows 3.1 (а также Windows 3.11 и др.). Те, разработчики, которые не используют новые специфичные характеристики 32-разрядных операционных систем погут перекомпилировать свои приложения с использованием 16-разрядной версии Delphi.

5. Насколько трудно перенести существующее приложение Delphi в Delphi 2.0?

В большинстве случаев разработчику достаточно просто перекомпилировать свое приложение с помощью нового 32-разрядного оптимизирующего компилятора и сразу же использовать преимущества 32-разрядного кода, что вызывает увеличение производительности до 300-400% под Windows 95 и Windows NT. Тем разработчикам, которые использовали низкоуровневый код, использующий 16-разрядную сегментную архитектуру Windows 3.1, больше не поддерживаемую Windows 95 придется внести соответствующие изменения в коде. Если приложение использует дополнительные компоненты и библиотеки третьих фирм, то следует обратиться к фирме-производителю для получения 32-разрядных версий этих компонентов и библиотек.

6. Каким образом разработчик может использовать новые характеристики Windows 95?

Delphi 2.0 включает в себя множество новых компонентов для поддержи новых специфичных характеристик Windows 95, таких как элементы оформления интерфейса пользователя (включая редактирование текстов в формате RTF), многостраничный диалог и прогресс-индикатор в стиле Windows 95, OLE controls (OCX) и др. Разработчику достаточно просто добавить эти компоненты в свои приложения из палитры компонентов, как и любой другой компонент Delphi. В большинстве случаев, Delphi 2.0 будет автоматически поддерживать новые возможности, например такие как длинные имена файлов, новые диалоги и стили и др. В дополнение ко всему, ввиду того, что Delphi 2.0 компилятор непосредственно в исполняемые коды процессора, разработчики сразу же получают доступ ко всему API Windows 95, включая мультитрединг, строки в формате Unicode, MAPI и др.

7. Delphi 2.0 сертифицировано как продукт под Windows 95?

Да. Delphi 2.0 удовлетворил всем требованиям для сертификации как продукт Windows 95. Кроме того, Delphi 2.0 облегчает разработчикам создание приложений, которые могут быть сертифицированы для использования под Windows 95.

8. Delphi 2.0 поддерживает Windows NT?

Да, Вы можете работать с Delphi 2.0 как под Windows 95, так и под Windows NT и, соответственно, создавать приложения, которые будут работать под обеими платформами. При этом имейте ввиду, что не все функции Win 32 API могут работать на обоих платформах, например, в Windows 95 не реализованы сервисы и др. системные функции — но это уже проблема не Borland, а Microsoft.

9. Delphi 2.0 поддерживает OLE controls (OCX) и OLE automation?

Да. Delphi 2.0 полностью поддерживает OCX и OLE automation. Разработчики могут инсталлировать OLE controls на соответствующие страницы палитры компонентов или использовать уже поставляемые с Delphi 2.0. Также, разработчик может использовать OLE automation для того, чтобы создавать приложения, которые управляют другими приложениями, такими как Microsoft Word, Excel, Lotus 1-2-3, Borland C++, Paradox и др. OLE automation в Delphi полностью совместима дальнейшем развитием OLE — Network OLE а также с технологией удаленной автоматизации (remote automation), включенной в VB4, используя все преимущества оптимизирующего компилятора.

10. Delphi 2.0 поддерживает in-process (DLL) или out-of-process (EXE) серверы в OLE automation?

Delphi 2.0 полностью поддерживает эти два типа локальных серверов OLE automation.

11. Delphi 2.0 поддерживает другие виды взаимодействия между приложениями?

Да. Delphi взаимодействует с некоторыми мониторами выпонения транзакций (transaction processing — TP), включая Novell Tuxedo, TransArc Encina, CICS и др. Как правило, эти продукты оформлены в виде DLL и могут вызываться непосредственно из приложения. Кроме того, Borland состоит в Object Management Group (OMG) и планирует в будущем обеспечить поддержку CORBA.

12. Delphi 2.0 поддерживает мультитрединг?

Да. Так как Delphi компилирует непосредственно в коды команд процессора, приложению написанному на Delphi доступны все возможности API Windows 95 и Windows NT. Библиотека Визуальных Комонентов (VCL) также включает объект TThread для создания надежных приложений.

13. Delphi 2.0 совместима с Network OLE?

Да. Так как Delphi 2.0 полностью поддерживает OLE automation как серверы, так и контроллеры, данный вариант OLE полностью совместима в будущем с Network OLE. Также Delphi полностью поддерживает технологию удаленной автоматизации, включенной в VB 4.0 со всеми дополнительными преимуществами оптимизирующего компилятора.

14. Существует ли upgrade Delphi 2.0?

Да. Borland предлагает специальные цены для тех заказчиков, которые являются легальными пользователями Delphi версии 1.0.

15. Насколько успешны продажи Delphi на сегодняшний день?

Продажи Delphi и Delphi Client/Server на данный момент даже превосходят прогнозы, сделанные фирмой Borland. Delphi играет значительную роль как в разработке отдельных, независимых приложений, так и в разработке приложений по технологии клиент-сервер. По результатам опросов и тестов Delphi присуждено множество наград, в т.ч.:

• BYTE Best Technology of Comdex 1994 for best development/system software

• PC Week Labs Analyst Choice Award

• PC Magazine Top Ten Selling Products

• PC Magazine Technical Excellence Award

• PC Magazine Product of the year for 1995

• Computer Daily News (Australia), Top Ten Selling Products

• PC Magazine (UK) Grey Matter Award for the number-one selling software product

• PC World (Spain) Product of the Year for programming languages

• PC/Computing Excellence Award

• DBMS Reader’s choice award

• Best of LAN Times

• Windows Tech Journal Star Tech award

• Ziff-Davis Cannes Software Excellence Award, Overall Technical Excellence

• Ziff-Davis Cannes Software Excellence Award, Languages and Tools

• Visual Basic Programmer’s Journal Editor’s Choice

16. Насколько полно Borland предлагает стратегические решения тем компаниям, которым требуется дополнительная помощь в разработке клиент-серверных приложений?

В первом квартале 1996, Borland представил новую программу Premier Partner VAR, где главный акцент делается на решения в рамках технологии клиент-сервер. Эта программа будет играть важную роль в дополнении комплекта Delphi Client/Server Suite средствами, предназначенными для основных вариантов разработок по технологии клиент-сервер.

17. В чем заключаются преимущества 32-разрядного компилятора в родной код микропроцессора?

Используя новый оптимизирующий компилятор в 32-разрядный код Delphi 2.0 генерирует приложения, превосходящие по своим качествам интерпретаторы p-кода, такие как Visual Basic и PowerBuilder. На данный момент приложения, произведенные с помощью Delphi 1.0 выполняются примерно в 10-20 раз быстрее интерпретаторов p-кода. Предполагается дополнительное увеличение этого показателея в 32-разрядной версии. Новый оптимизирующий 32-разрядный компилятор в Delphi 2.0 использует один и тот же генератор кода, что и Borland C++ и включает множество видов оптимизации, таких как оптимизация использования регистров, оценка общих частей выражений оптимизация использования переменных и генерация кода, оптимированного для выполнения на процессоре Pentium для получения более компактного и быстрого кода. Приложения перекомпилированные во второй версии меньше по размерам и работают быстрее, чем раньше. Ввиду нового кодогенератора появились возможности не только использовать, но и создавать OBJ-файлы для более легкого переноса кода между Delphi и C/C++. Кроме того, сейчас компилятор выдает более информационные сообщения об ошибках, равно как и предупреждения и советы о некорректном коде, неиспользованных или используемых до инициализации переменных и др.

18. Насколько быстрее работают приложения, скомпилированные новым компилятором?

Тестовые испытания показали, что код, полученный при помощи Delphi 2.0 работает в среднем на 300-400% быстрее, чем 16-разрядные приложения. Это означает, что новые приложения будут работать в 15-50 раз быстрее, чем интерпретаторы p-кода. Например, тесты Sieve (что такое — не знаю) показали, что Delphi 2.0 работают в 15 раз быстрее, чем VB 3.0 и в 815 раз быстрее, чем PowerBuilder 4.0.

Ниже приводятся результаты тестирования 16- и 32-разрядных версий Delphi. Все тесты выполнялись на Gateway 2000 V66 (66MHz, процессор 486) с 16Mb памяти. 16-разрядные тесты выполнялись под Windows 3.1. Новые 32-разрядные тесты были выполнены с использованием пре-релиза Delphi 2.0.

Большее число означает большую производительность

Power Builder Visual Basic Delphi 1.0 Delphi 2.0
Sieve 0.22 11.95 52.77 179.37
Whetstone 0.04 1.41 4.70 15.53
File read 0.05 0.42 0.74 2.89
File write 0.05 0.33 1.75 5.28

19. Какой вид коллективной работы над проектом поддерживает Delphi 2.0?

Delphi Client/Server Suite 2.0 использует Open Tools API для тесной интеграции с системой контроля версий Intersolv PVCS (сама система входит в комплект поставки) для работой с файлами. Delphi Developer 2.0 также имеет интерфейс к Intersolv PVCS, но не включает саму систему PVCS. Благодаря Open Tools API, разработчики могут самостоятельно подключать другие системы контроля версий, такие как MKS Source Integrity, Microsoft Source Safe и др.

20. Насколько Delphi Client/Server Suite 2.0 сравним с PowerBuilder?

Delphi Client/Server Suite 2.0 включает в поставку большой диапазон средств, которые имеются в PowerBuilder и предлагают профессиональным разработчикам приложений по технологии клиент-сервер все, что им требуется для построения надежных, мощных приложений по технологии клиент-сервер. Кроме того, предлагаются дополнительные средства, такие как SQL Explorer для просмотра мета-данных на сервере, таких как сохраненные процедуры, триггеры и обработчики событий, SQL Monitor для тестирования и отладки SQL запросов, поддержка командной работы над проектом со встроенным PVCS, расширенный Open Tools API для интеграции с CASE-средствами и версия InterBase под NT с 2-мя пользовательскими лицензиями. Также новый Borland Database Engine поддерживает буферизированное обновление, что существенно облегчает создание высокопроизводительных многозадачных приложений. Delphi остается единственным стредством, совмещающим преимущества оптимизирующего компилятора в родной код, визуального проектирования и технологии масштабируемой работы с базами данных.

Хотя компания PowerSoft и опубликовала планы реализации генератора C кода с возможностью последующей его компиляции в середине 1996 года, он не сможет по производительности, простоте отладки и интеграции в среде превзойти Delphi, который основан на 10-летней технологии производства компиляторов.

21. Насколько Delphi 2.0 сравним с Visual Basic 4.0?

Новый 32-разрядный оптимизирующий компилятор в Delphi 2.0 обеспечивает даже более высокие показатели, чем интерпретатор p-кода в VB 4.0. Кроме того, Delphi 2.0 предлагает более полный доступ к возможностям Windows 95 и NT вместе с поддержкой мульти-трединга и строк Unicode в дополнение к OLE Controls (OCX) и OLE automation. На самом деле, Delphi 2.0 может использовать все преимущества технологии удаленной автоматизации, включенной в VB 4.0 с дополнительным увеличением в скорости.

Delphi 2.0 превосходит VB также в поддержке дополнительных средств технологии клиент-сервер, таких как Database Explorer, Object Repository и Data Dictionary. Также Delphi 2.0 предлаагет много нововведений, таких как визуальное наследование форм и др.

Delphi остается единственным стредством, совмещающим преимущества оптимизирующего компилятора в родной код, визуального проектирования и технологии масштабируемой работы с базами данных. VB 4.0 получил очень среднюю оценку от заказчиков как просто некий 32-разрядный вариант предыдущей версии. VB 4.0 так и не использует основные возможности, такие как компилятор родного кода и настоящее объектно-ориентированное программирование.

Базы данных

1. В чем заключаются преимущества нового 32-разрядного Borland Database Engine?

Новый 32-разрядный Borland Database Engine включает полностью новое ядро запросов, которое было оптимизировано для работы как с удаленными SQL-серверами, так и с локальными данными. 32-разрядный Borland Database Engine использует все преимущества 32-разрядного адресного пространства и асинхронный 32-разрядный ввод/вывод для повышения характеристик. Он также включает новые виды оптимизации, специфичные для конкретных серверов и форматов локальных баз данных. Например, новые 32-разрядные SQL-линки включают многие виды оптимизации для Oracle, Sybase, Informix и InterBase. Новый BDE поддерживает буферизированное обновление для улучшения характеристик выполенний транзакций в приложениях, интенсивно работающих с данными на сервере без требуемого ранее блокировния используемых ресурсов на последнем. Кроме того, дополнительно поодерживаются транзакции на локальных данных и новое ядро запросов более полно реализует стандарт ANSI SQL-92 DML compliance. Новый Borland Database Engine поддерживает Data Dictionary для хранения расширенных аттрибутов данных, таких как минимальное и максимальное значения, маски для редактирования и вывода и др. Delphi также включает новую 32-разрядную версию локального сервера InterBase Server для более полной возможности масштабирования приложений в возможность использования любого другого ANSI SQL 92 сервера.

2. Что такое сервер InterBase?

InterBase это высокопроизводительный SQL сервер фирмы Borland выпускаемый под различные платформы. InterBase доступен для более чем 15 операционных систем, включая: Windows 3.1, Windows 95, Windows NT, NetWare, SCO, Sun OS, Sun Solaris, HP-UX, IBM AIX, SGI IRIX, и множество других Unix платформ.

3. Что такое локальный (Local) InterBase?

Это однопользовательская версия InterBase, включенная в Delphi Developer 2.0 и Delphi Client/Server Suite 2.0. Local InterBase дает возможность разработчикам тестировать свои приложения без привлечения настоящего SQL-сервера, но в то же время используя стандарт ANSI 92 SQL. Локальные InterBase имеет все те же основные возможности, что и многопользовательская версия InterBase доступная под NT и Unix, включая управление транзакциями, сохраненные процедуры, триггеры и обработчики событий.

С помощью локального InterBase разработчики на Delphi получают возможность тестировать свои настоящие клиент-серверные приложения на одном рабочем месте. Это означает возможность работы на laptop-е во время поездок либо использование баз данных, которые очень быстро меняют свою структуру. В отличие от других серверов, InterBase имеет один и тот же API для всех 15, так что приложение, работающее с локальным InterBase будет работать и с любой Unix или NT версией InterBase сервера без каких-либо модификаций.

4. В 32-разрядной версии локального Local InterBase были сделаны какие-либо улучшения?

Да, новая 32-разрядная версия локального InterBase предлагает значительное улучшение характеристик 16-разрядной версии. Также предлагается исключительный интерфйес Windows 95 GUI, включая 32-разрядные средства — Server Manager и Interactive SQL, и полную on-line документацию.

5. Как следует распространять приложения Delphi, использующие InterBase?

Используя Delphi Client/Server Suite 2.0, разработчик может проектировать и тестировать свое приложениe, используя связку Delphi/InterBase на одном рабочем месте. После того, как приложение закончено, просто покупается и инсталлируется требуемая версия InterBase с нужным количеством клиентских лицензий. Данные просто переносятся на сервер, после чего приложение готово к работе. Характеристики InterBase аналогичны для всех платформ — Windows 95, NT и Unix, так что не имеет значения, с какой операционной средой работает сервер. Кроме того, Delphi Developer 2.0 и Delphi Client/Server Suite 2.0 включают InstallShield Express — средство для создания инсталляторов.

6. Насколько InterBase сравним с Watcom SQL?

Характеристики InterBase и Watcom SQL во многом схожи, например в наличии хранимых процедур, триггеров и полного котроля за транзакциями. Однако, InterBase полностью реализует ANSI SQL 92, поддерживает событийную систему на сервере для программирования событийно — управляемых приложений и одновременную модель работы для многопользовательского доступа. Watcom не реализует полностью ANSI 92, не поддерживает события на сервере и имеет полность другое ядро, чем Sybase. Аналогично, InterBase масштабирует с 16-разрядной операционной системы Windows в Unix и имеет один и тот же интерфейс [API] для всех платформ. Watcom не имеет Unix-версий и имеет различные API для всех версий Sybase. Следовательно, если приложение разрабатывается с использованием Watcom API для Windows 3.1, Windows 95, или NT, они должны полностью переписывать свое приложение при изменении целевой платформы. InterBase обеспечивает полностью переноимые, масштабируемые решения для разработчиков клиент-серверных приложений. Наконец, в отличие от блокироки сираниц в Sybase System 11, InterBase предлагает блокировку запись в соответствии с архитектурой множественных поколений записей.

7. Что следует предпочесть разработчику в Delphi: SQL RDBMS, подобный InterBase или базу данных PC LAN, подобно dBase или Paradox?

Для небольших приложений, примерно до 12 одновременно работающих пользователей, использование БД PC LAN таких как dBase или Paradox даст максимально высокую производительность. SQL RDBMS, аналогичные InterBase, проявляют свои преимущества при более чем 10 пользователях и при высоких требованиях к одновременной многопользовательской работе, а также высокой степени сохранности данных. Клиент-серверные приложения позовляют также манипулировать данными больших размеров (20Mb — 20Gb) которые в другом случае вызвали бы слишком медленную работу вследствие взаимного блокирования файлов на файл-сервере и высокого сетевого траффика.

8. Почему я не могу создать в Local InterBase таблицу с кодовой страницей, отличной от страницы по умолчанию?

Этот случай наблюдается, когда полный путь к каталогу, где находится Local InterBase 32 содержит хотя бы один символ пробела (что предлагается по умолчанию). Ошибка официвльно признана Borland и будет устранена в ближайших следующих версиях Delphi 2.0, а тем, кто приобрел текущий вариант Delphi следует перенести IB в другой каталог (например, C:\INTRBASE) и перенастроить пути, либо полностью переставить Delphi с учетом данного требования.

Object Pascal и Windows API

1. Что такое Open Tools API? Насколько он улучшен?

Delphi разработан с учетом Open Tools API, который предоставляет средства интеграции средств третьих фирм, таких как систем контроля версий (Version Control System — VCS), CASE-средств, экспертов и т.д. В версии Delphi 2.0, Open Tools API был расширен с целью увеличить уровень интеграции в отношении работы с файлами, редактором и др. Эта технология идет дальше Microsoft’s Source Code Control (SCC) API для того, чтобы обеспечить более общие возможности интеграции. В данное время Borland ведет работу с большим количеством дополнительных третьих фирм над улучшением взаимодействия с ведущими средствами CASE-проектирования, таких как Popkin System Architect, Sybase S-Designor, CSA SilverRun, LBMS и FMI Select Tools Enterprise и др.

Разное

1. Как ReportSmith 3.0 взаимодействует с Delphi?

Новая 32-разрядная версия ReportSmith 3.0 предлагает более тесную взаимосвязь со средой Delphi и способна работать с любым источником данных, используемом в Delphi, таких как TQuery или TTable . ReportSmith поддерживает создание сложных запросов в среде клиент-сервер и способен функционировать с приложением любой сложности. Delphi 2.0 также включает набор компонетов TQuickReport для встраивания отчетов непосредственно вовнутрь приложения.

2. Каким образом можно разделять Delphi 2 Object Repository между несколькими машинами?

Для этого следует используя Regedit в Registry в секции

HKEY_USERS\.Default\Software\Borland\Delphi\2.0\Repository

завести строковую запись BaseDir и в ней указать путь к вашему репозитарию (в том силе и сетевой).

Вопросы по Delphi 3.0
Вопросы общего характера

1. Какие существуют варианты поставки Delphi 3.0?

Анонсировано три варианта поставки Delphi, каждый из которых предлагает комплект решений для разного уровня разработчиков и решаемых ими задач.

Все версии Delphi 3.0 включают в себя высокопроизводительный 32-разрядный оптимизирующий компилятор, масштабируемые средства доступа к данным, расширяемую библиотеку компонентов, объединенные единой объектно-ориентированной средой разработки.

Состав версий.

Все версии Delphi 3.0 обладают окрытой архитектурой, полностью поддерживают технологии Microsoft OLE Automation, OCX, ODBC, ActiveX. Компонентная модель COM/DCOM поддерживается на уровне компилятора. Компилятор позволяет вам иметь доступ ко всем ресурсам операционных систем, реализующих Win 32 (Windows 95 и Windows NT) и использовать все имеющиеся технологические стандарты — Unicode, MAPI, ISAPI, NSAPI. Как в версии 2.0, в поставку включается 16-разрядная версия Delphi 1.02.

Delphi Standard 3.0

Delphi Standard 3.0 ориентирован на разработчиков в основном отдельных приложений с использованием настольных баз данных. Основные характеристики варианта Standard:

• Профессиональная среда разработки, включающая в себя полностью интегрированный отладчик и редактор

• Интегрированный в среду 32-разрядный оптимизирующий компилятор

• Возможность создания DLL и отдельных исполняемых EXE-файлов

• Возможность создания очень легких EXE с использованием настраиваемой технологии pakeges.

• Полный доступ к Win32 API, поддержка ActiveX, OLE, OLEDB, COM, DCOM, MAPI, ISAPI, NSAPI

• Создание и отладка многопоточных приложений под Windows 95 / Windows NT

• Наличие Delphi 1.0 для создания 16-разрядных приложений под Windows 3.1

• Объектно-ориентированная расширяемая компонентная архитектура

• Наличия репозитария объектов для хранения и повторного использования форм, модулей данных

• Поддержка визуального наследования и визуального связывания форм для уменьшения размера вводимого кода и более простого управления

• Полный набор новейших управляющих элементов Windows 95

• Визуальная библиотека компонентов (VCL) с более чем 100 компонентами, доступными для повторного использования методом ‘drag-and-drop’

• Встроенный генератор отчетов, состоящий из компонентов, позволяющий создавать, просматривать и печатать отчеты без использования дополнительных внешних программ

• Поддержка COM и интерфейсов на уровне языка и компилятора

• Полная поддержка серверов и контроллеров OLE Automation

• Визуальное создание шаблонов для новых компонентов

• Упрощение кодирование и завершение кода с помощью CodeTemplates wizard, CodeCompletion wizard и CodeParameter wizard

• Быстрое вычисление выражений в ToolTip окошке для облегчения процесса отладки Отладка DLL для сокращений времени на разработку и отладку DLL

• Поддержка механизма многих источников данных для быстрого доступа к данным в любой СУБД

• Высокопроизводительные родные драйвера для доступа к данным MS Access, FoxPro, Paradox, dBase

• Компоненты для работы с данными для построения высокопроизводительных приложений, работающих с базами данных

• Увеличение скорости обмена с сервером за счет поддержки Cashed Updates

• Выделение бизнес логики в отдельный модуль данных

• Визуальное упраление базами данных с помощью Database Explorer

Delphi Professional 3.0

Delphi Professional 3.0 предназначается для разработчиков многопользовательских приложений. Данная версия включает в себя все, что имеется в Delphi Standard плюс:

• Исходный код VCL и печатные материалы для более качественного создания собственных компонентов

• Компоненты для построения графиков и диаграмм на основании данных, хранящихся в таблицах баз данных

• Визуальное создание элементов ActiveX для приложений, ориентированных на Web

• Визуальное создание элементов ActiveX для повышения степени повторного использования кода

• Полная поддержка доступа к данным через ODBC

• Обеспечение целостности данных с помощью Data Dictionary

• Возможность создавать и тестировать приложения, работающие с Local InterBase (одна пользовательская лицензия)

• Internet Solutions Pack для создание приложений, использующих ресурсы Web

• Install Shield Express для создания профессиональных инсталляторов

• Open Tools API для интеграции с вашими дополнительными утилитами

Delphi Client/Server Suite 3.0

Delphi Client/Server Suite 3.0 ориентирован на организации, разрабатывающие корпоративные системы, предназначенные для работы с данными, находящимися в базах данных серверов DB/2, Informix, Interbase, MS SQL Server, Oracle, Sybase. Сочетает в себе высокопроизводительный клиентский инструментарий и широкий набор средств работы с серверами БД. По сравнению с версией Client/Server Suite имеет следующие расширения:

• Набор компонентов DecisionCube для облегчения анализа данных, имеющих множество размерностей

• Высокопроизводительные SQL Links с неограниченной лицензией для доступа к данным Oracle, Sybase, Informix, MS SQL Server, InterBase, DB/2

• BDE Driver Development Kit для открытого доступа к любым механизмам баз данных через BDE

• Визуальное управление метаданными SQL сервера, включая хранимые процедуры и триггеры, с помощью SQL Database Explorer

• Тестирование, отладка и настройка производительности приложений, использующих средства SQL с помощью SQL Monitor

• Автоматическое создание правильных SQL выражений с помощью Visual Query Builder

• Возможность создавать и тестировать приложения, работающие с InterBase NT (четыре пользовательских лицензии)

• Легкое деление приложений на отдельные части при помощи Remote DataBroker

• Управление целостностью данных при помощи ConstraintBroker

• Высокоскоростное представление данных через WebServer

• Открытые решения для поддержки Netscape NSAPI и Microsoft ISAPI при помощи WebBridge

• Централизованная обработка информации при помощи WebModule и обработка запросов при помощи WebDispatch

• Распространение тонких клиентов, которым не требуется дополнительно ничего (даже BDE), использу WebDeploy

• Встроенный менеджер версий Intersolve PVCS для групповой разработки

• Эксперт для интеграции с CASE-средствами

• Data Pump эксперт для быстрого масштабирования приложений

2. Какие форматы скомпилированных модулей можно получить в Delphi 3.0?

Delphi может создавать EXE и DLL для Win32. Естественно, вы может также создавать OCX, но для этого нужно знать соглашения по написанию DLL в формате OCX.

Delphi может также создавать 32-разрядные консольные приложения для работы под Win32.

Вы можете создать package — это тоже DLL, но с некоторыми особенностями.

Если вы создаете ActiveX, то у вас появится файл с расширением DLL, который вы можете при желании переименовать в ActiveX. Также у вас автоматически появится файл TLB — это библиотека типов (Type Library), необходимая для поддержки нестандартных типов данных. Кроме того, вы можете создать TLB файл отдельно.

3. Какую модель данных использует Delphi?

Delphi 2.0 использует так называемую плавающую модель памяти (FLOAT), которая принята в Win 32. Отличительной особенностью данной модели памяти является линейная 32-разрядная адресация всего адресного пространства, которое может иметь соответственно размер до 4 Гбайт. При этом все указатели, адреса процедур, указатели на VMT также адресуются через 32-разрядные регистры.

Object Pascal и Windows API

1. Каким образом реализована поддержка COM/DCOM?

В языке Object Pascal появилось понятие интерфейса (interface). Описание интерфейса похоже на описание обычного класса, в нем не может быть указан спецификатор видимости. Список членов ограничен методами и свойствами, для чтения/записи которых используются методы. Поля в интерфейсе недопустимы. Типы параметров и возвращаемых значений ограничены типами, допустимыми в COM/DCOM, их полный перечень можно найти в on-line help.

Интерфейсы могут наследоваться, в соответствии с идеологией COM, допускается только одиночное наследование. Класс может реализовывать несколько интерфейсов, в этом случае он должен объявить методы, которые по типу параметров и возвращаемых значений совпадают с описанием методов соответствующего интерфейса.

Все интерфейсы имеют в качестве базового класса интерфейсный тип IUnknown , объявленный в модуле System следующим образом:

IUnknown = interface

function QueryInterface(const IID: TGUID; out Obj): Integer; stdcall;

function _AddRef: Integer; stdcall;

function _Release: Integer; stdcall;

end;

Для поддержки OLE Automation также в модуле System имеется интерфейс IDispatch :

function GetTypeInfoCount(out Count: Integer): Integer; stdcall;

function GetTypeInfo(Index, LocaleID: Integer; out TypeInfo): Integer; stdcall;

function GetIDsOfNames(const IID: TGUID; Names: Pointer;

NameCount, LocaleID: Integer; DispIDs: Pointer): Integer; stdcall;

function Invoke(DispID: Integer; const IID: TGUID; LocaleID: Integer;

Flags: Word; var Params; VarResult, ExcepInfo, ArgErr: Pointer): Integer; stdcall;

end;

Для облегчения работы с COM имеется класс TInterfacedObject , который реализует методы, объявленные в интерфейсе IUnknown .

2. В Delphi 3.0 допускается множественное наследование классов?

Нет, нет и еще 1024 раза нет. Язык Object Pascal в Delphi 3.0 не позволяет вам наследовать класс от более чем одного класса. Строго говоря, вы всегда наследуете ваш новый класс ровно от одного уже имеющегося. Если вы явно не указываете базовый класс, то им становится TObject , стоящий таким образом в иерархии вообще всех классов.

Слухи о множественном наследовании идут из-за того, что в языке Object Pascal в Delphi 3.0 реализована поддержка интерфейсов для модели COM/DCOM. При этом новый класс может наследоваться от одного класса и реализовывать произвольное количество интефейсов. Соответствующее объявление нового типа:

TNewObject = class(TBaseObject, ISomeInterface, IAnotherInterface, IDummyInterface)

вызывает некоторую путаницу и может быть похожа на множественное наследование. Здесь можно провести анологию с языком Java. Интерфейсы в Delphi 3.0 похожи на интерфейсы в Java с отличием в том, что Java допускает множественное наследование интерфейсов, а Delphi — нет.

Фактически объявление интефейса представляет из себя кусочек таблицы виртуальных методов (VMT), который присоединяется к основной VMT класса.

[1] использовались только версии ODBC 2.0 и Access 2.0.

[2] Local InterBase — однопользовательский SQL сервер базы данных. Версия, включенная в Delphi Desktop, предназначается для использования разработчиками, которые хотят разрабатывать SQL приложения (для последующего переноса их в среду клиент/сервер) без покупки собственной (дорогой) платформы сервера. Однако, Delphi Desktop не включает права распространения на Local InterBase. Если вы хотите распространять однопользовательское приложение, которое его использует, вы должны заплатить дополнительно за deployment kit.

[3] Версия ReportSmith из Delphi Desktop специально обнаруживает и исключает из списка возможных соединений любой ODBC драйвер к удаленному серверу данных. Да, вы не ослышались. Даже если вы купили ODBC драйвер третьей фирмы, и даже если вы можете прекрасно общаться с этим драйвером из Delphi, ReportSmith еще не будет с ним работать. Если вы хотите сделать это без покупки Delphi Client/Server, вы может купить ReportSmith/SQL отдельно за $300 (и тем не менее приобретете ReportSmith версии 2.0, а не 2.5, как в поставке Delphi Client/Server).

Практическая работа «Проектирование в среде Delphi. Доступ к базе данных Microsoft Access»

Образовательные: изучить современную технологию создания приложения путем применения компонентов среды Delphi; изучить технологию ADO, обеспечивающую соединение с базой данных Microsoft Access; научить проектировать приложение и обеспечить доступ к БД MS Access “Детская поликлиника”.

Развивающие: развивать умение у обучающихся анализировать, делать самостоятельный вывод, а также развивать самоконтроль и взаимоконтроль.

Воспитательные: способствовать формированию таких качеств личности, как ответственное отношение к порученному делу; внимательность, способность к самовыражению.

Оборудование: персональный компьютер, рекомендации по практической работе, электронный учебник по Delphi7 для начинающих.

ПО: Microsoft Access, Borland Delphi7, готовая рабочая база данных “Детская поликлиника”.

Задание

Задание: Создать проект в Borland Delphi 7 и обеспечить доступ к ранее созданной БД Microsoft Access “Детская поликлиника”, используя компоненты среды Delphi, получить информацию из базы данных и представить ее в форме таблицы.

В Microsoft Access создана база данных “Детская поликлиника” и наполнена информацией (приложение).

Информационная система “Детская поликлиника” хранит информацию о врачах, пациентах, заболеваниях, детских учреждениях и предоставляет следующие данные:

  • информацию о враче (фамилия, специализация, стаж, оклад, совместительство);
  • данные о больном (фамилия, возраст, адрес, детское учреждение, место работы родителей, хронические заболевания, прививки, последнее обращение к врачу);
  • данные о детском учреждении (наименование, адрес, количество детей, наличие карантина, выявленные инфекционные заболевания, дата последнего профилактического обследования).
  • список детских учреждений, в которых зафиксированы инфекционные заболевания.

Среда разработки проекта в Delphi

Delphi – это среда быстрой разработки, в которой в качестве языка программирования используется язык Delphi. Язык Delphi – строго типизированный объектно-ориентированный язык, в основе которого лежит Object Pascal. Интегрированная среда позволяет создавать, компилировать, тестировать и редактировать проект в единой среде программирования [4].

Работа над новым проектом, так в Delphi называется разрабатываемое приложение, начинается с создания стартовой формы.

Форма (Form) – основа разработки в нее помещают необходимые компоненты, создают интерфейс программы. Свойства формы определяют ее внешний вид: размер, положение на экране, текст заголовка, др.

Для просмотра и изменения значений свойств формы и ее компонентов используется окно Object Inspector (Инспектор Объектов). В верхней части окна Object Inspector указано имя объекта, значения свойств которого отображается в данный момент. В левой колонке вкладки Properties (Свойства) перечислены свойства объекта, а в правой – указаны их значения (рис.1). Инспектор Объектов является дизайнером формы.

Исходный текст модуля разработки содержится в Окне редактора и имеет первоначальный заголовок Unit1.pas (рис.1). Проводник кода отображает объекты модуля формы (*pas), что позволяет быстро обращаться к объектам и создавать новые классы.

Рис. 1. Основные элементы среды разработки в Delphi

Файл модуля формы Unit1.pas (рис.1) содержит описание класса формы (размещение, поведение компонентов и функционирование обработчиков событий) и создается автоматически.

Любой проект имеет не менее шести файлов (табл.1).

Основные файлы проекта

Назначение

Главный файл проекта (код проекта) – PROGECT.DPR Основной, представляет собой программу на языке Pascal.
Первый модуль программы (модуль формы) UNIT.PAS Автоматически появляется вначале работы его можно назвать любым другим именем. Содержит текст программы на языке Pascal.
Файл главной формы (описания формы) – UNIT.DFM Используется для сохранения информации о внешнем виде главной формы.
Файл описание ресурсов – PROGECT.RES Содержит иконку для проекта, создается автоматически.
Файл параметры проекта – PROGECT.OPT Текстовый файл для сохранения установок, связанных с данным проектом.
Модули — *.PAS Дополнительные Модули. Содержат текст программы на языке Pascal.

Разработка приложения состоит из двух этапов:

1. Создание интерфейса приложения.

2. Определение функциональности приложения.

Для создания интерфейса необходимо определить внешний вид проекта, выбрать нужные компоненты по функциональным возможностям и расположить на форме.

Для обеспечения функциональности приложения необходимо задать в Инспекторе Объектов значения свойств и процедур объектов событий, написать программный код обработки событий.

Установить измененные параметры проекта необходимо с помощью команды меню Project/Построить Project. Если требуется объединить несколько форм под единое начало – выполнить команду Project/Options.

Компиляция является обязательным процессом – процессом перевода всей программы с последующим исполнением. Данный процесс может быть выполнен на любой стадии разработки проекта. Компиляция создает:

— готовый к выполнению файл (*exe),

— динамически загружаемая библиотека (*DLL).

Запускать проект можно из среды Delphi командой Run/Run (Выполнить), из среды Windows (Название приложения.exe).

Создание приложения для работ с БД Access

Работа над новым проектом, так в Delphi называется разрабатываемое приложение, начинается с создания стартовой формы.

Создание закладок в конструкторе форм.

1. В Инспекторе Объектов изменить параметры некоторых свойств: Align —> alClient, color—>clMoneyGreen, caption—>Детская поликлиника, font, name—>Form (рис.1).

2. Создать закладки в конструкторе форм при помощи компонента PageControl на вкладке Win32 (таб.2) (Win32—>PageControl).

3. В окне Дерево Объектов создать Страницу (Контекстное меню—>Новая страница). В Инспекторе Объектов изменить параметры названия (Сaption—>Больной) (рис.2).

Рис. 2. Создание закладок в конструкторе форм

4. Аналогичным способом создать закладки, названия которых соответствуют названию таблиц в схеме данных БД MS Access (рис.7).

5. Поместить на форму компонент ADOConnection (вкладка ADO> ADOConnection) и выполнить его настройку (табл.2; рис.3).

Значения свойств компонента ADOConnection

Свойство Примечание
PageControl Набор панелей с закладками. Каждая панель может содержать свой набор интерфейсных элементов и набирается щелчком по связанной с ней закладке.
Вкладка Win32 Содержит интерфейсные элементы для 32 разрядных операционных систем Windows 2000.
LoginPromt False
ConnectionString Сделать щелчок на кнопке с тремя точками (находится в поле значения свойств). Сделать щелчок на кнопке Build.

На вкладке поставщик данных выбрать Microsoft Jet 4.0 OLEDB Provider.

На вкладке Подключение указать файл базы данных “Детская поликлиника”.

Дополнительно указать Права доступа: ReadWtite.

Для включения асинхронного режима необходимо установить свойство ConnectOptions компонента TADOConnection в значение coAsyncConnect. В этом случае новые запросы будут выполняться, не ожидая ответа от предыдущих запросов.

Рис.3. Настройка ADOConnection в параметрах Инспектора Объектов

6. Поместить на форму компонент ADOTable(ADODB) (Вкладка ADO—>ADOTable ) и выполнить его настройку (табл.3; рис.3).

Значения свойств компонента ADOTable(ADODB)

Свойство Значение Примечание
Connection Имя компонента ADOConnection, обеспечи-вающего соединение с БД Раскрыть список, находящийся в поле значения свойства, и выбрать имя компонента
TableName Команда, обеспечивающая получение информации из определенной таблицы БД Раскрыть список, находящийся в поле значения свойства, и выбрать название нужной таблицы
Active True
Технология ADO Это синхронное/асинхронное выполнение операций с хранилищем данных. При помощи свойства connectoptions можно задать режим соединения с хранилищем данных
TADODataSet TADOCoommand Общие компоненты для работы с технологией ADO, позволяют выполнять команды на языке провайдера данных.
DataSource Object Хранилище данных.

7. Поместить на форму компонент DataSource (вкладка Data Access —> DataSource) и выполнить его настройку (табл. 4; рис.3)

Значения свойств компонента DataSource

Свойство Значение Примечание
Connection Имя компонента ADODataSet Раскрыть список, находящийся в поле значения свойства, и выбрать имя компонента
DataSource Object Хранилище данных.

8. Поместить на форму компонент DBGrid (вкладка Data Controls—>DBGrid) и выполнить его настройку (табл.5; рис.3)

Значения свойств компонента DBGr >
Свойство Значение Примечание
DataSource Имя компонен-та DataSource Раскрыть список, находящийся в поле значения свойства, и выбрать имя компонента
Align alClient
DBGrid Компонент предназначен для визуализации данных, их ввода и редактирования.
Edit Строка ввода. Предназначена для ввода, отображения или редактирования одной текстовой строки.
Button Командная кнопка. Обработчик события OnClick этого компонента обычно используется для реализации некоторой команды.

9. Аналогично создать другие графы таблицы (проекта “Детская поликлиника”). На рисунке 4 представлен результат правильно выполненных действий задания.

10. В графе “Зафиксированные инфек.заболевания” выполним запрос по датам обследования.

Для этого добавить компонент ADOQuery(ADODB). Значения данного компонента соответствуют значениям свойств компонента ADOTable(ADODB). В параметрах Инспектора Объектов введем SQL – команду:

ADOQuery1.Add(‘SELECT DU.DU, DU_Adres.DU, DU.Inf_Zab, DU.Data_obs’);

ADOQuery1.Add(‘WHERE ((DU.Data_Obs) BETWEEN (DateValue(»’ + Edit1.Text + »’)) AND (DateValue(»’ + Edit2.Text + »’)) );’);

11. Поместить на форму компонент Edit1 и Edit2. В параметрах этих компонентов укажем дату по умолчанию: Edit1—>Text—>01.01.2009; Edit2—>Text—>31.12.2009.

12. Поместить на форму компонент Button (рис.5).

13. Создать процедуру обработки события Click, обеспечивающую выполнение SQL – команды.Процедура обработки события Click на кнопке “Обновить запрос” (Button1):

procedure TF.OtClick(Sender: TObject);

ADOQuery1.SQL.Add(‘SELECT DU.DU, DU.Adres_DU, DU.Inf_Zab, DU.Data_obs’);

ADOQuery1.SQL.Add(‘WHERE ((DU.Data_Obs) BETWEEN (DateValue(»’ + Edit1.Text +»’)) AND (DateValue(»’ + Edit2.Text + »’)));’);

for i := 0 to ADOQuery1.SQL.Count-1 do Writeln(sqlfile, ADOQuery1.SQL.Strings[i]);

Рис.5. Окно конструктора формы. Закладка “Зафиксированные инфекционные заболевания

14. Последний этап. Создание исполняемый файл – приложение Project1.exe при помощи процесса компиляции (Project/Compile

). Компилятор генерирует исполняемую программу как консольное приложение. Пример работы программы, т.е. вид окна программы после выполнения представлен на рис.6.

Рис.6. Исполняемый файл – приложение Project1.exe

Готовый проект — приложение в Delphi представлен в приложении.

ForCoder

Книги по Delphi, скачать бесплатные книги, самоучители и учебники по Delphi в хорошем качестве

Книга представляет собой практическое руководство по программированию в Embarcadero Delphi. В ней представлена технология визуального проектирования и событийного программирования, подробно рассмотрен процесс создания VCL приложений, показано назначение базовых компонентов, рассмотрены вопросы программирования графики, работа с базами данных Microsoft Access. Уделено внимание разработке Multi-Device приложений, в том числе для платформы Android, использованию компонентов FireMonkey, использованию компонентов FireDAC для работы с интегрированными базами данных SQLite, 3D графика, Float и Path анимация, работа с датчиками и сенсорами.
Для начинающих программистов.

21,169 просмотров всего, 2 просмотров сегодня

Обучение мобильной разработке на Delphi

Основной целью данной книги является наглядная демонстрация приёмов создания программ в одной из самых популярных и доступных сред разработки Delphi/C++Builder/RAD Studio. В качестве учебных примеров были выбраны приложения, которые могут быть использованы в проектном обучении.

20,950 просмотров всего, сегодня нет просмотров

Базы данных и Delphi. Теория и практика

Книга основана на материалах лекций и практических занятий, разработанных автором, и объединяет теоретические основы и практические аспекты разработки реляционных баз данных. В первой части рассмотрена концепция реляционных баз данных: реляционная модель данных, жизненный цикл информационной системы, концептуальное и логическое моделирование БД, нормализация отношений, обеспечение многопользовательского доступа к данным, вопросы обеспечения безопасности БД, языки SQL и XML и др. Во второй части описаны возможности современных версий Delphi в области разработки приложений баз данных: подробное описание технологий dbExpress, Interbase Express и ADO, особенности использования компонентов управления данными визуальной библиотеки Delphi, механизм разработки многоуровневых приложений на основе технологии DataSnap, порядок создания отчетов для печати и многое другое.

15,214 просмотров всего, 2 просмотров сегодня

Delphi. Программирование для Windows, OS X, iOS и Android

Книга посвящена одному из самых совершенных языков программирования Delphi XE5/XE6. В ней подробно рассматривается новейшая кроссплатформенная библиотека FM, позволяющая создавать полнофункциональное программное обеспечение для операционных систем Windows и OS X, а также для смартфонов и планшетных компьютеров, работающих под управлением Android и iOS. Проекты примеров из книги размещены на сайте издательства.

20,976 просмотров всего, 1 просмотров сегодня

Delphi в примерах, играх и программах

Описание книги Delphi в примерах, играх и программах:
Здесь собран материал, не вошедший в книгу Delphi в примерах, играх и программах: Oт простых приложений, решения задач и до программирования интеллектуальных игр, которая была выпущена питерским издательством Наука и техника в 2011 году. К сожалению, в ней не нашлось места для нескольких глав, рассказывающих о программировании игр и головоломок.

Японский кроссворд — популярнейшая головоломка на раскрашивание квадратиков.

Логос – замечательная логическая головоломка с точками.

Цветные линии, Город, Молекулярный конструктор – известная во всем мире игра на собирание шариков, а также ее естественнонаучные авторские вариации.

Жизнь – самый известный в мире клеточный автомат Джона Конвея. Играйте и размножайтесь!

Флип-Флоп, XorGame, ShortGame – превосходные игры-оборотни.

Бокалы – фокусная головоломка-перевертыш.

Хитори – одна из лучших современных японских головоломок, мировой хит!

Почти все проекты сопровождаются исчерпывающим анализом игр и головоломок. Поиск выигрышных стратегий и разработка эффективных алгоритмов — вот главное содержание и достоинство представленного здесь материала, поскольку в большинстве книг по программированию читателям сразу же предъявляется готовое решение проблемы, из которого невозможно (или, по крайней мере, весьма затруднительно) понять, откуда у него ноги растут и где собака зарыта.

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

Исходные коды прилагаются!

38,904 просмотров всего, 1 просмотров сегодня

Разработка клиент-серверных приложений в Delphi

Описание книги Разработка клиент-серверных приложений в Delphi:
Рассмотрены практические вопросы по разработке клиент-серверных приложений в среде Delphi 7 и Delphi 2005 с использованием СУБД MS SQL Server 2000, InterBase и Firebird. Приведена информация о теории построения реляционных баз данных и языке SQL. Освещены вопросы эксплуатации и администрирования СУБД. Большое внимание уделено различным генераторам отчетов QReport, RaveReports и FastReport.

Описано использование системы проектирования, разработки и поддержки баз данных ERwin. Рассмотрены дополнительные компоненты для разработки клиент-серверных приложений, а также даны ответы на часто задаваемые вопросы. Материал излагается по принципу «от простого к сложному» и сопровождается иллюстрациями, практическими примерами и видеороликами.

15,785 просмотров всего, 1 просмотров сегодня

Технологии Delphi 2006. Новые возможности

Описание книги Технологии Delphi 2006. Новые возможности:
В книге рассмотрены новые возможности системы программирования Delphi 2006 и представлены нововведения в языке, оболочке, редакторе, компиляторе и отладчике. Объяснены новые технологии работы с базами данных и создания приложений для Интернета. Особое внимание уделено средствам и технологиям повышения эффективности работы программистов: рефакторингу, шаблонам проектирования, унифицированному языку UML и технологии моделирования ЕСО.

Издание рассчитано на программистов всех уровней подготовки. Начинающие разработчики познакомятся с удобными средствами быстрого создания программ, программисты средней квалификации изучат современные подходы к разработке сложных систем и новые средства визуального проектирования, а профессионалам будут интересны новые возможности технологий моделирования ECO III, UML 2.0 и паттернов проектирования.

6,627 просмотров всего, сегодня нет просмотров

Библия Delphi

Описание книги Библия Delphi:
Книга посвящена программированию на языке Delphi от самых основ до примеров построения конкретных приложений. Подробно описывается логика выполнения каждого участка кода, чтобы читатель смог использовать эти знания при решении собственных задач. Книга содержит большое количество примеров практического программирования; некоторые из них вынесены в качестве дополнительной информации на прилагаемый компакт диск. В третьем издании материал исправлен и переработан с учетом новых возможности пакета.

Компакт-диск содержит исходные коды программ, дополнительную справочную ив формацию, а также готовые изображения и компоненты.

22,825 просмотров всего, 1 просмотров сегодня

О чем не пишут в книгах по Delphi

Описание книги О чем не пишут в книгах по Delphi:
Рассмотрены малоосвещенные вопросы программирования в Delphi. Описаны методы интеграции VCL и API. Показаны внутренние механизмы VCL и приведены примеры вмешательства в эти механизмы. Рассмотрено использование сокетов в Delphi: различные режимы их работы, особенности для протоколов TCP и UDP и др.

Большое внимание уделено разбору ситуаций возникновения ошибок и получения неверных результатов в «простом и правильном» коде. Отдельно рассмотрены особенности работы с целыми, вещественными и строковыми типами данных, а также приведены примеры неверных результатов, связанных с ошибками компилятора, VCL и др. Для каждой из таких ситуаций предложены методы решения проблемы.

Очень часто книги ориентированы либо на полных чайников (как кидать компоненты на форму), либо на крутых профи. При этом совершенно неохваченным остается круг тех людей, которые компоненты на форму кидать уже научились, но хотят развиваться дальше. Данная книга как раз и заполняет этот вакуум. Написано о серьезных вещах, но достаточно простым и понятным языком.

Подробно рассмотрен синтаксический анализ в Delphi на примере арифметических выражений. Многочисленные примеры составлены с учетом различных версий: от Delphi 3 до Delphi 2007.

Прилагаемый компакт-диск содержит примеры из книги.

10,466 просмотров всего, сегодня нет просмотров

Создание компонентов в среде Delphi. Руководство разработчика

Описание книги Создание компонентов в среде Delphi. Руководство разработчика:
Книга посвящена созданию компонентов на языке Object Pascal, предназначенных для использования в средах разработки фирмы Borland. Описываются особенности реализации ООП в Object Pascal и библиотеки классов VCL и CLX. Показывается, как расширять имеющиеся компоненты и писать собственные компоненты «с нуля». Рассматриваются невизуальные, графические и оконные компоненты, а также компоненты для работы с СУБД.

Представлен процесс создания редакторов компонентов и их свойств, широко применяемых в Delphi. Даны практические рекомендации по распространению готовых компонентов и встраиванию их в среду разработки, по написанию справочной системы для разработанных компонентов, по расширению возможностей IDE Delphi. Приведено подробное описание малодокументированной возможности Object Pascal, связанной с получением и использованием информации времени выполнения (RTTI). Изложение сопровождается большим количеством примеров самых различных типов компонентов. На прилагаемом компакт-диске содержатся все рассмотренные в книге примеры.

9,913 просмотров всего, сегодня нет просмотров

Borland delphi 4 0 для начинающих работа с формами

Допускаю, что вы пока еще не слышали этого названия. Хотя, быть может, и слышали. Delphi — это греческий город, где жил дельфийский оракул. И этим именем был назван новый программный продукт с феноменальными характеристиками.

Hадо отметить, что к моменту выхода продукта обстановка вокруг компании Borland складывалась не лучшим для нее образом. Поговаривали о возможной перепродаже компании, курс акций компании неудержимо катился вниз. Сейчас уже можно без всяких сомнений утверждать, что период трудностей позади. Hеверно, конечно, было бы говорить, что только Delphi явился причиной восстановления компании; кроме Delphi, у Borland появились и другие замечательные продукты, так же, как и Delphi, основывающиеся на новых, появившихся недавно у компании Borland, технологиях. Я имею в виду новые BDE 2.0, BC++ 4.5, Paradox for Windows 5.0, dBase for Windows 5.0, BC++ 2.0 for OS/2.

Тем не менее, именно Delphi стал тем продуктом, на примере которого стало ясно, что у Borland есть еще порох в пороховницах, и что один единственный продукт может настолько удачно сочетать несколько передовых технологий.

Delphi. Основные характеристики продукта.

Delphi — это комбинация нескольких важнейших технологий:

  • Высокопроизводительный компилятор в машинный код
  • Объектно-ориентированная модель компонент
  • Визуальное (а, следовательно, и скоростное) построение приложений из программных прототипов
  • Масштабируемые средства для построения баз данных

Компилятор в машинный код

Компилятор, встроенный в Delphi, обеспечивает высокую производительность, необходимую для построения приложений в архитектуре «клиент-сервер». Этот компилятор в настоящее время является самым быстрым в мире, его скорость компиляции составляет свыше 120 тысяч строк в минуту на компьютере 486DX33. Он предлагает легкость разработки и быстрое время проверки готового программного блока, характерного для языков четвертого поколения (4GL) и в то же время обеспечивает качество кода, характерного для компилятора 3GL. Кроме того, Delphi обеспечивает быструю разработку без необходимости писать вставки на Си или ручного написания кода (хотя это возможно).

В процессе построения приложения разработчик выбирает из палитры компонент готовые компоненты как художник, делающий крупные мазки кистью. Еще до компиляции он видит результаты своей работы — после подключения к источнику данных их можно видеть отображенными на форме, можно перемещаться по данным, представлять их в том или ином виде. В этом смысле проектирование в Delphi мало чем отличается от проектирования в интерпретирующей среде, однако после выполнения компиляции мы получаем код, который исполняется в 10-20 раз быстрее, чем то же самое, сделанное при помощи интерпретатора. Кроме того, компилятор компилятору рознь, в Delphi компиляция производится непосредственно в родной машинный код, в то время как существуют компиляторы, превращающие программу в так называемый p-код, который затем интерпретируется виртуальной p-машиной. Это не может не сказаться на фактическом быстродействии готового приложения.

Объектно-ориентированная модель программных компонент

Основной упор этой модели в Delphi делается на максимальном реиспользовании кода. Это позволяет разработчикам строить приложения весьма быстро из заранее подготовленных объектов, а также дает им возможность создавать свои собственные объекты для среды Delphi. Никаких ограничений по типам объектов, которые могут создавать разработчики, не существует. Действительно, все в Delphi написано на нем же, поэтому разработчики имеют доступ к тем же объектам и инструментам, которые использовались для создания среды разработки. В результате нет никакой разницы между объектами, поставляемыми Borland или третьими фирмами, и объектами, которые вы можете создать.

В стандартную поставку Delphi входят основные объекты, которые образуют удачно подобранную иерархию из 270 базовых классов. Для начала — неплохо. Но если возникнет необходимость в решении какой-то специфической проблемы на Delphi, советуем, прежде чем попытаться начинать решать проблему «с нуля», просмотреть список свободно распространяемых или коммерческих компонент, разработанных третьими фирмами, количество этих фирм в настоящее время превышает число 250, хотя, возможно, я не обо всех знаю. Скептики, возможно, не поверят мне, когда я скажу, что на Delphi можно одинаково хорошо писать как приложения к корпоративным базам данных, так и, к примеру, игровые программы. Тем не менее, это так. Во многом это объясняется тем, что традиционно в среде Windows было достаточно сложно реализовывать пользовательский интерфейс. Событийная модель в Windows всегда была сложна для понимания и отладки. Но именно разработка интерфейса в Delphi является самой простой задачей для программиста.

Быстрая разработка работающего приложения из прототипов

Игровая программа Rendzu была собрана моим коллегой из готовых кусков за рабочий день, причем большая часть времени была посвящена прихорашиванию и приукрашиванию. Screen Saver в виде прыгающих часиков был также изготовлен на Delphi за весьма незначительное время. Теперь эти часики украшают почти каждую IBM-совместимую машину в нашем Демо-центре клиент-серверных технологий. Конечно, на разработку серьезной информационно-поисковой системы в архитектуре клиент-сервер может уйти гораздо большее время, чем на разработку программы-игрушки. Тем не менее многие наши коллеги, до Delphi программировавшие на других языках, утверждают, что на Delphi скорость изготовления сложного проекта выше раз в 10.

Cреда Delphi включает в себя полный набор визуальных инструментов для скоростной разработки приложений (RAD — rap >Соответствующий стандарт компонент назывался VBX. И этот стандарт так же поддерживается в Delphi. Однако, визуальные компоненты в Delphi обладают большей гибкостью. Вспомним, в чем была проблема в VB. Прикладной программист программировал, вообще говоря, в среде языка бэйсик. А компоненты в стандарте VBX готовили ему его коллеги-профессионалы на С++.

VBX’ы приходили, «как есть», и ни исправить, ни добавить ничего было нельзя.

А для изготовления VBX надо было осваивать «кухню» языка C++. В Delphi визуальные компоненты пишутся на объектном паскале, на том же паскале, на котором пишется алгоритмическая часть приложения. И визуальные компоненты Delphi получаются открытыми для надстройки и переписывания. Чувствуете разницу?

Масштабируемые средства для построения баз данных

Объекты БД в Delphi основаны на SQL и включают в себя полную мощь Borland Database Engine. В состав Delphi также включен Borland SQL Link, поэтому доступ к СУБД Oracle, Sybase, Informix и InterBase происходит с высокой эффективностью. Кроме того, Delphi включает в себя локальный сервер Interbase для того, чтобы можно было разработать расширяемые на любые внешние SQL-сервера приложения в офлайновом режиме. Разработчик в среде Delphi, проектирующий информационную систему для локальной машины (к примеру, небольшую систему учета медицинских карточек для одного компьютера), может использовать для хранения информации файлы формата .dbf (как в dBase или Clipper) или .db (Paradox). Если же он будет использовать локальный InterBase for Windows 4.0 (это локальный SQL-сервер, входящий в поставку), то его приложение безо всяких изменений будет работать и в составе большой системы с архитектурой клиент-сервер.

Вот она — масштабируемость на практике — одно и то же приложение можно использовать как для локального, так и для более серьезного клиент-серверного вариантов.

Delphi — два варианта поставки

Я уже упомянул о технологиях, которые объединяет Delphi. Теперь можно перейти к описанию собственно продукта. Что лежит внутри в коробке, и чем может воспользоваться программист при разработке прикладной системы? Выпущены две версии Delphi — одна (Delphi Client-Server) адресована для разработчиков приложений в архитектуре «клиент-сервер», а другая (Delphi for Windows) предназначена для остальных программистов. Приложения, разработанные при помощи Delphi, можно использовать без выплаты royalty-процентов и без оплаты runtime- лицензий.

Клиент-серверная версия Delphi

Она адресована корпоративным разработчикам, желающим разрабатывать высокопроизводительные приложения для рабочих групп и корпоративного применения.

Клиент-серверная версия включает в себя следующие особенности:

  • SQL Links: специально написанные драйвера для доступа к Oracle, Sybase, Informix, InterBase
  • Локальный сервер InterBase: SQL-сервер для Windows 3.1. СУБД для разработки в корпоративных приложений на компьютере, не подключенном к локальной сети.
  • ReportSmith Client/server Edition: генератор отчетов для SQL-серверов
  • Team Development Support: предоставляет версионный контроль при помощи PVCS компании Intersolve (приобретается отдельно) или при помощи других программны х продуктов версионного контроля
  • Visual Query Builder — это средство визуального построения SQL-запросов
  • лицензия на право распространения приложений в архитектуре клиент-сервер, изготовленных при помощи Delphi
  • исходные тексты всех визуальных компонент

Delphi for Windows

Delphi for Windows представляет из себя подмножество Delphi Client-Server и предназначен для разработчиков высокопроизводительных персональных приложений, работающих с локальными СУБД типа dBase и Paradox.Delphi Desktop Edition предлагает такую же среду для быстрой разработки и первоклассный компилятор как и клиент-серверная версия (Client/Server Edition). Эта среда позволяет разработчику быстро изготавливать персональные приложения, работающие с персональными СУБД типа dBase и Paradox. Delphi позволяет также создавать разработчику DLL, которая может быть вызвана из Paradox, dBase, C++ или каких-нибудь других готовых программ.

В Delphi for Windows, как и в Delphi Client-Server, входят

  • компилятор Object Pascal (этот язык является расширением языка Borland Pascal 7.0)
  • генератор отчетов ReportSmith 2.5 (у которого, правда, отсутствует возможность работы с SQL-серверами)
  • среда визуального построителя приложений
  • библиотека визуальных компонент
  • Локальный сервер InterBase

RAD Pack for Delphi

В этом обзоре стоит упомянуть еще один продукт, выпущенный компанией Borland для Delphi. В RAD Pack for Delphi входит набор полезных дополнений, которые помогут разработчику при освоении и использовании Delphi. Это учебник по объектному паскалю, интерактивный отладчик самой последней версии, Borland Visual Solutions Pack (набор VBX для реализации редакторов, электронных таблиц, коммуникационные VBX, VBX с деловой графикой и т.п.), Resource WorkShop для работы с ресурсами Borland Pascal 7.0, а также дельфийский эксперт для преобразования ресурсов BP 7.0 в формы Delphi.

Для кого предназначен Delphi

В первую очередь Delphi предназначен для профессионалов-разработчиков корпоративных информационных систем. Может быть, здесь следует пояснить, что конкретно имеется в виду. Не секрет, что некоторые удачные продукты, предназначенные для скоростной разработки приложений (RAD — rap >Delphi такие ограничения не присущи. Хорошее доказательство тому — это тот факт, что сам Delphi разработан на Delphi. Можете делать выводы. Однако Delphi предназначен не только для программистов-профессионалов. Я читал в электронной конференции совершенно неожиданные для меня письма, где учителя, врачи, преподаватели ВУЗов, бизнесмены, все те, кто используют компьютер с чисто прикладной целью, рассказывали о том, что приобрели Delphi for Windows для того, чтобы быстро решить какие-то свои задачи, не привлекая для этого программистов со стороны. В большинстве случаев им это удается. Поразительный факт — журнал Visual Basic Magazine присудил свою премию Delphi for Windows.

Руководители предприятий, планирующие выделение средств на приобретение программных продуктов, должны быть уверены в том, что планируемые инвестиции окупятся. Поэтому одним из оцениваемых факторов должен быть вопрос — а легко ли найти специалиста по Delphi и сколько будет стоить его обучение, сколько времени специалист затратит на овладение продуктом. Ответ здесь получить весьма просто — любой программист на паскале способен практически сразу профессионально освоить Delphi. Специалисту, ранее использовавшему другие программные продукты, придется труднее, однако самое первое работающее приложение он сможет написать в течение первого же часа работы на Delphi. И, конечно же, открытая технология Delphi является мощным гарантом того, что инвестици, сделанные в Delphi, будут сохранены в течение многих лет.

Некоторые особенности Delphi

Локальный сервер InterBase — следует заметить, что этот инструмент предназначен только для автономной отладки приложений. В действительности он представляет из себя сокращенный вариант обработчика SQL-запросов InterBase, в который не включены некоторые возможности настоящего сервера InterBase. Отсутствие этих возможностей с лихвой компенсируется преимуществом автономной отладки программ.

Team Development Support — средство поддержки разработки проекта в группе. Позволяет существенно облегчить управление крупными проектами. Это сделано в виде возможности подключения такого продукта как Intersolve PVCS 5.1 непосредственно к среде Delphi.

Высокопроизводительный компилятор в машинный код — в отличие от большинства Паскаль-компиляторов, транслирующих в p-код, в Delphi программный текст компилируется непосредственно в машинный код, в результате чего Delphi— приложения исполняются в 10-20 раз быстрее (особенно приложения, использующие математические функции). Готовое приложение может быть изготовлено либо в виде исполняемого модуля, либо в виде динамической библиотеки, которую можно использовать в приложениях, написанных на других языках программирования.

Открытая компонентная архитектура

Благодаря такой архитектуре приложения, изготовленные при помощи Delphi, работают надежно и устойчиво. Delphi поддерживает использование уже существующих объектов, включая DLL, написанные на С и С++, OLE сервера, VBX, объекты, созданные при помощи Delphi. Из готовых компонент работающие приложения собираются очень быстро. Кроме того, поскольку Delphi имеет полностью объектную ориентацию, разработчики могут создавать свои повторно используемые объекты для того, чтобы уменьшить затараты на разработку.

Delphi предлагает разработчикам — как в составе команды, так и индивидуальным — открытую архитектуру, позволяющую добавлять компоненты, где бы они ни были изготовлены, и оперировать этими вновь введенными компонентами в визуальном построителе. Разработчики могут добавлять CASE-инструменты, кодовые генераторы, а также авторские help’ы, доступные через меню Delphi.

Two-way tools — однозначное соответствие между визуальным проектированием и классическим написанием текста программы Это означает, что разработчик всегда может видеть код, соответствующий тому, что он построил при помощи визуальных инструментов и наоборот.

Визуальный построитель интерфейсов (Visual User-interface builder) дает возможность быстро создавать клиент-серверные приложения визуально, просто выбирая компоненты из соответствующей палитры.

Библиотека визуальных компонент

Эта библиотека объектов включает в себя стандартные объекты построения пользовательского интерфейса, объекты управления данными, графические объекты, объекты мультимедиа, диалоги и объекты управления файлами, управление DDE и OLE.

Структурное объектно-ориентированное программирование

Delphi использует структурный объектно-ориентированный язык (Object Pascal), который сочетает с одной стороны выразительную мощь и простоту программирования, характерную для языков 4GL, а с другой стороны эффективность языка 3GL. Программисты немедленно могут начать производить работающие приложения, и им не придется для этого изучать особенности программирования событий в Windows. Delphi полностью поддерживает передовые программные концепции включая инкапсуляцию, наследование, полиморфизм и управление событиями.

Поддержка OLE 2.0, DDE и VBX

Это очень важная особенность для разработчиков в среде Windows, поскольку в уже существующие Windows-приложения программист может интегрировать то, что разработает при помощи Delphi.

Delphi: настраиваемая cреда разработчика

После запуска Delphi в верхнем окне горизонтально располагаются иконки палитры компонент. Если курсор задерживается на одной из иконок, под ней в желтом прямоугольнике появляется подсказка

Из этой палитры компонент вы можете выбирать компоненты, из которых можно строить приложения. Компоненты включают в себя как визуальные, так и логические компоненты. Такие вещи, как кнопки, поля редактирования — это визуальные компоненты; а таблицы, отчеты — это логические.

Понятно, что поскольку в Delphi вы визуальным образом строите свою программу, все эти компоненты имеют свое графическое представление в поле форм для того, чтобы можно было бы ими соответствующим образом оперировать. Но для работающей программы видимыми остаются только визуальные компоненты. Компоненты сгруппированы на страницах палитры по своим функциям. К примеру, компоненты, представляющие Windows «common dialogs» все размещены на странице палитры с названием «Dialogs».

Delphi позволяет разработчикам настроить среду для максимального удобства. Вы можете легко изменить палитру компонент, инструментальную линейку, а также настраивать выделение синтаксиса цветом.

Заметим, что в Delphi вы можете определить свою группу компонент и разместить ее на странице палитры, а если возникнет необходимость, перегруппировать компоненты или удалить неиспользуемые.

Интеллектуальный редактор

Редактирование программ можно осуществлять, используя запись и исполнение макросов, работу с текстовыми блоками, настраиваемые комбинации клавиш и цветовое выделение строк .

Графический отладчик

Delphi обладает мощнейшим, встроенным в редактор графическим отладчиком, позволяющим находить и устранять ошибки в коде. Вы можете установить точки останова, проверить и изменить переменные, при помощи пошагового выполнения в точности понять поведение программы. Если же требуются возможности более тонкой отладки, Вы можете использовать отдельно доступный Turbo Debugger, проверив ассемблерные инструкции и регистры процессора.

Инспектор объектов

Этот инструмент представляет из себя отдельное окно, где вы можете в период проектирования программы устанавливать значения свойств и событий объектов (Properties & Events).

Менеджер проектов.

Дает возможность разработчику просмотреть все модули в соответствующем проекте и снабжает удобным механизмом для управления проектами.

Менеджер проектов показывает имена файлов, время/дату выбранных форм и пр.

Можно немедленно попась в текст или форму, просто щелкнув мышкой на соответствующее имя.

Показывает библиотеку доступных объектов и осуществляет навигацию по вашему приложению. Можно посмотреть иерархию объектов, прекомпилированные модули в библиотеке, список глобальных имен вашего кода.

Дизайнер меню

Можно создавать меню, сохранить созданные в виде шаблонов и затем использовать в их в любом приложении.

Эксперты

Это набор инструментальных программ, облегчающих проектирование и настройку Ваших приложений.

Есть возможность подключать самостоятельно разработанные эксперты. Потенциально это та возможность, при помощи которой третьи фирмы могут расширять Delphi CASE-инструментами, разработанными специально для Delphi.

Включает в себя:

  • Эксперт форм, работающих с базами данных
  • Эксперт стилей и шаблонов приложений
  • Эксперт шаблонов форм

В состав RAD Pack входит эксперт для преобразования ресурсов, изготовленных в Borland Pascal 7.0, в формы Delphi. Уже появились эксперты, облегчающие построение DLL и даже написание собственных экспертов

Интерактивная обучающая система

Позволяет более полно освоить Delphi. Она являются не просто системой подсказок, а показывает возможности Delphi на самой среде разработчика.

Компоненты доступа к базам данных и визуализации данных

Библиотека объектов содержит набор визуальных компонент, значительно упрощающих разработку приложений для СУБД с архитектурой клиент-сервер. Объекты инкапсулируют в себя нижний уровень — Borland Database Engine.

Предусмотрены специальные наборы компонент, отвечающих за доступ к данным, и компонент, отображающих данные. Компоненты доступа к данным позволяют осуществлять соединения с БД, производить выборку, копирование данных, и т.п.

Компоненты визуализации данных позволяют отображать данные виде таблиц, полей, списков. Отображаемые данные могут быть текстового, графического или произвольного формата.

Разработка приложений БД

Delphi позволяет использовать библиотеку визуальных компонент для быстрого создания надежных приложений, которые легко расширяются до приложений с архитектурой клиент-сервер. Другими словами, Вы можете создать приложение, работающее с локальным сервером InterBase, а затем использовать созданное приложение, соединяясь с удаленным SQL-сервером через SQL-Links.

Библиотека объектных Визуальных Компонент

Компоненты, используемые при разработке в Delphi (и также собственно самим Delphi), встроены в среду разработки приложений и представляют из себя набор типов объектов, используемых в качестве фундамента при строительстве приложения.

Этот костяк называется Visual Component Library (VCL). В VCL есть такие стандартные элементы управления, как строки редактирования, статические элементы управления, строки редактирования со списками, списки объектов.

Еще имеются такие компоненты, которые ранее были доступны только в библиотеках третьих фирм: табличные элементы управления, закладки, многостраничные записные книжки.

VCL содержит специальный объект, предоставлющий интерфейс графических устройств Windows, и позволяющий разработчикам рисовать, не заботясь об обычных для программирования в среде Windows деталях.

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

Здесь следует отметить, что обычных ограничений, присущих средам визуальной разработки, в Delphi нет. Сам Delphi написан при помощи Delphi, что говорит об отсутствии таких ограничений.

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

Язык программирования Delphi базируется на Borland Object Pascal.

Кроме того, Delphi поддерживает такие низкоуровневые особенности, как подклассы элементов управления Windows, перекрытие цикла обработки сообщений Windows, использование встроенного ассемблера.

Формы, модули и метод разработки «Two-Way Tools»

Формы — это объекты, в которые вы помещаете другие объекты для создания пользовательского интерфейса вашего приложения. Модули состоят из кода, который реализует функционирование вашего приложения, обработчики событий для форм и их компонент.

Информация о формах хранится в двух типах файлов — .dfm и .pas, причем первый тип файла — двоичный — хранит образ формы и ее свойства, второй тип описывает функционирование обработчиков событий и поведение компонент. Оба файла автоматически синхронизируются Delphi, так что если добавить новую форму в ваш проект, связанный с ним файл .pas автоматически будет создан, и его имя будет добавлено в проект.

Такая синхронизация и делает Delphi two-way-инструментом, обеспечивая полное соответствие между кодом и визуальным представлением. Как только вы добавите новый объект или код, Delphi устанавливает т.н. «кодовую синхронизацию» между визуальными элементами и соответствующими им кодовыми представлениями.

Например, предположим, вы добавили описание поведения формы (соотв. обработчик событий), чтобы показывать окно сообщения по нажатию кнопки. Такое описание появляется, если дважды щелкнуть мышкой непосредственно на оъект Button в форме или дважды щелкнуть мышью на строчку OnClick на странице Events в Инспекторе объектов. В любом случае Delphi создаст процедуру или заголовок метода, куда вы можете добавить код.

Cоздавая этот код, Delphi автоматически формирует декларацию объекта TForm1, которая содержит процедуру ButtonClick, представляющую из себя собственно обработчик события.

Конечно вы запросто можете решить после получения этого кода, что автоматически созданные имена Вас не устраивают, и заменить их. Например, Button1 на Warning. Это можно сделать изменив свойство Name для Button1 при помощи Инспектора объектов. Как только вы нажмете Enter, Delphi автоматически произведет соответствующую синхронизацию в коде. Так как объект TForm1 существует в коде, вы свободно можете добавлять любые другие поля, процедуры, функции или object definition. К примеру, вы можете дописать в коде свою собственную процедуру, обрабатывающую событие, а не делать это визуальным методом.

Следующий пример показывает, как это можно сделать. Обработчик принимает аргумент типа TObject, который позволяет нам определить, если необходимо, кто инициировал событие. Это полезно в случае, когда несколько кнопок вызывают общую процедуру для обработки.

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

Добавление новых объектов

Delphi — это прежде всего среда разработки, базирующаяся на использовании компонент. Поэтому вы можете добавлять совершенно новые компоненты в палитру компонент. Вы можете создавать компоненты внутри Delphi, или вводить компоненты, созданные как управляющие элементы VBX или OLE 2.0, или же вы можете использовать компоненты, написанные на С или С++ в виде dll.

Последовательность введения новой компоненты состоит из трех шагов:

  • наследование из уже существующего типа компоненты
  • определение новых полей, свойств и методов
  • регистрация компоненты

Это все делается через меню Install Components

Добавление управляющих элементов VBX

Delphi генерирует объектное расширение VBX, которое инсталлируется в качестве компонент.

Например, если вы инсталлируете SaxComm VBX из Visual Solutions Pack компании Borland в Delphi, автоматически генерится тип объекта TComm, который наследуется из стандартного TVBXControl. Когда вы инсталлируете компоненты, Delphi будет компилировать и подлинковывать их к библиотеке компонент.

Делегирование: события программируются проще

Под делегированием понимается то, что некий объект может предоставить другому объекту отвечать на некоторые события.

Такая модель в некоторых случаях значительно упрощает программирование. Например, вместо того чтобы создавать подкласс для Windows controls при добавлении нового поведения, вы можете просто привязать процедуру обработки события, которая будет вызываться автоматически на каждый щелчок мышью пользователем или нажатие им клавиши. Аналогично вы можете написать процедуру определения допустимости таблицы, которая будет выполняться обработчиком события, когда транзакция начинается или завершается, записи вставляются, удаляются или изменяются.

К примеру, когда вы добавляете кнопку в форму и прикрепляете код, обрабатывающий нажатие, вы фактически используете делегирование кода для ассоциирования кода с событием OnClick. Такая ассоциация происходит для вас автоматически. Если проверить страницу Events в Инспекторе объектов для вашего приложения, можно увидеть ассоциированные с событиями процедуры.

Ссылки на классы

Ссылки на классы придают дополнительный уровень гибкости, так, когда вы хотите динамически создавать объекты, чьи типы могут быть известны только во время выполнения кода. К примеру, ссылки на классы используются при формировании пользователем документа из разного типа объектов, где пользователь набирает нужные объекты из меню или палитры. Собственно, эта технология использовалась и при построении Delphi.

Обработка исключительных ситуаций

Серьезные приложения должны надежным образом обрабатывать исключительные ситуации, сохранять, если возможно, выполнение программы или, если это невозможно, аккуратно ее завершать. Написание кода, обрабатывающего исключительные ситуации, всегда было непростой задачей, и являлось источником дополнительных ошибок.

В Delphi это устроено в стиле С++. Исключения представлены в виде объектов, содержащих специфическую информацию о соответствующей ошибке (тип и место- нахождение ошибки). Разработчик может оставить обработку ошибки, существо-вавшую по умолчанию, или написать свой собственный обработчик.

Обработка исключений реализована в виде exception-handling blocks (также еще называется protected blocks), которые устанавливаются ключевыми словами try и end. Существуют два типа таких блоков: try. except и try. finally.

Общая конструкция выглядит примерно так:

Конструкция try. finally предназначена для того, чтобы разработчик мог быть полностью уверен в том, что, что бы ни случилось, перед обработкой исключительной ситуации всегда будет выполнен некоторый код (например, освобождение ресурсов).

Немного о составе продукта

Документация.

  • Руководство пользователя
  • Руководство по написанию компонент
  • Построение приложений, работающих с базами данных
  • Руководство по генератору отчетов ReportSmith
  • Руководство по SQL Links

В составе Delphi входит 5 интерактивных обучающих систем, документация в электронном виде и около 10 Мб справочной информации.

Требования к аппаратным и программным средствам

  • Windows 3.1 и выше
  • 27 Mb дискового пространства для минимальной конфигурации
  • 50 Mb дискового пространства для нормальной конфигурации
  • процессор 80386, а лучше 80486
  • 6-8 Mb RAM

Заключение

В данной статье описаны возможности нового программного продукта компании Borland, а также некоторые особенности проектирования приложений с его помощью. В мире уже многие разработчики твердо ориентируются на использование Delphi как на инструмент, позволяющий создавать высокоэффективные клиент-серверные приложения. Более того, список готовых профессионально выполненных приложений настолько велик, что не позволяет полностью привести его в статье. Диапазон разработанных при помощи Delphi программных продуктов также поражает — от игровых программ до мощнейших банковских систем. Прошло всего полгода — и столько результатов. Delphi как продукт имеет версию 1.0, мы уже имеем сведения о том, что предполагается реализовать в следующей версии Delphi, и поскольку Delphi разрабатывается на Delphi, можем быть уверены, что разработка новой версии ведется действительно скоростными методами.

Илон Маск рекомендует:  Что такое код dbplus_open
Понравилась статья? Поделиться с друзьями:
Кодинг, CSS и SQL