Скачать: CL | DM;

Использование PivotTable - Access Violation   Найти похожие ветки 

← →
saasik   (2005-07-22 15:55) [0]

Программа использует MS PivotTable для построения OLAP отчетов.
Все работет прекрасно. При закрытии приложения возникает ошибка
Access violation.
PivotTable создается в OleContainer.
В начале выполняется:
OleContainer1.CreateObject("OWC10.PivotTable",False);
В конце:
 OleContainer1.DestroyObject;
Все эти строчки выполняются корректно.
Ошибка уже возникает после строчки
 Application.Run
Что делать?

---

← →
saasik   (2005-07-22 16:01) [1]

Все, проблему решил.
Оказалось, банально надо было в конце присвоить null
переменной, содержащей объект Pivot Table.
Всем, кто будет читать, на будущее:

var PT : Variantl
OleContainer1.CreateObject("OWC10.PivotTable",False);
PT := OleContainer1.OleObject;
With OleContainer1 do Begin
  AutoActivate := aaManual;
  DoVerb(ovShow);
End;
...
With OleContainer1 do
Begin
  DoVerb(ovHide);
End;
OleContainer1.DestroyObject;
PT := null;

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.027 c