Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Excel. Exception: заполнение и выделение


DevilDevil ©   (2007-06-21 18:27:00) 

Периодически обновляю лист Excel-я следующим образом:


var
 R : variant;
begin
 App.EnableEvents := false;
 R := GetRange;
 R.Value := DataArray;
 App.EnableEvents := true;
 R := UnAssigned;
end;


Однако, если в этот момент в Excel-e выделить какую-то область, то возникает Exception.

Как избежать этой и подобных неприятных ситуаций ?

Заранее благодарен


DevilDevil   (2007-06-22 15:52:00) [1]

> Сергей М. ©   (22.06.07 11:05) [3]

EOleException with message 'OLE error 80AC472'

возникает если в момент BeginUpdate() пользователь (я) выделял группу ячеек

procedure TExcelUtil.BeginUpdate();
{var
 ErrCheck : variant;}

begin
 App.UserControl  := false;
 App.Interactive  := false;
 App.EnableEvents := false;

 App.ScreenUpdating := false;
 App.Calculation := xlCalculationManual;

 {ErrCheck := App.ErrorCheckingOptions;
 ErrCheck.BackgroundChecking := false;
 ErrCheck.NumberAsText := false;
 ErrCheck.InconsistentFormula := false;

 FreeVariant(ErrCheck);}

end;


Сергей М.   (2007-06-22 11:05:00) [2]


> возникает Exception


Какое конкретно ?


DevilDevil   (2007-06-22 10:49:00) [3]

> Сергей М. ©   (22.06.07 08:40) [1]

есть там некоторые внутренние данные...

В общем я заполняю определённую область в таблице. GetRange возвращает эту область (Range), имея размеры моей области. DataArray содержит данные, которые надо в эту область занести.

Моя область никак не связана с выделенной областью


Сергей М.   (2007-06-22 08:40:00) [4]

Что такое GetRange, как он связан с текущим выделением ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо