Добрый день. Я делаю прогу, которая должна передавать параметры приложению при повторном запуске этого приложения.
Вот код из 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). Помогите советом, как это сделать.
Есть новые 
Нет новых [134435 +33][b:0][p:0.001]