Обмен данными между приложениями [D7, WinXP]
Zalum © (2009-05-04 13:37:00)
Добрый день. Я делаю прогу, которая должна передавать
параметры приложению при повторном запуске этого приложения.
Вот код из dpr файла
with ParamCmd do
begin
dwData := 0;
cbdata:=strlen(pchar(paramstr(1)))+1;
lpData:=pchar(paramstr(1));
end;
SendMessage(HForm, WM_COPYDATA, application.Handle,
Integer(@ParamCmd));
вот код из главного unita:
procedure TForm1.Getmessage(var msg: TWMCopyData);
var
s:String;
begin
S:=PChar(Msg.CopyDataStruct.lpData);
label7.Caption := s;
end;
Но так передается один параметр paramstr(1), а мне нужно
сразу передавать и принимать 2 параметра paramstr(1) и paramstr(2).
Помогите советом, как это сделать.
Сергей М. (2009-05-04 13:49:00) [1]
Повтори все тоже самое для paramstr(2)
Наверх 
ЧАТ |
Орешник |
|
