Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.08.27;
Скачать: [xml.tar.bz2];

Вниз

Даже не знаю как тему назвать   Найти похожие ветки 

 
Hadroran   (2006-08-08 12:37) [0]

Проблема непонятна в корне. Есть код

mcp: Variant;
...
          if (VarIsEmpty(mcp)) then
             mcp:=CreateOleObject("WinCC-Runtime-Project");
          if (not VarIsEmpty(mcp)) then
             Edit1.Text:=mcp.GetValue("TagName_1");

который работает по нажатию кнопки.
Но как только этот код пытается выполниться в потоке
на коде mcp:=CreateOleObject("WinCC-Runtime-Project");
заканчивается выполнение потока.
Этот код прописал по нажатию кнопки - работает при физическом нажатии кнопки, но как только я из потока вызываю событие FormGlava.Button6Click(Self); - теже кокони. Что можно сделать?


 
Reindeer Moss Eater ©   (2006-08-08 12:41) [1]

не проинициализировано оле для вторичного потока


 
Hadroran   (2006-08-08 13:12) [2]

>Reindeer Moss Eater

а как сие сделать?
Я так понял, что этот код
 if (VarIsEmpty(mcp)) then
     mcp:=CreateOleObject("WinCC-Runtime-Project");

надо написать при создании потока?


 
Reindeer Moss Eater ©   (2006-08-08 13:13) [3]

КоуИнициалайз


 
Hadroran   (2006-08-08 13:19) [4]

клевононихренанепонятно


 
Ketmar ©   (2006-08-08 13:22) [5]

> [4] Hadroran   (08.08.06 13:19)

тогданаверноеполезночитатьсправку.


 
Сергей М. ©   (2006-08-08 13:25) [6]

try
mcp:=CreateOleObject("WinCC-Runtime-Project");
..
except
on e:Exception do
  MessageBox(0, PChar(e.Message), "Ашипка"б mb_ok or mb_setforeground);
end;

читай текст "ашипки", вникай, копайся в справке, принимай меры.


 
Hadroran   (2006-08-08 13:26) [7]

ребята реально читаю, но не пойму как приинициализировать, что написать


 
MBo ©   (2006-08-08 13:28) [8]

CoInitialize(nil) нужно вызывать в каждом потоке, работающем с OLE (для главного это уже автоматически сделано при подключении библиотек)


 
Ketmar ©   (2006-08-08 13:29) [9]

> [7] Hadroran   (08.08.06 13:26)

для каждого потока, где юзают OLE/COM, надо делать CoInitialise(). о чем тебе и сказали в [3].


 
Hadroran   (2006-08-08 13:43) [10]

вот, понял не дурак
спасибо, теперь буду знать, в книге блиннениписанонихрена



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

Форум: "Начинающим";
Текущий архив: 2006.08.27;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.048 c
15-1154372410
Gydvin
2006-07-31 23:00
2006.08.27
Зацените компонент


6-1144575799
Djnt
2006-04-09 13:43
2006.08.27
Кэширование WEB-страниц в прокси...КАК?


2-1154666654
валет
2006-08-04 08:44
2006.08.27
connect ADO


15-1154323092
Ega23
2006-07-31 09:18
2006.08.27
С Днём рождения! 31 июля


2-1154930963
валет
2006-08-07 10:09
2006.08.27
word





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский