Передача данных между MDI окнами

Posted by obzor under Delphi

Пишу MDI приложение (Delphi7).
Подскажите, как реализовать передачу, допустим строки, из одного child окна другому child. Как, например, это реализовано в 1С. Открыл счёт, из него открыл справочник «Контрагенты», выбрал покупателя и отправил в счёт, в нужное поле.

Аватар

Отправляй непосредственно нужной форме и нужному обработчику

const sdCM_MYMESSAGE1 = WM_USER+1;

в форме А:

type
  TFMyFormA = class(TForm)
    ..
    procedure MyMessage1(var Msg: TMessage); message sdCM_MYMESSAGE1;
..
implementation

procedure TFMyFormA.MyMessage1(var Msg: TMessage);
begin
..
end;

В форме Б (в 3-ем и 4-ом параметре чего-то)

PostMessage(xHandle,sdCM_MYMESSAGE1,0,0);

тема на форуме

Случайные статьи

• Сообщение при закрытии программы в CloseQuery
• ЭЦП Эль-Гамаля
• Удаление из строки не разрешённых символов
• Сохранение web-страницы с картинками. Delphi.
• Рассылка. Выпуск 239
• Как можно передать значение id в модальное окно, при клике на ссылку
• Чтение данных с COM порта 232
• Раздельное сворачивание форм
• Рамка для Image
• Найти те даты, когда день рождения попадает на тот же день