![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#2
|
||||
|
||||
|
hola colega, he intentado resolver algo de tu problemita,
me ha funcionado de lo mejor en Delphi 5, pruebalo, es posible que te de buenos resultados: uses ComObj; procedure TForm1.Button1Click(Sender: TObject); var WordApp, WordDoc: OleVariant; begin Screen.Cursor := crHourGlass; WordApp := CreateOleObject('Word.Application'); {Creo el objeto Word.Application} WordDoc := WordApp.Documents; {Obtengo el metodo Documents de la app.Word creada} WordDoc.Open('C:\aeff.doc'); {Abro el archivo "C:\aeff.doc"} WordApp.ActiveDocument.SaveAs('C:\aeff.txt', 2); {Le digo a la app.Word que le documento activo lo guardaré en "C:\aeff.txt", ahora, como decias .txt, el parametro 2, es quien especifica ese formato} WordApp.Quit; {Por ultimo, cierro la app.word} Screen.Cursor := crDefault; ShowMessage('Ya se ha guardado su TXT, puede continuar...'); end; espero que te sea util mi respuesta, si tienes alguna otra dudita, publicala en el foro para poder intentar resolverla salu2!! aeff!! |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
Temas Similares
|
||||
| Tema | Autor | Foro | Respuestas | Último mensaje |
| Error Abstract Error y Access violation | zvf | OOP | 33 | 08-09-2010 18:50:33 |
| Error 10093 al ver un informe - Que error es este? | URBANO | Impresión | 1 | 03-02-2006 18:44:39 |
| ¿Por qué me da este error?Error creating cursor manejador | nuri | SQL | 2 | 01-08-2005 17:30:28 |
| Error: RichEdit line insertation error | DarkByte | Varios | 3 | 19-07-2004 12:28:09 |
| Sql Error: error cannot insert a duplicate......................... | inexperto | SQL | 2 | 04-06-2004 12:54:59 |
|