VPF::Как связать две проги ? - Форум программистов

Radon

Дата 12.10.2005, 14:35 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 36
Регистрация: 11.10.2005

Репутация: нет
Всего: нет

Как мне связать свою прогу с другой ?

Пример когда запускается «Подключение к Интернету» запускается и моя программка
smile

_hunter

Дата 12.10.2005, 14:57 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 15
Всего: 98

это, AFIK, не пограмма, а часть проводника => никак ( хотя вполне возможно есть какой-то COM-интерфейс )

--------------------

Tempora mutantur, et nos mutamur in illis...

SoWa

Дата 12.10.2005, 18:37 (ссылка)

(нет голосов)

Загрузка ...

Харекришна

Профиль
Группа: Комодератор
Сообщений: 2422
Регистрация: 18.10.2004

Репутация: 2
Всего: 74

Можно сокетами, можно специальными компонентами DDE.

Можно попробовать воспользоваться механизмом отправки сообщений всем программам в системе. Реализуется это так:

Код

Код


// клиент
var
msg: DWORD;

const
messg = 'MEIN_MESSAGE';

InitCommonControls();
msg:= RegisterWindowMessage(messg);

// посылаем вообщение
SendMessage(HWND_BROADCAST, msg, data, 0);
    

Код    

// сервер
var
msg: DWORD;

const
messg = 'MEIN_MESSAGE';

InitCommonControls();
msg:= RegisterWindowMessage(messg);

// прием сообщения реализуем в оконной функции WindowProc
function WindowProc(hWnd: HWND; uMsg: UINT; wParam: WPARAM; lParam: LPARAM): LRESULT; stdcall;
begin
case uMsg of:
mesg: 
begin
wsprintf(buff, "Data = %d", wParam);
MessageBox(hWnd, buff, nil, 0);
end;

Это сообщение отредактировал(а) SoWa - 12.10.2005, 18:42

--------------------

Всем добра smile

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »