Hallo !
Ich verzweifele gerade an der Aufgabe, ein Word2000 Steuerelemnt abzufragen.
In Word habe ich ein Formular gebastelt, welches zwei Textboxen besitzt.
Diese möchte ich nun von meiner Delphi Anwendung aus abfragen, bzw. einen neuen Text einsetzen.
Delphi-Quellcode:
...
MyWordApp.Connect;
MyWordApp.Visible := True;
MyWordApp.Caption := 'Auflastberechnung nach DIN 1055';
AFile := 'C:\Vorlage_Ausfüllen.doc';
MyWordDoc.ConnectTo(MyWordApp.Documents.Open(AFile, EmptyParam, EmptyParam, EmptyParam, EmptyParam,
EmptyParam ,EmptyParam ,EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam));
...
Memo1.Lines.Clear;
Memo1.Lines.Add('DokumentName: ' + MyWordDoc.Name);
for I := 1 to MyWordDoc.Fields.Count do
Begin
Iole := I;
MyWordDoc.Fields.Item(Iole).Select;
Memo1.Lines.Add(IntToStr(I) + ': ' + MyWordDoc.Fields.Item(Iole).Result.Text);
End;
In meinem Memofeld für Testausgaben werden zwar zwei Elemte angezeigt, aber nicht der jeweilige Inhalt aus dem Worddokument.
Was mache ich da falsch ?