Коллекция объектов Shapes

Свойства и методы объекта Selection

Свойства и методы	Тип	Описание
Туре	Число	Тип выделенного объекта (обычный текст Type =wdSelectionNormal=2)
StoryType	Число	Тип выделяемого объекта (может быть выделен основной текст, текст в заголовках, комментариях и т. п.)
Text	Строка	Текстовое содержимое
Start	Число	Начальная позиция выделенного объекта
End	Число	Конечная позиция выделенного объекта
Characters	Коллекция	Символы выделенного объекта, их количество
ConvertToTable	Метод	Преобразование выделенного текста в таблицу
Copy	Метод	Копирование текста в буфер обмена
Paste	Метод	Вставка текста из буфера обмена
CopyAsPicture	Метод	Копирование выделенного текста (объекта) в буфер обмена с преобразованием его в графический объект в формате BMP
Cut	Метод	Вырезание выделенного фрагмента текста
Delete(a, b)	Метод	Удаление выделенного фрагмента текста (вызов без аргументов) или удаление фрагмента из b символов начиная с позиции а
Find	Объект	Поиск, поиск и замена в документе
Font	Объект	Шрифт выделенного объекта
InRange(MyRange)	Метод	Проверка вхождения выделенного объекта в объект MyRange
InsertAfter	Метод	Вставка текста после объекта Selection
InsertBefore	Метод	Вставка текста до объекта Selection
Move(Unit, Count)	Метод	Перемещение объекта Selection в документе (перемещение курсора)
SetRange(a, b)	Метод	Выделение текста между позициями а и b
Style	Число	Стиль выделенного текста
TypeText	Метод	Вставка текста на место выделенного объекта или с позиции курсора
Words	Коллекция	Слова в выделенном объекте

Документ Word может содержать таблицы, которые как объекты объединены в коллекцию Tables. Как вытекает из вышесказанного, обычно эта коллекция принадлежит объекту "документ". Рассмотрим ее основные свойства и методы.

Свойство Count:integer содержит информацию о количестве таблиц в коллекции. Если в документе нет ни одной таблицы, то Count содержит ноль.

Метод Add добавляет новую таблицу в коллекцию. При создании таблицы определяются область, где будет создана таблица, и ее основные параметры — количество столбцов и строк. Хотя коллекция таблиц и принадлежит документу, тем не менее сама таблица может быть создана на любом объекте или месте документа, на котором это возможно. Объект Item(tab) — элемент коллекции и представляет собой таблицу с порядковым номером tab данной коллекции.

Рассмотрим объекты документа Word, расположение которых, в отличие от таблиц и текста, можно задавать произвольно с помощью координат. Такими объектами являются надписи, простые геометрические фигуры (линии, прямоугольники и овалы), автофигуры (предопределенные геометрические фигуры), рисунки, внешние объекты (OLE-объекты) и др. Все эти разнородные объекты, находящиеся в документе, объединены в коллекцию Shapes.

Рассмотрим некоторые общие свойства и методы коллекции Shapes. Свойства: Count — содержит количество элементов коллекции, SelectAll — выделяет все элементы коллекции. Методы AddCallout, AddCurve, AddLabel, AddLine, AddOLEControl, AddOLEObject, AddPicture, AddPolyline, AddShape, AddTextbox, AddTextEffect добавляют в коллекцию различные объекты, рисунки, указатели, элементы управления и т. д.

Объекты MS Excel

Идентификаторы Excel.Application, Excel.Application.8 (9,10) – с помощью этих идентификаторов осуществляется доступ к объекту Application и запускается приложение Excel.

Excel.Addln – С помощью этого идентификатора запускается приложение Excel и создается специальный объект In.

Excel.Chart, Excel.Chart.8 – с помощью этих идентификаторов запускается приложение Excel и создается рабочая книга, содержащая диаграмму и рабочий лист с данными для диаграммы.

Excel. Sheet, Excel.Sheet.8 – с помощью этих идентификаторов запускается приложение Excel и создается рабочая книга, содержащая рабочий лист

Создание объекта ExceLApplication,

запуск и визуализация окна приложения

