A mellékelt példaprogram megnyitása előtt a WordPositions.pas-ban lévő komponenst telepítenie kell a Delphi alá. Ehhez válassza a Component - Install Component menüpontot.
A komponens OpenDocument metódusával nyithatunk meg egy létező Word dokumentumot.
procedure OpenDocument(Document: String);
Attól függően, hogy bekezdés, karakter, mondat vagy szó szerint akarunk keresni, a következő metódusokat használhatjuk, sorrendben.
procedure FindParagraph(Index: Integer);
procedure FindCharacter(Index: Integer);
procedure FindSentence(Index: Integer);
procedure FindWord(Index: Integer);
Az Index paraméterekben a keresendő egység indexét kell megadnunk. Az indexelés 1-el kezdődik.
Ha a komponens megtalálja az adott indexű egységet, akkor kijelöli azt.
A komponenst a TComponent osztályból származtatjuk.
A Word programot az alábbi módon nyitjuk meg, egy OleVariant típusú változó segítségével.
FWordApp:=CreateOleObject('Word.Application');
A Visible property használatával tehetjük a megnyitott Word programot láthatóvá.
Egy már létező dokumentumot a következő módon nyithatunk meg:
FWordApp.Documents.Open(Document);
Egy adott terület kijelöléséhez a Selection objektumot használhatjuk. Minden esetben először kijelöljük a teljes dokumentumot.
FWordApp.Selection.SetRange(0,FWordApp.ActiveDocument.Content.End);
Megadott bekezdés kijelölése:
if FWordApp.Selection.Paragraphs.Count>=Index then
FWordApp.Selection.Paragraphs.Item(Index).Range.Select;
Megadott karakter kijelölése:
FWordApp.Selection.Characters.Item(Index).Select;
Megadott mondat kijelölése:
FWordApp.Selection.Sentences.Item(Index).Select;
Megadott szó kijelölése:
FWordApp.Selection.Words.Item(Index).Select;