Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

глюки с TThread

IOrist © (2007-11-10 14:41:00)
Хочу, чтобы моя прога одновременно работала с Excel и выполняла др. действия. В обработчике TestTread.Execute пишу:

[B]procedure[/B] TestTread.Execute();
[B]var[/B] ExcelApplication1:TExcelApplication;
lcid:integer;
[B]begin[/B]
lcid:=LOCALE_USER_DEFAULT;
ExcelApplication1:=TExcelApplication.Create(ExcelApplication1);

...
[B]end[/B];

Выдает ошибку Stack owerflow. по всякому пытался поправить этот глюк и ничего не пашет.

IOrist (2007-11-10 16:53:00) [1]
спасибо разобрался с этим, токо вот чего осталось.
В конце процедуры, которую я вынес в дочерний поток, у меня открывается книга Excel. Дело в том, что она сразуже закрывается.
Наверно это из-за того, что поток при окончании работы разрушается => разрушает свои локальные переменные.

как зделать чтобы эта книга не закрылась?

IOrist (2007-11-10 16:18:00) [2]
вызвать ColInitialize, а по окончанию CoUninitialize. Тока не могу найти тот модуль (uses), который определяет эти функции.

Anatoly Podgoretsky (2007-11-10 15:45:00) [3]
В более поздних версиях это является параметром функции. Если использовать CoInitializeEx

Kolan (2007-11-10 15:41:00) [4]
> не ну правда, я не понял

http://www.delphikingdom.com/asp/listerrors.asp?ID=62

IOrist (2007-11-10 15:34:00) [5]
не ну правда, я не понял

Palladin (2007-11-10 15:31:00) [6]
За метлой

IOrist (2007-11-10 15:25:00) [7]
Я с потоками в первый раз сталкиваюсь. Я не понял куда че писать.
Можешь по подробнее?

Palladin (2007-11-10 15:21:00) [8]
не забудь после CoUninitialize сделать, по окончанию работы

Palladin (2007-11-10 15:18:00) [9]
ну вот и произведи

предварительно указав в dpr первой строчкой
CoInitFlags:= COINIT_MULTITHREADED;

нужные юниты уж сам постарайся поискать

Anatoly Podgoretsky (2007-11-10 15:17:00) [10]
> IOrist (10.11.2007 15:11:06) [6]

Ну и сделай что просят

IOrist (2007-11-10 15:11:00) [11]
Помогло, но например

lcid:=LOCALE_USER_DEFAULT; ExcelApplication1.Visible[lcid]:=true;

т е открываю сам Excel и появится ошибка
"Небыл произведен вызов ColInitialize".

Palladin (2007-11-10 15:04:00) [12]
жестокий вопрос

откуда я знаю? именно то место которое ты тут написал, никакой ошибки про переполнение стека выдать не может

Anatoly Podgoretsky (2007-11-10 15:02:00) [13]
> IOrist (10.11.2007 14:56:02) [2]

В коде который не приведен.

Kolan (2007-11-10 15:02:00) [14]
> а в чем?

А видимо в том как ты создаешь ExcelApplication1. Что такое Owner ты понимаешь?

ЗЫ
ExcelApplication1:=TExcelApplication.Create(Nil);Помогло?

IOrist (2007-11-10 14:56:00) [15]
а в чем?

Palladin (2007-11-10 14:55:00) [16]
ну во первых ExcelApplication1:=TExcelApplication.Create(Nil);
а во вторых причина не в потоке

Наверх

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