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

SelectDirectory и новые нити в проекте   Найти похожие ветки 

← →
learner ©   (2006-10-12 02:22) [0]

Здравствуйте !
А почему после вызова ( и закрытия ) SelectDirectory
к процессу добавляются две новые нити ?
Правда, одна из них, со временем, исчезает, но другая
так и висит. Как то мне это не нравится :))
У меня количество нитей не резиновое :))

---

← →
Германн ©   (2006-10-12 02:28) [1]

> learner ©   (12.10.06 02:22)
>
> Здравствуйте !
> А почему после вызова ( и закрытия ) SelectDirectory
> к процессу добавляются две новые нити ?
> Правда, одна из них, со временем, исчезает, но другая
> так и висит. Как то мне это не нравится :))
> У меня количество нитей не резиновое :))
>

А как ты это определил?

---

← →
learner ©   (2006-10-12 02:43) [2]

>А как ты это определил?
Баловалась с NtQuerySystemInformation и случайно обратила внимание.
Потом уже и в TaskMgr посмотрела: тоже самое :((

---

← →
Германн ©   (2006-10-12 03:03) [3]

Что-то где-то как-то это мне напомнило из недавнешнего :-)

---

← →
guav ©   (2006-10-12 13:37) [4]

Это - результат того, что задана COINIT_MULTITHREADED модель в CoInitializeEx.
Можно забить на это. Повторный вызов SelectDirectory не приводит к бесконечному росту числа потоков.

---

← →
guav ©   (2006-10-12 13:38) [5]

unit Unit1;

interface

uses
 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
 Dialogs, StdCtrls;

type
 TForm1 = class(TForm)
   Button1: TButton;
   procedure Button1Click(Sender: TObject);
 private
   { Private declarations }
 public
   { Public declarations }
 end;

var
 Form1: TForm1;

implementation

{$R *.dfm}

uses FileCtrl, ComObj,ActiveX;

var S: string;

procedure TForm1.Button1Click(Sender: TObject);
begin
 SelectDirectory("", "", S);
end;

initialization

 //  ComObj.CoInitFlags := COINIT_MULTITHREADED;
 //  ^^ раскоментируй чтобы увидить рост числа потоков.
end.

---

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

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



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