Hallo an Alle,
ich habe mit:
OleContainer1.CreateObject('Word.Document',false);
OleContainer1.CreateObjectFromFile('namederdatei.d oc, false);
OleContainer1.Run;
OleContainer1.DoVerb(ovPrimary);
OleContainer1.DoVerb(ovShow);
eine Word-Datei geöffnet und will sie nun seitenweise in eine Access-Datei speichern.
Meine Frage ist nun: wie markiere ich die einzelnen Seiten, um sie dann seitenweise mit; z.B.
OleContainer1.SaveAsDocument('Seite1.doc');
zu speichern.
Und wie kann ich Sie als OLE-Objekt in eine Access-Datei speichern, so das sie per Ole-Server angezeigt werden kann.
Der Weg über:
procedure WriteDocData
var
OutData : TStream;
begin
try
ADOTable.Edit;
OutData := ADOTable.CreateBlobStream(ADOTable.FieldByName('WO RDText'), bmReadWrite);
OLEContainer1.SaveToStream(OutData);
ADOTable.Post;
finally
OutData.Free;
end;
end;
schreibt den OLEContainer in das Datenbankfeld, dieses wird aber nicht als OLE-Objekt erkannt.
Das Kopieren der Word-Seite in die Zwischenablage, mit anschließendem Einfügen in das Datenbankfeld, funktioniert problemlos. Lässt sich dieser Weg ggf. auch automatisieren?
Danke für die Hilfe.
mfg
Stefan
ich habe mit:
OleContainer1.CreateObject('Word.Document',false);
OleContainer1.CreateObjectFromFile('namederdatei.d oc, false);
OleContainer1.Run;
OleContainer1.DoVerb(ovPrimary);
OleContainer1.DoVerb(ovShow);
eine Word-Datei geöffnet und will sie nun seitenweise in eine Access-Datei speichern.
Meine Frage ist nun: wie markiere ich die einzelnen Seiten, um sie dann seitenweise mit; z.B.
OleContainer1.SaveAsDocument('Seite1.doc');
zu speichern.
Und wie kann ich Sie als OLE-Objekt in eine Access-Datei speichern, so das sie per Ole-Server angezeigt werden kann.
Der Weg über:
procedure WriteDocData
var
OutData : TStream;
begin
try
ADOTable.Edit;
OutData := ADOTable.CreateBlobStream(ADOTable.FieldByName('WO RDText'), bmReadWrite);
OLEContainer1.SaveToStream(OutData);
ADOTable.Post;
finally
OutData.Free;
end;
end;
schreibt den OLEContainer in das Datenbankfeld, dieses wird aber nicht als OLE-Objekt erkannt.
Das Kopieren der Word-Seite in die Zwischenablage, mit anschließendem Einfügen in das Datenbankfeld, funktioniert problemlos. Lässt sich dieser Weg ggf. auch automatisieren?
Danke für die Hilfe.
mfg
Stefan