Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2007.01.14;
Скачать: [xml.tar.bz2];

Вниз

Поиск в Word е - ошибка - Заглушке переданы неправильные данные   Найти похожие ветки 

 
IGo   (2006-11-20 16:04) [0]

Добрый день!

Осуществляю в Delphi поиск в документе Word следующим образом :
var
SearchText : OLEVariant;
...    WordApplication1.Selection.Find.Execute(SearchText,EmptyParam,EmptyParam,EmptyPa ram,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam ,EmptyParam,EmptyParam,EmptyParam,EmptyParam);

Но вместо поиска появляется ошибка "Заглушке переданы неправильные данные" с укзкнием на эту строчку. Остальные действия с word"ом работают.
Как быть?
Спасибо


 
clickmaker ©   (2006-11-20 16:14) [1]

такое бывает при несоответствии версии клиентской библиотеки типов (tlb) версии сервера


 
IGo   (2006-11-20 16:22) [2]

to clickmaker

> такое бывает при несоответствии версии клиентской библиотеки
> типов (tlb) версии сервера


и что можно сделать?


 
clickmaker ©   (2006-11-20 16:25) [3]


> [2] IGo   (20.11.06 16:22)

Unit от какого офиса? И фактически с каким офисом работаешь?


 
IGo   (2006-11-20 16:28) [4]

unit - word2000
офис - 2002

Т.е. если я использую unit word2000, а на пк офис другой, то я с ним не смогу работать из Delphi?


 
clickmaker ©   (2006-11-20 16:30) [5]


> [4] IGo   (20.11.06 16:28)
> unit - word2000
> офис - 2002
>
> Т.е. если я использую unit word2000

я тебе так сходу не могу сказать. Надо сравнивать методы. Может параметр добавили или убрали, может тип поменяли.
Попробуй сымпортировать библиотеку типов от 2002 офиса и сравни с 2000


 
IGo   (2006-11-20 16:38) [6]

подцепил word2002. Параметры действительно немного другие. Но результат не изменился.


 
IGo   (2006-11-20 16:39) [7]

Ошибся : не word2002, а wordXP


 
clickmaker ©   (2006-11-20 16:41) [8]


> [7] IGo   (20.11.06 16:39)
> Ошибся : не word2002, а wordXP

это синонимы.
Значит, не нравится ему EmptyParam. Уверен, что обязателен только первый?


 
IGo   (2006-11-20 16:44) [9]

Нет, не уверен. Но толкового описания поиска в Word"е через дельфи я не нашёл. Только примеры с этой процедурой, но там она использовалась для поиска и замены. Соответственно я убрал параметры замены и всё. Я пробовал играть с другими параметрами, но результат тот же.


 
Shirson ©   (2006-11-21 09:56) [10]

Ненужно искать описание поиска в Word через Delphi. Нужно найти в директории офиса chm файл с хелпом по VBA и посмотреть там.
У меня MSW2k, VBAWRD9.CHM

With Selection.Find
   .Forward = True
   .Wrap = wdFindStop
   .Text = "Hello"
   .Execute
End With


WordApplication1.Selection.Find.Forward:=True;
WordApplication1.Selection.Find.Text:="Hello";
WordApplication1.Selection.Find.Execute;


Что-то вроде того. Правда, я не пользуюсь для этого компонентам.


 
IGo   (2006-11-21 13:33) [11]

Я пробовал это с самого начала. И макросы в ворде смотрел. Но ничего не помогает.
Буду искать другие варианты решения.
Спасибо



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2007.01.14;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.02 c
15-1166760178
Slider007
2006-12-22 07:02
2007.01.14
С днем рождения ! 22 декабря


2-1166952333
nordic3
2006-12-24 12:25
2007.01.14
Замена символа в Memo


2-1166891136
AlexanderMS
2006-12-23 19:25
2007.01.14
Почему принтер не печатает, хотя...


15-1166725442
Tirael
2006-12-21 21:24
2007.01.14
срочно нудно достать пароль из бата


15-1166388021
partizan
2006-12-17 23:40
2007.01.14
Вписать эллипс макс. площади в 4-угольник





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский