Робота з Word ом з Delphi
Проблема така: При використанні компонентів Делфі TWordApplication і TWordDocument програма працює тільки з тією версією Офісу (ворда), кіт. стоїть на машині розробника. Та й працювати з ними не дуже зручно. Спробував використовувати наступнеvar MSWORD:Variant; begin MSWORD:=CrateOleObject("Word.Basic"); MSWord.FileNewDefault; .Не можу знайти тямущого Мануала по командах WordBasic"а, та ще, що б під Делфями нормально працювало. У допомозі з Visual Basic"у нічого до ладу не зрозуміло. Наприклад: команда MSWORD.FileSaveAs - за ідеєю повинна зберігати файл з потрібним ім'ям, але цього не робить. Допоможіть, пліз, розібратися з WordBasicом - в неті нічого розумного не знайшов (використання Word.Application не підходить, тому що занадто заморочено)
у тебе при встановленні Дельфі ( принаймні в 6 ) запитує чи встановлений у тебе office 2000 or office 97 відповідно і встановлює модулі word2000 or word97 фішка полягає в тому, що програми написані для word2000 можуть працювати під word97, т.к. при виклику методів ворда 2000 у процедурах і функціях передається більше параметрів відповідно - визначай версію на кшталт і вперед
під час використання "Word.Basic" не виникає проблем із версією ворда. Але я не зміг знайти тлумачний опис цього самого WordBasic.
Так, TWordApplication він примхливий (у сенсі версій) Ось на рахунок об'єкта Word.Basic, що створюється - я б якось сумнівався. Що це взагалі за такий об'єкт? (я не говорю, що його немає, але що це?)
>MSWORD.FileSaveAs - за ідеєю повинна зберігати файл За чиєю ідеєю? За вадами? ;) Ну мало які ідеї у вас блукають. До ворду це має мале відношення. ;)
А взагалі пошартесь по форуму та по інету взагалі: прикладівроботи з вордом – гори.
Заходиш у Word. Включаєш "Почати запис макросу". Робиш, що потрібно, а потім дивишся текст макросу. З невеликими змінами вставляєш його у свою програму.
У тому і проблема - Макрос пишеться командами Visual Basic"а, а мені потрібен WordBasic, кіт. і використовується при створенні об'єкта CreateOleObject("word.basic").
Я знаходив опис відмінностей між Visual Basic і WordBasic у MSDN, а тлумачного опису команд WordBasic так і не знайшов. Може, у кого є?
Ох хлопці. & gt; команди будуть однакові. А створювати, наприклад, краще так (щоб не прив'язуватися до версії Word), а взагалі коли я писав під TWordApplication (у мене був обраний Word97) на Word2000 проблем не виникло.(підтримка зверху вниз)
var vSaveChanges, vFileName, vFileFormat, vFileNameTemplate, vIsNewTemplate: OleVariant; begin wordApp:= CreateOleObject("Word.Application"); //wordApp.Connect; vFileNameTemplate := ""; vIsNewTemplate := False; wordApp.WindowState := wdWindowStateMaximize; wordApp.Visible := True; wordApp.Documents.Add(vFileNameTemplate, vIsNewTemplate); //не зберігатимемо vSaveChanges := False; wordApp.ActiveDocument.Close(vSaveChanges, emptyParam, emptyParam); //будемо vFileName := WorkReportsDir + "ReadMe.doc"; vFileFormat := wdFormatDocument; wordApp.ActiveDocument.SaveAs(vFileName, vFileFormat, emptyParam, emptyParam, emptyParam, emptyParam, emptyParam, emptyParam, emptyParam, emptyParam,emptyParam); vSaveChanges := wordApp.ActiveDocument.Saved; wordApp.ActiveDocument.Close(vSaveChanges, emptyParam, emptyParam); wordApp.Disconnect; end;
Спробуй. Коротше проблем немає і не хочеш допомоги (Word or Excel)? Пиши мені на мило я тобі підкажу - тільки докладно опиши че ті треба.
Ну не знаю, що тут складного і громіздкого Office по суті своїй громіздкий EmptyParam - дуже навіть нічого - порівняно з невирішеною проблемою WordBasic? Я звичайно не пробував, але невже у них різний формат команд та команди по суті? Мені так не здається. Навіщо морочити голову? Просто Word.Application універсальний і немає прив'язки до версії та функцій купа та інформації щодо них Але справа господарська
> Просто Word.Application є універсальним і немає прив'язки до версії > та функцій купа та інформації щодо нихУ принципі згоден. Можете мені посилання що-небудь кинути на українські мануали? Мені в першу чергу потрібні сліди. можливості роботи з Вордом: Вставка таблиць, Заміна міток шаблону (@@1,@@2,@@3. ) На необхідні мені дані і т.п. Заздалегідь дякую :))))))))))))
Сміливо йдемо на http://blackman.km.ru/prg.html І качаємо там myprog.zip - Вихідник (unit) - функції невеликі, але корисні. В основному для роботи з WORD. Unit містить: function CurrentFileInfo(NameApp : string) : string; Function MyEmptySet(inSet:TDataSet):boolean; //виведення даних у Word procedure WordInsertText(Text: string); //процедура пошуку закладок у документі WORD та переходу по них procedure WordInsertFile(Text: string); // вставка файлу procedure WordRunMacros(rmacros: string); procedure WordGotoBookmark(rBookmark: string); procedure WordDeleteBookmark(rBookMark: string); Повертає номер першого символу або нуль> функція Isk( oTable:TTable;var Istr:String; var Pstr:String) : integer; // видалення файлів За END. приклад роботи з WORD за допомогою цих функцій. Успіхів у праці та особистому житті!
> DerrСенькс :))) Але хотілося б че-нити бо WordBasic"у.
Я такий фігнею займався ще у ворд 7 і тоді в постачанні з ним був VBA Help (Visual Basic for Applications) - там все потрібне про VBA було.
Чоловіки вам раніше правильну пораду дали: включиш "record macro" і робиш що хочеш, хоч таблиці вставляєш, хоч ще щось. І потім дивися цей макро та вставляй у свою улюблену програму!
Можу порадити наступні посилання http://support.microsoft.com/default.aspx?sc > http://www.geocities.com/SiliconValley/Station/7929/delphi.html http://delphi.abydos.nl http://www.chez.com/herveroz Тут у основному компоненти з вихідними джерелами, може щось підійде як приклад.
Всім Дякую - покапався - розібрався :)))