[ecfisa]

Hola Waldo.

Una opción es usar la estructura de windows COPYDATASTRUCT, enviando y capturando el mensaje WM_COPYDATA.

Te pongo un ejemplo bién simple que despliega y pliega un ComboBox situado en el receptor, de acuerdo a dos botones ubicados en el emisor:

Aplicación A (emisor)

Código Delphi [-]
...
type
  TfrSender = class(TForm)
    btnAbrir: TButton;
    btnCerrar: TButton;
    procedure btnAbrirClick(Sender: TObject);
    procedure btnCerrarClick(Sender: TObject);
  private
    procedure SendMsgToReceiver(WndTitle: PChar; Msg: String);
  public
  end;
...

implementation

procedure TfrSender.SendMsgToReceiver(WndTitle: PChar; Msg: string);
var
  HW  : HWND;
  cds : TCopyDataStruct;
begin
  HW := FindWindow(nil, PChar(WndTitle));
  try
    cds.dwData := 0;
    cds.cbData := Length(Msg)+1;
    cds.lpData := PChar(Msg);
    SendMessage(HW, WM_COPYDATA, Integer(Handle), Integer(@cds));
  finally
    CloseHandle(HW)
  end;
end;

procedure TfrSender.btnAbrirClick(Sender: TObject);
begin
  SendMsgToReceiver('frReceiver','Abrir');
end;

procedure TfrSender.btnCerrarClick(Sender: TObject);
begin
  SendMsgToReceiver('frReceiver','Cerrar');
end;

Aplicacion B (receptor)

Código Delphi [-]
...
type
  TfrReciber = class(TForm)
    ComboBox1: TComboBox;
  private
    procedure WMGetData(var Msg: TWMCopyData); message WM_COPYDATA;
  public
  end;
...

implementation

procedure TfrReciber.WMGetData(var Msg: TWMCopyData);
var
  RE: string;
begin
  RE:= Pchar(Msg.CopyDataStruct.lpData);
  if RE = 'Abrir' then
      ComboBox1.Perform(CB_SHOWDROPDOWN, 1, 0);
  if RE = 'Cerrar' then
      ComboBox1.Perform(CB_SHOWDROPDOWN, 0, 0);
end;

También te adjunto los fuentes de ambos para que puedas probarlo.

Saludos.