Word Automation Steuerung aus D5

[Stargate3]

Hallo,
bin auf der Suche nach Tipps zum Steuern von MS Word aus D5.
Mein Programm überträgt Daten ins Word. Das klappt auch schon gut.
Jedoch kann ich nicht feststellen welche Word Dateien geöffnet sind und wie ich diese jeweils aktivieren ( zum Aktiven Dokument ) machen kann.
Habe auch schon mit dem VBA Macro editor rumexperimentiert. Komme leider nicht weiter.

Bin für jeden Tipp in dieser Richtung dankbar.

Danke und Gruss

[Stanlay Hanks]

Ich kenn mich da leider nich aus. Aber Word hat doch, soweit ich weiß, für jedes Offene Dokument ein extra fenster,also auch einen extra prozess. vielleicht kannst du dann irgendwie an das handle von dem Fenster kommen. Wie gesagt, war ne spontane idee, hab keine Ahnung, wei man das machen könnte oder obs funktioniert.

Man liest sich. Stanlay :coder:

PS: Ich lasse mich immer gerne korrigieren.

[sakura]

Anbei eine Prozedure welche alle Dokumente in einem Memo auflistet und das erste automatisch aktiviert.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  I: OleVariant;
begin
  I := 1;
  WordApplication1.Activate;
  while I <= WordApplication1.Documents.Get_Count do
  begin
    Memo1.Lines.Add(WordApplication1.Documents.Item(I).Get_Name);
    if I = 1 then
      WordApplication1.Documents.Item(I).Activate;
    Inc(I);
  end;
end;

...:cat:...

[Stargate3]

Danke für die Tipps!
Das funkt prima, hab es gleich mal ausprobiert.
An dem Problem hatte ich schon eine Zeit gerätselt.
Somit eine tolle Einrichtung hier.

Nochmals Danke und weiter so! Stargate3

[sakura]

Zitat:

Zitat von Stargate3

Somit eine tolle Einrichtung hier.

Das werden wir doch glatt dem Admin weiterleiten :-)

...:cat:...