Red de conocimiento informático - Material del sitio web - Cómo utilizar OLEContainer de Delphi para operar MS Word

Cómo utilizar OLEContainer de Delphi para operar MS Word

procedimiento TForm1.Button1Click(Remitente: TObject);

var

wd, du: OLEVariant

comenzar

wd:=CreateOleObject; ('Word. Application'); //crear objeto WinWord

du:=wd.//Mostrar el nombre del documento abierto

// El siguiente contenido se puede insertar en el tuyo En el programa

du.close; // Cierra el documento

wd.Quit; // Cierra el programa

end;