UPD: Send params to first copy

This commit is contained in:
Alexander Koblov 2011-02-15 16:06:58 +00:00
commit df95a24667

View file

@ -248,7 +248,7 @@ begin
UniqueInstance:= TUniqueInstance.Create(aInstanceName);
if UniqueInstance.IsRunInstance then
begin
UniqueInstance.SendString('ShowMainForm');
UniqueInstance.SendParams;
Exit(False);
end;
UniqueInstance.RunListen;
@ -266,4 +266,4 @@ finalization
FreeAndNil(UniqueInstance);
end;
end.