FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
Dudas sobre objetos OLE y sus procedimientos
Hola a todos,
aquí estoy de nuevo, para hacerles un pregunta. Verán, hace un tiempo tuve que hacer una aplicación en la que abría y escribía en un documento Word. Para realizarla, consulté varios códigos que estaban por ahí en Internet. Un ejemplo simple de lo que hice es éste código: Código:
// CREO EL WORD Variant word, doc; try { word = Variant::GetActiveObject("Word.Application"); word.OleProcedure("Quit", false); word = Variant::CreateObject("Word.Application"); }catch(...){ word = Variant::CreateObject("Word.Application"); } word.OlePropertySet( "Visible", (Variant) true ); doc = word.OlePropertyGet("Documents"); // Creo la ruta completa al archivo *.doc AnsiString archivo; archivo = "C:\\archivo.doc"); // Si existe el archivo, lo abro. if (FileExists(archivo)) { doc.OleFunction("Open", path, Unassigned, true); }else{ MessageBox(this->Handle, "El archivo no existe", "Error" , MB_APPLMODAL | MB_OK | MB_ICONERROR); word.OleProcedure("Quit"); return; } // UNA VEZ ABIERTO ESCRIBO EN ÉL try { // CREO LOS ENCABEZADOS Variant Selection = word.OlePropertyGet("Selection"); Variant Font = Selection.OlePropertyGet("Font"); Variant Parrafo = Selection.OlePropertyGet("ParagraphFormat"); Parrafo.OlePropertySet("Alignment","1"); Font.OlePropertySet("Name","Monotype Corsiva"); Font.OlePropertySet("Bold","1"); Font.OlePropertySet("Size","13"); Selection.OleProcedure("TypeText", "Hola a todos"); }catch(...){ MessageBox(this->Handle, "Error al escribir en el archivo", "Error" , MB_APPLMODAL | MB_OK | MB_ICONERROR); } Por ejemplo, cuando ocupo CreateObject o GetActiveObject, ¿con qué otros objetos puedo trabajar? O en los casos de los wrapper OleFunction, OleProcedure, OlePropertySet y OlePropertyGet, ¿cómo puedo saber qué instrucciones soportan? Es decir, en OleProcedure, puedo darle la instrucción "Quit" y "ClearFormatting", pero, ¿cómo averiguo qué otras instrucciones existen? Cómo verán mis dudas son muy generales, y en realidad, lo que quiero saber es dónde encontrar información al respecto para leer y entenderlo bien. Gracias de antemano por la ayuda.
__________________
Saludos, Gabo A menos que se indique lo contrario, el código estará hecho en C++Builder. Última edición por Gabo fecha: 17-12-2007 a las 17:28:52. |
#2
|
||||
|
||||
Supongo que una buena web para averiguar las instrucciones que soporta Word es la de Microsoft.
Última edición por duilioisola fecha: 17-12-2007 a las 18:03:15. |
#3
|
||||
|
||||
Supongo que una buena web para averiguar las instrucciones que soporta Word es la de Microsoft.
|
#4
|
||||
|
||||
Cita:
En un principio, busqué en el MSDN, pero la información se quedaba escasa. Encontré este enlace: http://bcbjournal.org/articles/vol3/...4e4d39fb4ac624 En él hay una referencia al archivo \Microsoft Office\Office\Vbawrd8.hlp, que imagino es de Word 97. Creo que el equivalente en Word 2003 es éste: "C:\Archivos de programa\Microsoft Office\Office 10\3082\VBAWD10.chm" (también hay para el resto de producto de Office 2003). Si bien está orientado a VisualBasic, imagino que los objetos, métodos, propiedades y eventos serán los mismos. Ahora lo estoy consultando y, si me gusta, lo dejaré como referencia. De todos modos, si alguien conoce otros artículos, libros, etc., en fin, cualquier otra referencia, le agradeceré que me lo diga.
__________________
Saludos, Gabo A menos que se indique lo contrario, el código estará hecho en C++Builder. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Dudas Crear Objetos en Tiempo de Ejecución | Deiv | OOP | 9 | 09-08-2007 01:13:15 |
Dudas sobre procedimientos | utopico | Varios | 2 | 21-07-2007 21:24:59 |
Aprendiendo sobre procedimientos almacenados | pichi Vignola | Firebird e Interbase | 1 | 18-08-2006 15:41:48 |
Sobre procedimientos y funciones | Perrero80 | OOP | 3 | 17-05-2006 11:55:42 |
Duda sobre Procedimientos Almacenados | SaurioNet | SQL | 2 | 06-04-2004 08:24:05 |
|