VPF::SuspendThread и ResumeThread - Форум программистов

Kg1

Дата 15.10.2010, 00:09 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 8
Регистрация: 29.9.2010

Репутация: нет
Всего: нет

Народ у меня тут проблема с остановкой потоков....что не так? помогите плиииз=))

Код


//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
int a,b,c,d,e;
TForm1 *Form1;
//---------------------------------------------------------------------------
DWORD WINAPI thread1 (LPVOID);
  DWORD WINAPI thread1 (LPVOID)
  {    while (Form1->ProgressBar1->Position<100)
    {ResumeThread(thread1);
     a=a+5; Form1->ProgressBar1->Position=a;
         SuspendThread(thread1);
        int k=rand()%2000;
            Sleep(k);}
  }

    DWORD WINAPI thread2 (LPVOID);
  DWORD WINAPI thread2 (LPVOID)
  {     while (Form1->ProgressBar2->Position<100)
    {ResumeThread(thread2);
    b=b+5; Form1->ProgressBar2->Position=b;
         SuspendThread(thread2);
        int kg=rand()%2500;
            Sleep(kg);}
  }
   DWORD WINAPI thread3 (LPVOID);
  DWORD WINAPI thread3 (LPVOID)
  {    while (Form1->ProgressBar3->Position<100)
    {ResumeThread(thread3);
    c=c+5; Form1->ProgressBar3->Position=c;
         SuspendThread(thread3);
        int kg=rand()%3000;
            Sleep(kg);}
  }
   DWORD WINAPI thread4 (LPVOID);
  DWORD WINAPI thread4 (LPVOID)
  {     while (Form1->ProgressBar4->Position<100)
    {ResumeThread(thread4);
    d=d+5; Form1->ProgressBar4->Position=d;
         SuspendThread(thread4);
        int kg=rand()%3500;
            Sleep(kg);}
  }
   DWORD WINAPI thread5 (LPVOID);
  DWORD WINAPI thread5 (LPVOID)
  {    while (Form1->ProgressBar5->Position<100)
    {ResumeThread(thread5);
    e=e+5; Form1->ProgressBar5->Position=e;
         SuspendThread(thread5);
        int kg=rand()%4000;
            Sleep(kg);}
  }
       void as (void);
       void as () { HANDLE writer;
  writer=CreateThread(NULL,0,thread1,NULL,CREATE_SUSPENDED,NULL);
 HANDLE writer2;
  writer2=CreateThread(NULL,0,thread2,NULL,THREAD_SUSPEND_RESUME,NULL);
  HANDLE writer3;
  writer3=CreateThread(NULL,0,thread3,NULL,THREAD_SUSPEND_RESUME,NULL);
  HANDLE writer4;
  writer4=CreateThread(NULL,0,thread4,NULL,THREAD_SUSPEND_RESUME,NULL);
  HANDLE writer5;
  writer5=CreateThread(NULL,0,thread5,NULL,THREAD_SUSPEND_RESUME,NULL);
  ResumeThread (writer);
  }

__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{    

}

//---------------------------------------------------------------------------
void __fastcall TForm1::Button4Click(TObject *Sender)
{
Form1->Close();    
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{  ProgressBar1->Position=0;
ProgressBar2->Position=0;
ProgressBar3->Position=0;
ProgressBar4->Position=0;
ProgressBar5->Position=0;
a=0;b=0;c=0;d=0;e=0;
}
//---------------------------------------------------------------------------


void __fastcall TForm1::Button5Click(TObject *Sender)
{ ResumeThread (thread1);
ResumeThread(thread2);
ResumeThread(thread3);
ResumeThread(thread4);
ResumeThread(thread5);

}
//---------------------------------------------------------------------------








void __fastcall TForm1::Button1Click(TObject *Sender)
{
as ();

}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)
{   as ();
  SuspendThread(thread1);
  SuspendThread(thread2);
  SuspendThread(thread3);
  SuspendThread(thread4);
  SuspendThread(thread5);
}
//---------------------------------------------------------------------------

Пожалуй и архивчик с прогой тоже выложу!!!

Это сообщение отредактировал(а) Kg1 - 15.10.2010, 00:10

Присоединённый файл ( Кол-во скачиваний: 2 )

_____3.rar 724,40 Kb

xvr

Дата 15.10.2010, 09:20 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 7046
Регистрация: 28.8.2007
Где: Дублин, Ирландия

Репутация: 40
Всего: 223

Жуть

Что должно было делать и что получается?
Первое наблюдение - в thread'ах нельзя работать с VCL объектами, созданными не в этом thread'е

GremlinProg

Дата 15.10.2010, 09:32 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 2706
Регистрация: 9.8.2005
Где: Тюмень

Репутация: 99
Всего: 106

да и ResumeThread принимает не указатель на функцию потока, а его дескриптор

но даже если бы это было правильным, что можно ждать от

Код


SuspendThread(thread1);

в цикле этого же thread1?

не будет тут цикл крутиться, он остановится на первом же SuspendThread,
пока кто-нибудь не пробудит этот поток извне

Добавлено @ 09:32

Цитата(GremlinProg @ 15.10.2010, 11:32

)

да и ResumeThread принимает не указатель на функцию потока

как и SuspendThread, естественно

Это сообщение отредактировал(а) GremlinProg - 15.10.2010, 12:20

--------------------

"Гений всегда разумнее, чем умнее. Ум — это машина, разум — водитель этой машины."

Estranged

Дата 15.10.2010, 09:35 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 158
Регистрация: 30.8.2010

Репутация: 3
Всего: 3

УжОс. А с ResumeThread проблем нет? smile

ResumeThread и SuspendThread принимают HANDLE потока, а не адрес процедуры! Т.е. нужно запомнить HANDLE потоков, а потом: writer=CreateThread... ResumeThread (writer)... SuspendThread (writer)... А перед выходом из приложения сделать CloseHandle (writer)...
А так же ResumeThread возвратит -1 в случае ошибки, можно вызвать GetLastError и получить код ошибки.

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C/C++: Системное программирование и WinAPI \| Следующая тема »