Программирование - это просто
Advertisement
Главная arrow Уроки программирования arrow Пишем на Delphi с применением COM-технологий arrow Программирование COM в Delphi. Урок 7. Пример обмена данными через DDE. Продолжение.
29.05.2024 г.
Главное меню
Главная
Интернет магазин
Программные продукты
Биржевые роботы
Искусственный интеллект
Математика и информатика
1С:Предприятие
Уроки C#
Уроки Delphi
Уроки программирования
Web-программирование
Дизайн и графика
Компьютер для блондинок
Исходники
Статьи
Платный раздел
Рассказы про компьютеры
Хитрости и секреты
Системный подход
Размышления
Наука для чайников
Друзья сайта
Excel-это не сложно
Все о финансах
.
Программирование COM в Delphi. Урок 7. Пример обмена данными через DDE. Продолжение. Печать E-mail
Автор megabax   
30.01.2012 г.
New Page 1

Программирование COM в Delphi. Урок 7. Пример обмена данными через DDE. Продолжение.

Исходники к уроку можно скачать здесь.

На прошлом уроке  мы написали простой пример взаимодействия по DDE - программа клиент получала данные от программы сервер. Сегодня мы рассмотри обратное взаимодействие - клиент будет посылать макрокоманду на сервер. И так, для начала переделаем сервер. Нам надо добавить всего один обработчики события содержащий всего одну строку (см. исходники прошлого урока). Это обработчик OnExecuteMacro компонента TDDEServerConv:

procedure TfrmDDEServer.DdeServerExecuteMacro(Sender: TObject; Msg: TStrings);

begin

    ScrollBar.Max:=StrToInt(msg[0]);

end;

И так, компилируем сервер и переходим к клиенту. Добавляем туда поле ввода и кнопочку "Применить"*:

Программирование COM в Delphi. Урок 7. Пример обмена данными через DDE. Продолжение.

Пишем обработчик кнопочки (поле ввода у нас названо edMax):

procedure TfrmDDEClient.btnApplyClick(Sender: TObject);

var s:string;

    str:TStringList;

begin

    s:=edMax.Text;

    try

      ProgressBar.Max:=StrToInt(s);

    except

      exit;

    end;

    str:=TStringList.Create;

    str.Add(s);

    DDEClientConv.ExecuteMacroLines(str,false)

end;

И все, теперь мы можем из клиента задать диапазон скроллера на сервере*:

Программирование COM в Delphi. Урок 7. Пример обмена данными через DDE. Продолжение.

Исходники к уроку можно скачать здесь..

(C) Шуравин Александр 

 


Скриншоты, помеченные знаком* , являются цитатами и иллюстрациями  программного продукта "Turbo Delphi", авторское право на который принадлежит фирме "Borland Delphi".


 

Последнее обновление ( 12.09.2013 г. )
 
Пред. »
 
© 2024 Программирование - это просто
Joomla! - свободное программное обеспечение, распространяемое по лицензии GNU/GPL.
Русская локализация © 2005-2008 Joom.Ru - Русский Дом Joomla!
Design by Mamboteam.com | Powered by Mambobanner.de
Я принимаю Яндекс.Деньги