Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Сообщения. Не знаю как подступиться. [D5, Win95/98]

Страницы: < 1 2
NewDelpher © (2004-10-15 09:17:00)
Есть приложение в котором штук 50 объектов, наследованных от одного класса. Есть объект, который должен через определенные промежутки времени послылать всем этим объектам сообщение. А они, получив его, производят какие-нибудь действия.
Вот я и не знаю с чего начать? И как организовать такой обмен? Какие есть в Delphi инструменты?

Леван (2004-10-15 10:10:00) [21]
V CIKLE
SENDMESSAGE(TYOUROBJECT(TSTRINGLIST1.OBJECTS[I]).HANDLE, SOBSTVENNO SOOBSHENIE,PARAMETRI)

NewDelpher (2004-10-15 10:00:00) [22]

> R © (15.10.04 09:57) [8]
> Вот пример класса обрабатывающего собственное сообщение.
> unit CustomEdit1

и за это спасибо. Буду разбираться.

R (2004-10-15 09:57:00) [23]
Вот пример класса обрабатывающего собственное сообщение.
unit CustomEdit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;

const
MM_Beep={от}WM_User+100{до $7FFFF-диапазон собственных};
type
TCustomEdit1 = class(TCustomEdit)

private
{ Private declarations }
protected
{ Protected declarations }
public
{ Public declarations }
procedure MM_Message0(var Mes:TMessage);message MM_Beep ;
published
{ Published declarations }
end;

procedure Register;

implementation

procedure TCustomEdit1.MM_Message0(var Mes:TMessage);
begin
Beep;
Self.Text:='Mess MM_Beep'
end;

procedure Register;
begin
RegisterComponents('Samples', [TCustomEdit1]);
end;

end.

Использование в приложении
procedure TForm1.Button1Click(Sender: TObject);
begin
SendMessage(CustomEdit11.Handle,MM_Beep,0,0);
end;

А ссылки у меня нет надо искать в литературе

NewDelpher (2004-10-15 09:49:00) [24]

> R © (15.10.04 09:39) [6]
> Ну и в чем проблемма. По моему о собственых сообщениях инфа
> имеется в литературе. Да и они особо и не отличаются по
> обработке
> от сообщений Win за исключением диапазона.

Поделись ссылками, а? :)

> KSergey © (15.10.04 09:35) [5]
> > [3] NewDelpher © (15.10.04 09:24)
> > нет, такой вариант не годится.
>
> Отчего же??

Надо, чтобы синхоронно всё было.

R (2004-10-15 09:39:00) [25]
Ну и в чем проблемма. По моему о собственых сообщениях инфа
имеется в литературе. Да и они особо и не отличаются по обработке
от сообщений Win за исключением диапазона.

KSergey (2004-10-15 09:35:00) [26]
> [3] NewDelpher © (15.10.04 09:24)
> нет, такой вариант не годится.

Отчего же??

NewDelpher (2004-10-15 09:25:00) [27]

> А сообщения - именно натуральные сообщения

да

NewDelpher (2004-10-15 09:24:00) [28]

> KSergey © (15.10.04 09:21) [1]
> Массив ссылок на все объекты (тип - базовый класс). И в
> цикле пробегаемся - вот и все.

нет, такой вариант не годится.

KSergey (2004-10-15 09:22:00) [29]
А сообщения - именно натуральные сообщения или можно просто вызов некоего метода? Тогда заводим в базовом классе виртуальный абстрактный метод, в потомках - перкрываем, а дальше - тот же цикл с вызовом метода.

KSergey (2004-10-15 09:21:00) [30]
Массив ссылок на все объекты (тип - базовый класс). И в цикле пробегаемся - вот и все.

Страницы: < 1 2

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »