Entwickler-Ecke

Sonstiges (Delphi) - OpenOffice - Textdokument durchsuchen


Schwedenbitter - Fr 04.06.10 12:19
Titel: OpenOffice - Textdokument durchsuchen
Hallo,

bei uns auf dem Fileserver liegen mehrere odt-Dateien (Text) herum, die sortiert werden müssen. Dies kann/soll anhand von Aktenzeichen passieren, die entweder im Fließtext oder bei einer weiteren Vorlage in einem Textfeld stehen.

Mein Ziel ist es jetzt, eine odt-Datei zu öffnen und nach eben diesem Aktenzeichen zu suchen. Hieran scheitere ich bislang. Ich kann zwar die Verbindung zu OOO herstellen und eine Datei öffnen (lassen). Ich komme aber nicht weiter. Auch die im www kursierenden Beispiele bzgl. Tabellenkalkulation etc. machen mich nicht schlauer... Ich habe mal meinen Anfang beigefügt.

Kann mir bitte jemand einen Hinweise geben, wie ich z.B. den Text in TStringList, einen String oder sonstwas bekomme?

Danke für Eure Hinweise!

Alex


Schwedenbitter - Fr 04.06.10 17:56

Ich bin jetzt schon um einiges weiter gekommen:

Auf einer anderen Seite hatte ich den API-Befehl .SetText entdeckt. Da dachte ich mir, muss es auch ein .GetText geben - und siehe da, es war auch so. Ich kann jetzt den gesamten Text in einen String bzw. eine TStringList einlesen, was mich aber zu 2 weiteren Fragen bringt:

1. Leider ist in diesem Text nicht der Text aus dem Textfeld mit dabei. Ich kann damit also das Aktenzeichen nach wie vor nicht finden. Wie komme ich also an den Text im Textfeld/in Textfeldern allgemein heran?
2. Wie kann ich das beschleunigen?

Ich habe wieder Code angefügt. Für Testzwecke werden die Zeiten mit ermittelt, die für die Verbindung zum DDE-Server, das Öffnen und Schließen der Datei sowie deren Auslesen notwendig sind. Ich komme da auf ca. 19 Sek. pro Datei. Und dabei habe ich noch nicht den Teil zum Suchen des Aktenzeichens dabei...

Danke für Hinweise