Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Servers
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 12-05-2004
Avatar de Investment
Investment Investment is offline
Miembro
 
Registrado: may 2003
Posts: 378
Poder: 21
Investment Va por buen camino
Question Saber si esta abierto un documento Word

Pues eso, alguien sabría como puedo saber si un documento de Word ya está abierto ???

Gracias.
__________________
Saludos,
Peter Investment
Responder Con Cita
  #2  
Antiguo 12-05-2004
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
La siguiente rutina lista los documentos abiertos de Word en un ListBox:

Código Delphi [-]
(*
  WordApp - componente TWordApplication
  lbDocs - ListBox
*)

var
  OleI: OleVariant;
  I: Integer;

begin
  lbDocs.Clear;
  for I := 1 to WordApp.Documents.Count do
  begin
    OleI := I;
    lbDocs.Items.Add(WordApp.Documents.Item(OleI).Name);
  end;
end;

de aquí ya sólo tienes que revisar si el dcumento está en la lista o no.

// Saludos
Responder Con Cita
  #3  
Antiguo 13-05-2004
Avatar de Investment
Investment Investment is offline
Miembro
 
Registrado: may 2003
Posts: 378
Poder: 21
Investment Va por buen camino
Muchisimas gracias roman. Me viene perfecto.
__________________
Saludos,
Peter Investment
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 06:47:51.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi