1 |
|
5 |
//------------------------------------------------------------
|
2 |
|
|
//------------------------------------------------------------
|
3 |
|
|
// MAGiC
|
4 |
|
|
// Jean Christophe Cuillière et Vincent FRANCOIS
|
5 |
|
|
// Département de Génie Mécanique - UQTR
|
6 |
|
|
//------------------------------------------------------------
|
7 |
|
|
// Le projet MAGIC est un projet de recherche du département
|
8 |
|
|
// de génie mécanique de l'Université du Québec à
|
9 |
|
|
// Trois Rivières
|
10 |
|
|
// Les librairies ne peuvent être utilisées sans l'accord
|
11 |
|
|
// des auteurs (contact : francois@uqtr.ca)
|
12 |
|
|
//------------------------------------------------------------
|
13 |
|
|
//------------------------------------------------------------
|
14 |
|
|
//
|
15 |
|
|
// tsolve.h
|
16 |
|
|
//
|
17 |
|
|
//------------------------------------------------------------
|
18 |
|
|
//------------------------------------------------------------
|
19 |
|
|
// COPYRIGHT 2000
|
20 |
|
|
// Version du 02/03/2006 à 11H25
|
21 |
|
|
//------------------------------------------------------------
|
22 |
|
|
//------------------------------------------------------------
|
23 |
|
|
|
24 |
|
|
#ifndef tsolveH
|
25 |
|
|
#define tsolveH
|
26 |
|
|
//---------------------------------------------------------------------------
|
27 |
|
|
#include <Classes.hpp>
|
28 |
|
|
#include <time.h>
|
29 |
|
|
//---------------------------------------------------------------------------
|
30 |
|
|
class tsolve : public TThread
|
31 |
|
|
{
|
32 |
|
|
typedef struct tagTHREADNAME_INFO
|
33 |
|
|
{
|
34 |
|
|
DWORD dwType; // must be 0x1000
|
35 |
|
|
LPCSTR szName; // pointer to name (in user addr space)
|
36 |
|
|
DWORD dwThreadID; // thread ID (-1=caller thread)
|
37 |
|
|
DWORD dwFlags; // reserved for future use, must be zero
|
38 |
|
|
} THREADNAME_INFO;
|
39 |
|
|
private:
|
40 |
|
|
void SetName();
|
41 |
|
|
protected:
|
42 |
|
|
void __fastcall Execute();
|
43 |
|
|
class Tfsolve& fen;
|
44 |
|
|
|
45 |
|
|
public:
|
46 |
|
|
__fastcall tsolve(bool CreateSuspended,Tfsolve &var);
|
47 |
|
|
clock_t debut;
|
48 |
|
|
void __fastcall Terminate(TObject *Sender);
|
49 |
|
|
|
50 |
|
|
};
|
51 |
|
|
//---------------------------------------------------------------------------
|
52 |
|
|
#endif
|