Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
YaPVUTS.doc
Скачиваний:
31
Добавлен:
11.04.2015
Размер:
3.15 Mб
Скачать
    1. Первое приложение на Delphi

Рассмотрим процесс построения простейшего приложения, которое работает следующим образом. При нажатии кнопки появляется сообщение «Здравствуй, мир!».

Порядок действий:

  1. Запустите Delphi. (Пуск/ Программы/Borland Delphi 5) При этом автоматически открывается новый проект для оконного приложения с одной главной формой и модулем, соответствующим этой форме.

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

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

type

TForm1 = class(TForm)

Button1: TButton;

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

implementation

{$R *.DFM}

end.

  1. Для того, чтобы при нажатии на кнопку происходили какие-либо действия нужно написать обработчик события Button1Click. Для этого выберите на форме Button1 и щелкните на него дважды. Вы окажетесь в окне редактирования.

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

procedure TForm1.Button1Click(Sender: TObject);

begin

ShowMessage(‘Здравствуй, мир!');

end;

  1. Сохраните Приложение, выбрав пункт в главном меню File -> Save All. Название проекта и название программного модуля не должно совпадать! Рекомендуется создать отдельную директорию для файлов проекта.

  2. Запустите на выполнение ваше Приложение. Для этого выберете в главном меню пункт Run->Run, или нажмите клавишу F9.

Рисунок 3 Работа приложения

  1. Изменим в Инспекторе объектов у кнопки свойство Caption на Привет. При этом изменится надпись на кнопке.

  2. Если изменим у кнопки свойство Name на MyButton, то текст модуля также изменится

TForm1 = class(TForm)

MyButton: TButton;

procedure MyButtonClick(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

Текст файла проекта при этом будет выглядеть так.

program Project1;

uses

Forms,

Unit1 in 'Unit1.pas' {Form1};

{$R *.RES}

begin

Application.Initialize;

Application.CreateForm(TForm1, Form1);

Application.Run;

end.

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

    1. Контрольные вопросы

  1. Назовите основные составляющие среды DELPHI и их назначение.

  2. Назовите состав и назначение пунктов главного меню системы.

  3. Каково назначение Инспектора объектов?

  4. Из каких основных файлов состоит проект приложения?

  5. Как производится размещение, перемещение, изменение размеров компонентов на форме?

  6. Как запустить приложение на выполнение из среды DELPHI?

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]