Мастера DELPHI, Delphi programming community Рейтинг@Mail.ru Титульная страница Поиск, карта сайта Написать письмо 
| Новости |
Новости сайта
Поиск |
Поиск по лучшим сайтам о Delphi
FAQ |
Огромная база часто задаваемых вопросов и, конечно же, ответы к ним ;)
Статьи |
Подборка статей на самые разные темы. Все о DELPHI
Книги |
Новинки книжного рынка
Новости VCL
Обзор свежих компонент со всего мира, по-русски!
|
| Форумы
Здесь вы можете задать свой вопрос и наверняка получите ответ
| ЧАТ |
Место для общения :)
Орешник |
Коллекция курьезных вопросов из форумов
KOL и MCK |
KOL и MCK - Компактные программы на Delphi
 
По информации: Лэмпард и Насри не сыграют с ЦСКА.

Введение в технологию IntraWeb

Одной из новинок, появившихся в Delphi 7, являются компоненты IntraWeb от компании AToZed Software, позволяющие визуально проектировать Web серверные приложения.

Если у вас есть опыт написания GUI программ с использованием инструментальных средств быстрой разработки приложений компании Borland, тогда вы уже имеете основные навыки, которые вам понадобятся для начала разработки приложений с использованием IntraWeb. Основной метод проектирования пользовательского интерфейса для IntraWeb то же, что и для обычных GUI приложений: вы находите необходимые вам компоненты на палитре компонентов и размещаете их на форме. В отличие от модулей страниц WebSnap, внешний вид формы совпадает внешним видом страницы. Формы и компоненты IntraWeb отличны от их VCL и CLX аналогов, но они названы и размещены аналогично.

К примеру, допустим, вы хотите разместить на форме кнопку. В обычных VCL или CLX приложениях вы должны будете найти компонент Button на странице Standard палитры компонентов и разместить его на форме в соответствующем месте. В откомпилированном приложении кнопка появится там, где вы её разместили. В случае с IntraWeb приложением единственная разница заключается в том, что вы используете компонент IWButton со страницы IW Standard. Даже пиктограммы для этих двух различных компонентов выглядят почти одинаково. Единственное отличие в том, что в правом верхнем углу пиктограммы кнопки IntraWeb указано «IW».

Вот небольшой пример, призванный показать, как легко создавать IntraWeb приложения. Приложение, которое разрабатывается в этом примере, просит пользователя ввести какой-нибудь текст и показывает введённый текст в выскакивающем окне. Пример использует автономный режим (standalone mode), поэтому создаваемое приложение будет запускаться без Web-сервера.

Пример включает следующие шаги:

  1. Создание нового IntraWeb приложения.
  2. Редактирование главной формы.
  3. Написание обработчика события для кнопки.
  4. Запуск созданного приложения.

Создание нового IntraWeb приложения

Первым шагом в создании демонстрационной программы является создание нового IntraWeb проекта. Этот проект будет независимым (standalone) приложением, но он может быть легко конвертирован в формат ISAPI/NSAPI или Apache позже с помощью замену двух строчек кода. Для создания нового проекта:

  1. Используя внешние средства (например, Microsoft Windows Explorer), создайте папку «Привет» в вашей папке проектов. В этой папке будут храниться файлы проекта.
  2. В IDE Delphi выберите пункт меню File|New|Other. В появившемся диалоге New Items выберите закладку IntraWeb.

    Диалог New Items

  3. Выберите пункт Stand Alone Application и нажмите кнопку OK.
  4. Найдите созданную вами папку «Привет» в появившемся диалоговом окне. Произведите на ней двойной щелчок мышью и нажмите кнопку OK.

Вы только что создали своё IntraWeb приложение в папке «Привет». При этом все файлы с его исходными кодами были сохранены. Теперь вы можете приступить к редактированию главной формы для создания пользовательского Web-интерфейса вашего приложения.

Редактирование главной формы

  1. В IDE Delphi выберите пункт меню File|Open, затем выберите файл IWUnit1.pas и нажмите OK. В IDE появится окно главной формы, названное formMain.
  2. Кликните мышью по окну главной формы. В инспекторе объектов измените значение свойства Title на «Как тебя зовут?». Этот вопрос появится в строке названия Web-браузера, когда вы запустите приложение и увидите страницу, относящуюся к главной форме.
  3. Разместите на форме компонент IWLabel (найти его можно на странице IW Standard палитры компонентов). В инспекторе объектов измените значение свойства Caption на «Как тебя зовут?». Этот вопрос появится на форме.
  4. Разместите на форме компонент IWEdit под компонентом IWLabel. Используйте инспектор объектов для того, чтобы произвести следующие изменения:
    • Удалите значение свойства Text.
    • Измените значение свойства Name на «editName».
  5. Разместите на форме компонент IWButton под компонентом IWEdit. Измените значение его свойства Caption на «OK».

Ваша форма должна выглядеть подобно этой:

formMain

Возможно, вы захотите сохранить все свои файлы прежде чем продолжить.

Написание обработчика события для кнопки

Пока в ответ на нажатие пользователем кнопки OK форма не выполняет никаких действий. Теперь мы напишем обработчик события, который выводит приветствие, когда пользователь нажимает OK.

  1. Произведите по кнопке OK двойной щелчок мышью. В окне редактора кода будет создан пустой обработчик события, похожий на представленный ниже:
    procedure TformMain.IWButton1Click(Sender: TObject);
    begin
    
    end;
    
  2. Используя редактор, допишите в него код так, чтобы обработчик события выглядел следующим образом:
    procedure TformMain.IWButton1Click(Sender: TObject);
    var s: String;
    begin
    	s := editName.Text;
    	if Length(s) = 0 then
    		WebApplication.ShowMessage('Пожалуйста, введите своё имя! ')
    	else
    	begin
    		WebApplication.ShowMessage('Привет, ' + s +'!');
    		editName.Text := '';
    	end;
    end;
    

Запуск созданного приложения

Теперь мы можем запустить и протестировать созданное приложение.

  1. В IDE Delphi выберите пункт меню Run|Run (F9). Появится сервер приложений IntraWeb, показанный ниже.

    Сервер приложений IntraWeb

  2. В сервере приложений IntraWeb выберите пункт меню Run|Execute (F9). Ваше Web серверное приложение появится в окне вашего Web-браузера, установленного по умолчанию. К примеру, вот результаты в окне Web-браузера Internet Explorer:

    Результаты в окне Web-браузера

  3. Допустим, вас зовут Альберт. Напечатайте Альберт в текстовом поле и нажмите кнопку OK. Появится модальное диалоговое окно:

    Привет, Альберт!

Мы завершили процесс создания простого IntraWeb приложения, используя только формы и код на языке Delphi. Когда вы окончите работу со своим приложением, вы можете завершить его работу, закрыв окно Web-браузера, а затем закрыв сервер приложений IntraWeb.

   Внимание! Запрещается перепечатка данной статьи или ее части без согласования с автором. Если вы хотите разместить эту статью на своем сайте или издать в печатном виде, свяжитесь с автором.
Автор статьи:  Товмасян Альберт
Сайт автора: http://www.albert3000.narod.ru/
  

Другие статьи Наверх


  Рейтинг@Mail.ru     Титульная страница Поиск, карта сайта Написать письмо