Ver Mensaje Individual
  #4  
Antiguo 28-07-2006
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - Espańa
Posts: 18.309
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
El código que has puesto es incompleto; Prueba con este:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  Word: Variant;
  Documento: Variant;
begin
  // Crear el objeto
  Word := CreateOleObject('Word.Application');
  // Abrir el documento que necesirtes
  Word.Documents.Open('C:\document.doc');
  // Maximizar ventana (1)
  Word.ActiveWindow.WindowState := wdWindowStateMaximize;
  // Hace visible la ventana de Word
  Word.Visible:=True;
end;

Ańade al uses uses ComObj, Word2000;
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita