OleContainer - Datei kann nicht geöffnet werden

[Susanne]

Ich möchte hier eine Datei öffnen. Nun schlägt aus welchen Gründen auch immer die Funktion

OleContainer1.CreateObjectFromFile(Dateiname ,False); fehlt. Aber wenn ich dann das Fenster schliessen will, bekomme ich folgende Meldung:

Operation mit leeren OleContainer nicht zulässig Das ist das, was ich bisher habe. Was muss ich verändern, damit ich das Fenster auch wieder schliessen kann?

Delphi-Quellcode:

  if Dateiname <> '' then
    try
      ShowMessage('Word: '+ Dateiname );
      OleContainer1.CreateObjectFromFile(Dateiname ,False);
      OleContainer1.SetFocus;
    except
      ShowMessage('Konnte Dokument nicht öffnen');
      exit;
    end
  else
    OleContainer1.SetFocus;

[jsheyer]

Hallo,

ich vermute das im OleContainer AutoActivate auf "SetFocus" eingestellt ist. Wenn nun das Öffnen über File fehlgeschlägt kommt bei Dir ein OleContainer1.SetFocus, der dann auch fehlgeschlägt.
Setze in dem Fall AutoActivate auf Manuell oder Doppelclick.

Jörg Heyer