![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Правильное закрытие Handl - а
learner © (2006-06-11 01:43:00)Помогите разобраться.
Я создаю нить, которая выводит сообщение и закрываю Handle нити.
Но я его закрываю раньше, чем нить завершиться.
Разве так можно ?
Если нет, то как надо действовать ?
function MessBoxThread(const pMess:PChar):DWord; stdcall;
begin
MessageBox(0,pMess,PChar(ParamStr(0)),MB_OK or MB_ICONINFORMATION);
ExitThread(0);
Result:=0;
end;
procedure MessBox(const Mess:string);
var
ThreadHandle,ThreadID:DWord;
begin
ThreadHandle:=CreateThread(nil,0,@MessBoxThread,PChar(Mess),0,ThreadID);
if ThreadHandle<>0 then CloseHandle(ThreadHandle);
end;
DrPass (2006-06-11 02:27:00) [1]
> Разве так можно ?
Можно, но абсолютно ни к чему. CloseHandle не убьет поток, пока он выполняется, зато убъет единственный дескриптор, с помощью которого ты можешь управлять этим потоком. Убивай после того, как поток отработает (тут тебе пригодится WaitForSingleObject)