| Типы программирования, программирование, языки программирования, книги программирование | На сайте представлена информация про программирование в Интернете и работу |
|
Управление приложениями..., Активизация форм... Таблицы Word Word Document из БД OLEConteiner Вопрос возможностей, пример IStorage.CreateStream, ограничение на длинну имени передача stream через com, TBlobStream - > COM -> файл Как выделить нужный объект в слайде?, PowerPoint TWebBrowser HTML + картинка из stream, Можно ли сделать Как распечатать фрейм из WEBBROWSER, Зная его name Как Вы относитесь к курящим девушкам? Использование SpeechAPI как сделать прокрутку у ole container'a, При это он не активизирован WMI - узнать все о чипсете мат.платы OPC Server, Обмен данными с микроконтроллерами RxLib, подскажите Закрытие com - хранилища shell менюшки, (такие как при правом клике) Drag-n-Drop текста из MSWord в мое приложение, Drag-n-Drop текста из MSWord Webbrowser, замена стандартного ИЕ Как загрузить html код в ИЕ, через адресную строку? Проблемы с TDComconnection, Клиент не связывается с сервером приложе Создание файла из шаблона, Подскажите как в ворде... Открыть папку в окне EXplorer'a, Однако в уже открытом окне... Как загрузить в twebbrowser файл с картинками из Word + список Почему я немогу найти спецпапку? MediaPlayer Как управлять Excel из своей программы? Автоматизация PowerPoint в Delphi., Функция AddOLEObject Не открывается файл Powerpoint WinWord+DDE, создание нового файла DOC->RTF Программа, автоматизирующая работу Excel, на чужом, компе не работает. Почему? Адрес последней ячейки в Excel popup окна и TWebbrowser Загрузка Ворда из Оле, загружается ворд без меню "Файл" TWebBrowser popup, keyboard block com порт в Pascal, дозвон по мопеду Мануал по activeX, help Перемещение листа в конец рабочей книги, в Excel Прочесть файл *.pst!, Прочесть outlook.pst Пересылка таблицы из Excel в PowerPoint, в виде рисунка Сортировка ячеек в Excel Открытие файла Excel TWebBrowser.ProgressChange bug, на заметку всем, кто работает сабжем WebBrowser.HWND, Неопознанная ошибка Web-browser, хелп 8))) Назад-вперёд (Web) проблема!!!, как сделать их не активными!!! WinAPI, Сайты ActiveX Server, Нужно создать свой как узнать позицию конца документа в Word?, как узнать позицию конца документа в Wor Outlook, Поля контактов Поиск в Ворде фразы и вставка ее в Дельфи Получить HTML код странички ActiveX без регистрации, Использование ActiveX только в runtime Как Вы относитесь к курящим девушкам? InternetExplrer, Плагин Формат ячейки Excel, проблема с передачей значений Excel без OLE Модем у меня фуфло! Регистрация ActiveX контрола, Excel не хочет TWebBrowser's parent's parent DataSnap+ADO, Проблема определения пути dll-сервера как работать с IE запущенным в качестве сервера, IE запустило другое приложение как можно использовать dispinterface? WebBrowser: не работают некоторые клавиши Как по нажатию кнопки открыть Word? excel, экспорт Рисование линий таблицы, выравнивание в Excel, По технологии СОМ |
Платные хостинги Раскрутка сайта Книги по программированию Как по нажатию кнопки открыть Word?
- Вся суть вопроса вместилась в название темы - ПРОСТО! Код var Word: Variant;begin try Word := CreateOleObject('Word.Application'); Word.Visible := False; Word.Visible := True; finally Word := Unassigned; Word := nil; end;end;highlightSyntax('delphiDkyYWY','delphi');Вроде так... Можно и добавить документ...Код var Word, Document: Variant;begin try Word := CreateOleObject('Word.Application'); Word.Visible := False; Document := Word.Documents.Add; Word.Visible := True; finally Word := Unassigned; Word := nil; end;end;highlightSyntax('delphiMWNlMj','delphi'); Добавлено @ 19:02 Добавть в uses:ComObj, ActiveX - Зачем так сложно?Код WinExec('winword', 0);highlightSyntax('delphiDdjODI','delphi'); - NiJazzНаписала, ничего не происходит Pakshin A. S.Пишет: Код Word := nil;highlightSyntax('delphiwODRmZ','delphi'); - Incompatible types: 'Variant' and 'Pointer'Это какая-то переменная? Что ты имеешь в виду? Это сообщение отредактировал Люба - 3.1.2005, 21:28 - тогда попробуй просто 0 туда поставить должно все пахать, в этом участке он освобождает память от созданного объекта - Попробуй null...Код Word := null;highlightSyntax('delphimYmJkY','delphi');И еще:добавь модуль variants - Спасибо всем, все отлично работает!!!! Это сообщение отредактировал Люба - 3.1.2005, 22:56 - Чтобы можно было открывать пустой Word, с новым документом, с открытым документом, со сгенерированным документом, без его сохранения на диск. и т. п...Люба Не за что... - Pakshin A. S.А что, можно еще и с сохранением? Как? Было бы здорово еще и сохранять этот документ в заранее определенном месте на диске под заранее определенным именем!! Это сообщение отредактировал Люба - 4.1.2005, 20:10 - А черт его занет... не могу сказать... - В этом случаеКод Word, Document: Variant;begin try Word := CreateOleObject('Word.Application'); Word.Visible := False; Document := Word.Documents.Add; Word.Visible := True; finally Word := Unassigned; Word := nil; end;end;highlightSyntax('delphimYTMzY','delphi');такКод Document.SaveAs(путь);highlightSyntax('delphiE3Zjg3','delphi'); - Jey_kБольшое спасибо, все работает!! - Jey_k А если надо сохранять как Web-страницу? Через SaveAs она выходит не пустая, а с какими-то значками....А можно еще по кнопке открывать сущствующий файл и как? У меня не вышло - Открыть существующий файл можно методом Open:Код Word.Open('FileName');highlightSyntax('delphimE0ZWJ','delphi');Сохранить в HTML:Код Word.SaveAs('FileName', wdFormatHTML); //wdFormatHTML лежит в WordXP.pashighlightSyntax('delphiMzhkNm','delphi'); Добавлено @ 14:51 Модератор: Пожалуйста, один топик - один вопрос.И вообще этой теме место в ActiveX\Com\Corba - <Spawn>выдает ошибку наКод Word.Open('FileName');highlightSyntax('delphiRjMzZi','delphi'); Говорит, что нет такого метода. Может я его не там пишу? Где в этом коде нужно написать эту строчку?Код Word, Document: Variant;begintry Word := CreateOleObject('Word.Application'); Word.Visible := False; Document := Word.Documents.Add; Word.Visible := True;finally Word := Unassigned; Word := nil;end;end;highlightSyntax('delphiTI3NDQ','delphi');Про SaveAs пишет тоже самое, что нет такого методаМодератор: Постараюсь больше так не делать Это сообщение отредактировал Люба - 5.1.2005, 19:32  |