Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.02.06;
Скачать: CL | DM;

Вниз

Получение закладок Word   Найти похожие ветки 

 
syte_ser78 ©   (2005-01-18 09:05) [0]

procedure Tfrm_main.Button5Click(Sender: TObject);
var
  i:integer;
  wrd:wordapplication;
  wrd_doc:worddocument;
begin
  try
     wrd := GetActiveOleObject( "Word.Application")as WordApplication;
  except
     wrd := CreateOLEObject( "Word.Application") as WordApplication;
  end;
  try
     wrd_doc:=wrd.ActiveDocument;
  except
  end;
//   i:=wrd_doc.Bookmarks.Count-1;
  for i:=0 to wrd_doc.Bookmarks.Count-1 do
     begin
//      frm_main.Memo2.Lines.Add(wrd_doc.);
     end;
end;

Переменная i всегда равна нулю. Закладки в активном документе ворда есть. В чем ошибка?


 
YurikGL ©   (2005-01-18 09:15) [1]


> syte_ser78 ©   (18.01.05 09:05)  

попробуй
showmessage(intToStr(wrd_doc.Bookmarks.Count));


 
syte_ser78 ©   (2005-01-18 09:42) [2]

Ок! Ошибку обнаружил

wrd_doc.Bookmarks - типа боолеан
как получить значение i-го значения закладки?



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

Текущий архив: 2005.02.06;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.076 c
9-1098893371
Falcon(TFSoft)
2004-10-27 20:09
2005.02.06
Создание объектов


14-1105947608
Holy
2005-01-17 10:40
2005.02.06
Охлаждение винчестера


1-1106546496
Mielofon
2005-01-24 09:01
2005.02.06
EXE, DLL и ShareMem


14-1106019766
Думкин
2005-01-18 06:42
2005.02.06
С Днем Рождения! 18 января


1-1106399819
Islander
2005-01-22 16:16
2005.02.06
Как проиграть звук критической ошибки?