Ня сервера додатків і реєстрація його як windowsservice, digital-flame

Як створити додаток на DataSnap (простий приклад)?

Отже по кроках ... У головному меню Delphi (у мене XE7), File | New | Other

Ня сервера додатків і реєстрація його як windowsservice, digital-flame

Вибираємо тип програми (я вибрав "Service Application", тому що мені потрібно, щоб програма-сервер працювала більш-менш постійно)

Ня сервера додатків і реєстрація його як windowsservice, digital-flame

Далі вибір VCL або FireMonkey (я вибрав VCL)

Ня сервера додатків і реєстрація його як windowsservice, digital-flame

Далі, потрібно вибрати протоколи, аутентифікацію і ін. Я вибрав TCP / IP HTTP і Authentification Authorization

Ня сервера додатків і реєстрація його як windowsservice, digital-flame

Далі, вибираємо порти і тестуємо їх ...

Ня сервера додатків і реєстрація його як windowsservice, digital-flame

Далі вибираємо клас для методів сервера. Я вибрав TDSServerModule для полегшення динамічних викликів методів сервера.

Ня сервера додатків і реєстрація його як windowsservice, digital-flame

Після натискання кнопки Finish отримуємо 3 вкладки - модуль методів, модуль контейнера, і головний проект - Project1 ...

Ня сервера додатків і реєстрація його як windowsservice, digital-flame

Збережемо все в окремий каталог на диску ...

Ня сервера додатків і реєстрація його як windowsservice, digital-flame

Якщо Ви вивчіть код методів сервера, то побачите там 2 тестові функції ... - пізніше вони нам стануть в нагоді. Одна з них повертає рядок, інша перевертає.

Схожі статті