| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Из WordPad->OleContainer в простой текст
Godness © (2006-09-29 18:54:00)Добрый вечер, народ! Есть такая проблема - мне приходит файлик, который создан WordPad'ом или MSWord'ом через OleContainer и сохранен как OleContainer->SaveToFile.
А мне нужно выбрать из этого файлика только текст и сохранить в базу! Ну или хотя бы в сохранить этот файлик в формат rtf.
Я делаю так OleContainer->LoadFromFile(...) и OleContainer->SaveAsDocument() -> Не помогает :(
Подскажите, пожалуйста, как выбрать только текст из такого файла?
YurikGL (2006-10-04 19:14:00) [1]
> Я пробывал OleContainer.OleObject.Close - но закрывается
> лишь активный открытый мной документ ворда, а само приложение
> остается
Попробуй
OleContainer.OleObject.application.quit
Godness (2006-10-04 12:48:00) [2]И как открыть ole документ в ворде но в нормальном по размерам окошке?
т.е. я делаю так -
OleContainer.LoadFromFile('C:\111.doc');
OleContainer.DoVerb(ovShow);
Открывается окошко ворда, но какое-то сжатое, маленькое ;(
Как отрыть его в нормальном окне?
Godness (2006-10-04 12:38:00) [3]Кстати, народ подскажите пожалуйста, как закрыть окно приложения MSWord'а
Я пробывал OleContainer.OleObject.Close - но закрывается лишь активный открытый мной документ ворда, а само приложение остается активным.
Godness (2006-10-04 11:22:00) [4]Та я уже конечно искал в MSDN. Там действительно ничего нет.
just_me (2006-10-03 21:56:00) [5]никакой.
сырки WordPad можно найти в MSDN, там ole и не пахнет.
Godness (2006-09-29 22:41:00) [6]Спасибо - попробую!
Но я так понимаю, что для файла созданного WordPad'ом это не прокатит. А где можно узнать какой ole интерфейс предоставляет вордпад? Т.е. какие функции можно использовать после создания оле-обьекта вордпада?
А может кто уже с вордпадом работал? Т.к. он более для меня приоритетный!
YurikGL (2006-09-29 21:52:00) [7]
var
vr1,vr2:olevariant;
App : Variant;
Begin
try
WordApplication1.Connect;
WordApplication1.Visible:=true;
WordApplication1.Documents.Add;
WordApplication1.Selection.InsertAfter('Proba text');
vr1:=0;
vr2:=WordApplication1.ActiveDocument.Characters.Count-1;
ShowMessage(WordApplication1.ActiveDocument.Range(vr1,vr2).Text);//вывод текста документа
finally
WordApplication1.Disconnect;
end;
| |
