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;