Передача данных между 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);

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

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

• Изменение обоев с помощью delphi
• Изменение курсора
• Изменение цвета шрифта надписи в ListBox
• Как постранично расположить текст в RTF файле?
• Рассылка. Выпуск 240
• Перевод английских символов в русские
• Копирование кнопки макросом и присвоение новой кнопке своего имени
• Как узнать число открытых соединений?
• Несколько USB-модемов одновременно
• Запуск exe-файла с переменными параметрами