Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Скачиваний:
33
Добавлен:
02.05.2014
Размер:
134.66 Кб
Скачать

Система автономных форм для обучения и контроля знаний Добавление форм в проект

File, New Form – включить в проект новую форму.

Затем перейти в окно редактора кода формы и File, Save As.

Visible – True

a) Добавить в Unit1.pas

implementation

uses unit2;

{$R *.DFM}

b) Написать процедуру для кнопки

procedure TForm1.Button21Click(Sender: TObject);

begin

Form2:=TForm2.Create(Self);

Form2.Visible:=true;

end;

begin

Form2:=TForm2.Create(Application);

Form2.Visible:=true;

end;

с) Добавить в проект программный модуль 2 формы

Project, Add to Project, Unit2.pas

Project, Options

Перевести из Auto-Create Forms в Available Forms

Все формы создаются автоматически при запуске приложения и 1 – главная.

Project, Options, Forms

Main Forms – главная форма.

Auto-create Forms – автом. созд.формы.

Available Forms – доступные формы.

Project, View Soure – посмотреть проект.

Для Available Forms автоматически создается код:

Application.CreateForm(TForm2,Form2);

Возникает событие OnCreate для настройки параметров форм.

Show или ShowModal делают форму видимой.

Возникает событие On Show.

Методом Hide форму можно сделать невидимой.

Возникает событие OnHide.

Поле вывода Интернет-страниц

для электронного учебника

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

Internet, WebBrowser

type

WebBrowser1: TWebBrowser;

WebBrowser1.Navigate('D:\Teach7.app\d5.htm');

23

Соседние файлы в папке Visual Basic