Hallo,
ich habe ein WPRichText-Dokument mit einigen Tabellen (unter anderem eine Tabelle mit Name = "Positionszeile") und angehängten RTFVariables.
Ich lade nun dieses Dokument in ein WPRichText und mache folgendes:
Code
var
Positionszeile:TMemorystream;
procedure TForm1.Button2Click(Sender: TObject);
var
postab: TParagraph;
begin
OpenDialog1.InitialDir := 'c:\forms';
OpenDialog1.Filter := 'Formulare *.hpv|*.hpv';
if OpenDialog1.Execute then
begin
WPRichText2.LoadFromFile(OpenDialog1.FileName, true, 'WPT');
Positionszeile.Clear;
postab := WPRichText2.FindParagraph('Positionszeile');
if postab <> nil then begin
postab.SaveToStream(Positionszeile, true, 'WPT');
end;
end;
end;
Alles anzeigen
Dabei ist mir nun aufgefallen, dass da in dem Stream nicht nur die gewünschte Tabelle mit dem Namen "Positionszeile" steckt, sondern auch alle im Dokument angehängten RTFVariables!
Es ist dabei egal ob ich 'WPT' oder 'RTF' Format benutze und auch egal ob OnlyChildren true/false ist...
Wie bekomme ich ausschließlich nur die Tabelle in den Stream?
Danke für einen Hinweis.
Ciao
Stefan