CreateOleObject verborgen ausführen?

[FriFra]

Ich hab jetzt einen Workaround gefunden:

Delphi-Quellcode:

      { läuft Notes schon? }
      hNotes := FindWindow(nil, 'Lotus Notes');
      { Notessession erzeugen }
      Session := CreateOleObject('Notes.NotesSession');
      { Wenn Notes bereits lief, Handle zurücksetzten, ansonsten zuweisen }
      if hNotes > 0 then
        hNotes := 0
      else
        hNotes := FindWindow(nil, 'Lotus Notes');

    ... übriger Code ...

    { Wenn Notes extra neu gestartet wure muss es nun beendet werden }
    if hNotes > 0 then
      SendMessage(hNotes, WM_SYSCOMMAND, SC_CLOSE, 0);

Man sieht allerdings das Programmfenster mal kurz in der Startleiste Aufblinken...