Envoyer un message à un processus de Windows (et pas de ses de la fenêtre principale)

Voici comment j'ai fait:

using System;
using System.Runtime.InteropServices;
using System.Threading;
using System.Windows.Forms;
public partial class MainForm : Form
{
#region Dll Imports
private const int HWND_BROADCAST = 0xFFFF;
private static readonly int WM_MY_MSG = RegisterWindowMessage( "WM_MY_MSG" );
[DllImport( "user32" )]
private static extern bool PostMessage(IntPtr hwnd, int msg, IntPtr wparam, IntPtr lparam);
[DllImport( "user32" )]
private static extern int RegisterWindowMessage(string message);
#endregion Dll Imports
static Mutex _single = new Mutex(true, "{4EABFF23-A35E-F0AB-3189-C81203BCAFF1}");
[STAThread]
static void Main()
{
//See if an instance is already running...
if (_single.WaitOne(TimeSpan.Zero, true)) {
//No...start up normally.
Application.EnableVisualStyles();
Application.SetCompatibleTextRenderingDefault(false);
try {
Application.Run(new MainForm());
} catch (Exception ex) {
//handle exception accordingly
} finally {
_single.ReleaseMutex();
}
} else {
//Yes...Bring existing instance to top and activate it.
PostMessage(
(IntPtr) HWND_BROADCAST,
WM_MY_MSG,
new IntPtr(0xCDCD),
new IntPtr(0xEFEF));
}
}
protected override void WndProc(ref Message m)
{
if (m.Msg == WM_MY_MSG) {
if ((m.WParam.ToInt32() == 0xCDCD) && (m.LParam.ToInt32() == 0xEFEF)) {
if (WindowState == FormWindowState.Minimized) {
WindowState = FormWindowState.Normal;
}
//Bring window to front.
bool temp = TopMost;
TopMost = true;
TopMost = temp;
//Set focus to the window.
Activate();
}
} else {
base.WndProc(ref m);
}
}
}

J'espère que j'ai transcrit ce correctement. J'ai dû laisser de côté beaucoup d'autres choses, mais je crois que j'ai de ce qui est nécessaire. Ce que j'ai fonctionne pour moi sans échec. Si vous avez un problème, faites le moi savoir, et je vais voir ce que j'ai manqué.

OriginalL'auteur Matt Davis

Les Tubes nommés peut être utilisé pour cela. Il pourrait être plus acceptable .net.Vous pouvez définir un service dans l'application principale qui accepte un message à partir de l'application appelante. Voici un échantillon de ce service, en vb. Il demande l'application principale et passe une chaîne de caractères, dans ce cas, un nom de fichier. Il a également retourne une chaîne de caractères, mais tous les paramètres peuvent être utilisés ici.

Public Class PicLoadService : Implements IMainAppPicLoad
Public Function LoadPic(ByVal fName As String) As String Implements IMainAppPicLoad.LoadPic
' do some stuff here.
LoadPic = "return string"
End Function
End Class

Le programme d'installation de l'application appelante est un peu plus impliqué. L'appelant et de l'application principale peut être la même application.

Imports System.Diagnostics
Imports System.ServiceModel
Imports System.IO
Imports vb = Microsoft.VisualBasic
Module MainAppLoader
Sub Main()
Dim epAddress As EndpointAddress
Dim Client As picClient
Dim s As String
Dim loadFile As String
Dim procs() As Process
Dim processName As String = "MainApp"
loadFile = "" ' filename to load
procs = Process.GetProcessesByName(processName)
If UBound(procs) >= 0 Then
epAddress = New EndpointAddress("net.pipe://localhost/MainAppPicLoad")
Client = New picClient(New NetNamedPipeBinding, epAddress)
s = Client.LoadPic(loadFile)
End If
End Sub
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "3.0.0.0")> _
Partial Public Class picClient
Inherits System.ServiceModel.ClientBase(Of IMainAppPicLoad)
Implements IMainAppPicLoad
Public Sub New(ByVal binding As System.ServiceModel.Channels.Binding, ByVal remoteAddress As System.ServiceModel.EndpointAddress)
MyBase.New(binding, remoteAddress)
End Sub
Public Function LoadPic(ByVal fName As String) As String Implements IMainAppPicLoad.LoadPic
Return MyBase.Channel.LoadPic(fName)
End Function
End Class
' from here down was auto generated by svcutil.
' svcutil.exe /language:vb /out:generatedProxy.vb /config:app.config http://localhost:8000/MainAppPicLoad
' Some has been simplified after auto code generation.
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "3.0.0.0"), _
System.ServiceModel.ServiceContractAttribute(ConfigurationName:="IMainAppPicLoad")> _
Public Interface IMainAppPicLoad
<System.ServiceModel.OperationContractAttribute(Action:="http://tempuri.org/IMainAppPicLoad/LoadPic", ReplyAction:="http://tempuri.org/IMainAppPicLoad/LoadPicResponse")> _
Function LoadPic(ByVal fName As String) As String
End Interface
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "3.0.0.0")> _
Public Interface IMainAppPicLoadChannel
Inherits IMainAppPicLoad, System.ServiceModel.IClientChannel
End Interface
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "3.0.0.0")> _
Partial Public Class IMainAppPicLoadClient
Inherits System.ServiceModel.ClientBase(Of IMainAppPicLoad)
Implements IMainAppPicLoad
Public Sub New(ByVal binding As System.ServiceModel.Channels.Binding, ByVal remoteAddress As System.ServiceModel.EndpointAddress)
MyBase.New(binding, remoteAddress)
End Sub
Public Function LoadPic(ByVal fName As String) As String Implements IMainAppPicLoad.LoadPic
Return MyBase.Channel.LoadPic(fName)
End Function
End Class
End Module
<ServiceContract()> Public Interface IMainAppPicLoad
<OperationContract()> Function LoadPic(ByVal fName As String) As String
End Interface

OriginalL'auteur xpda