Использование методов коллекции WorkBooks позволяет не только созда-
вать, но и открывать имеющиеся рабочие книги, которые хранятся в фай-
лах. Для этих целей предназначены методы Open и OpenText. Первый метод
открывает файл формата XLS, а второй — обычные текстовые файлы. Для
простоты используем метод Open с одним аргументом — строкой-ука-
зателем на файл. Вот текст процедуры Delphi, использующей метод Open.
Рис. 11.4. Рабочая книга, созданная по шаблону
Открытие существующей рабочей книги Excel
procedure TForml.Button7Click(Sender: TObject);
begin
i f not OpenDialog2.Execute then exit;
E.WorkBooks.Open(OpenDialog2.FileName);
end;
Полная спецификация вызова метода Open представлена в справочной сис-
теме MS Excel и имеет следующий вид:
Open(FileName, UpdateLinks, Readonly, Format, Password, WriteResPassword,
IgnoreReadOnlyRecommended, Origin, Delimiter, Editable, Notify,
Converter, AddToMRU);
Обязательным является первый аргумент. Для задания специфических ре-
жимов открытия файла можно использовать и другие аргументы. Их список
и краткое назначение приведены в табл. 11.1.
Таблица 11.1. Аргументы метода Open
При открытии рабочей книги можно использовать любую комбинацию ар-
гументов метода Open. Например, чтобы открыть файл в режиме "только
для чтения", изменим представленный выше пример процедуры и предста-
вим его в следующем виде.
Открытие рабочей книги в режиме "только для чтения"
procedure TForml.Button7Click{Sender: TObject);
begin
if not 0penDialog2.Execute then exit;
E.WorkBooks.Open(FileName:= 0penDialog2.FileName, ReadOnly:=True);
end;
|
Главная
Каталог файлов
