Доброе время суток,

Может кто либо сталкивался с подобной связкой?
В инете не удалось найти ничего подходящего :(

==========================================
var
Xara: Variant;
begin
Xara := CreateOleObject('XaraX.Document');
try
...
открыть документ, вставить текст и рисунок.
...
finally
Xara := Unassigned;
end;
==========================================

P.S. CorelDraw - не предлагать :)