Hallo...
Ich habe ein kleines problem...
Ich brauch in einer ListBox eine Liste von office dokumenten, welche gerade offen sind.

Also wenn der Benutzer gerade 2 Word, und 1 Excel datei auf hat, brauch ich in meiner Liste die Dateinamen der beiden Word (*doc) dokumente, und der der Excel datei.

Leider weiß ich nicht, wie man das am bessten und am einfachsten lösen kann.

Wäre echt super, wenn mir da jemand helfen könnte.

markieren

Code:

NET File

oder sysinternals PsFile

Ne..., ich will keine Liste von datein, die auf anderen rechnern offen sind, sondern ich möchte in meiner Anwendung, in der ListBox1

eine Liste mit allen laufenden(also offenen) Office dokumenten.

Also ich habe versucht mit OLEVariant variant darauf zu zugreifen, aber ich weiß nicht, wie ich an die FileNames der dokumente rankomme.

markieren

Delphi-Quellcode:

var
  Word: OLEVariant;
begin
 
    Word := CreateOleObject('Word.Application');

Kann mir vielleicht jemand sagen, ob und wie ich auf die dokumente zugreifen kann?

Wenn word schon offen ist wäre es besser eine existierende Instanz zu ermittlen

markieren

Delphi-Quellcode:

try
    Word := GetActiveOleObject('Word.Application');
  except
    Word := CreateOleObject('Word.Application');
  end;

Die ofenen Dokumente befinden sich in der Collection Documents

Zitat von mkinzler:

Die ofenen Dokumente befinden sich in der Collection Documents

Ich bekomme die aber irgendwie nicht richtig raus, wie kann ich die denn jetzt korrekt ermitteln?
bzw zu ListBox1 hinzufügen?

Word.Documents.Item( i).Name;

ja so gehts danke