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

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

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

Как послать другому приложению строку? [D7, WinXP]

Aleksandr © (2003-12-26 18:46:00)

Попытался сделать так (при запуске программы):

var
P : PChar;
begin
h:=FindWindow("TMainForm","MainFormCaption");
if h<>0 then begin
P:=StrNew(PChar(ParamStr(1)));
SendMessage(H,UM_OpenNewFile,0,Integer(P))
end
else begin
Application.Initialize;
Application.Title:="MainFormCaption";
...
end
end;

и, соответственно, в WndProc TMainForm:

var
s : string;
P : PChar;
begin
if Message.Msg=UM_OpenNewFile then begin
P:=PChar(Message.LParam);
s:=P;
StrDispose(P);
Application.BringToFront;
DataFileName:=s
end
else
inherited
end;

И сразу обнаружились две проблемы. Первая - в первую очередь FindWindow находит дельфийской окно, и как его не закрывай, его хэндл остается. Вторая - при обработке полученного сообщения возникает Invalid pointer operation либо Range Check Error (что точно и для какого случая - непонятно по первой причине). Вот и возникает вопрос, как правильно передать энту строку?

Aleksandr (2003-12-26 18:57:00) [1]

2 DVM :
Сам удивляюсь. Однако вот пока программу запускаешь из Делфи, то второй экземляр, который с коммандной строки, посылает сообщения куда-то в молоко. А если прикрываешь Делфи и оба запускаешь с командной строки, то второе получает сообщение от первого.

А за подсказку спасибо... Когда не знал, да истчо забыл, то пора увольняться :))

DVM (2003-12-26 18:56:00) [2]

Нельзя строку просто так отправить другому приложению, указав адрес строки в lParam сообщения (исключение WM_SETTEXT). Строка в одном адресном пространстве, а прочитать ее пробуют в другом. Естесственно будут ошибки.
Используй WM_COPYDATA и будет тебе счастье:)

Aleksandr (2003-12-26 18:52:00) [3]

Да, с Range Check Error разобрался - он происходит от того, что происходит Invalid pointer operation (строка пустая становится).

DVM (2003-12-26 18:50:00) [4]

WM_COPYDATA

> и как его не закрывай, его хэндл остается.

интересно, как это:)

Наверх

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