Запуск приложения Excel производится непосредственно при вызове функции CreateOleObject, входящей в состав стандартной библиотеки ComObj.pas.

Функция возвращает ссылку на объект, представляющий собой переменную типа variant. Рассмотрим следующий программный код.

uses ComObj; var Е:variant ; E:=CreateOleObject('Excel.Application'};

Чтобы сделать объект Excel видимым, используем свойство Visible объекта Application.

Вновь созданный и запущенный экземпляр приложения Excel не содержит ни одной рабочей книги. Все рабочие книги, которые в данный момент могут быть активны или принадлежать объекту Application (переменная Е), являются принадлежностью коллекции WorkBooks, которая в свою очередь принадлежит корневому объекту. Свойство Count:integer коллекции WorkBooks содержит количество открытых рабочих книг (в нашем случае Count=0). Если мы создаем новую рабочую или открываем ранее сохраненную книгу, то значение Count увеличивается, если закрываем, то уменьшается каждый раз на единицу.

Метод Add коллекции WorkBooks позволяет создать новую рабочую книгу. При этом если аргументом метода будет строка, указывающая на файл шаблона, то новая книга будет создана на основе этого шаблона. Если аргументов нет, то будет создана обычная книга в режиме "по умолчанию". Создадим новую книгу в режиме по умолчанию с помощью следующей процедуры: E.WorkBooks.Add;

После того как мы создали новую рабочую книгу, значение свойства Count коллекции Workbooks увеличилось на единицу, а объект Item(l) содержит ссылку на созданную рабочую книгу.

procedure TForml.ButtonbClick(Sender: TObject);

const xlWBATChart=-4109;

begin

E.WorkBooks.add(xlWBATChart);

end;

procedure TForml.Button5Click(Sender: TObject);

begin

i f not OpenDialogl.Execute then exit;

E.WorkBooks.add(OpenDialogl.FileName);

end;

Использование методов коллекции WorkBooks позволяет не только создавать, но и открывать имеющиеся рабочие книги, которые хранятся в файлах. Для этих целей предназначены методы Open и OpenText. Первый метод открывает файл формата XLS, а второй — обычные текстовые файлы. Для простоты используем метод Open с одним аргументом — строкой-указателем на файл. Вот текст процедуры Delphi, использующей метод Open.

E.WorkBooks.Open(OpenDialog2.FileName);

Полная спецификация вызова метода Open представлена в справочной системе MS Excel и имеет следующий вид:

Open(FileName, UpdateLinks, Readonly, Format, Password, WriteResPassword, IgnoreReadOnlyRecommended, Origin, Delimiter, Editable, Notify, Converter, AddToMRU);

Обязательным является первый аргумент. Для задания специфических режимов открытия файла можно использовать и другие аргументы.

После того как мы открыли и создали несколько рабочих книг в приложении Excel, можно перейти к анализу содержимого коллекции WorkBooks.

Объекты Item(i:integer) содержат ссылки на все рабочие книги коллекции WorkBooks (i:integer — индекс книги в коллекции). В качестве аргумента при обращении к Item может выступать и строковая переменная, содержащая имя книги. Свойство Count коллекции содержит количество открытых документов коллекции. Используя эти свойства коллекции, мы можем вы-

вести список всех рабочих книг и перейти к работе с любой из них.

Для активизации рабочей книги из списка открытых используем метод Activate объекта Item(i:integer), где i — индекс открытой рабочей книги, а объект Item(i:integer) представляет собой ссылку на рабочую книгу.

После того как рабочая книга выбрана, мы можем ее редактировать, сохранить под прежним или другим именем и закрыть. Для этого используем методы Save, SaveAs и Close.

WorkBook.Save;

if not SaveDialogl.Execute then exit;

WorkBook.SaveAs(SaveDialogl.FileName);

Workbook.Close;

Любую рабочую книгу можно отобразить в виде окна, даже не одного окна, а двух и более окон. Для того чтобы добавить новое окно рабочей книги, используем метод NewWindow объекта WorkBook. Вот процедура, позволяющая добавить новое окно для уже открытой рабочей книги. WorkBook.NewWindow;

Дата добавления: 2014-01-07