Dann wäre wohl das am Ende der
Unit am sinnvollsten:
Delphi-Quellcode:
initialization
OleInitialize(nil);
finalization
OleUninitialize;
// EDIT:
Helfen tut das bei mir allerdings nichts. Es geht nach wie vor nicht.
Wobei ich ja geschrieben habe, dass es nicht funktioniert, wenn man das wie hier von Dir vorgeschlagen macht (was ich ja normalerweise auch so machen würde). Bei mir klappt es nur, wenn ich OleInitialize direkt am Anfang der Prozedur aufrufe.