E
Hallo bronstein,
__fastcall animation::animation(bool CreateSuspended)
: TThread(CreateSuspended)
{
}
ist der Konstruktor den du mit new benutzen mußt.
TThread animat;
animat = new animation (true);
Execute und Beispiele zu der Funktionsweise eines Thread findest du in der Hilfe wenn du nach TThread suchst. Ein Beispiel für Execute kann sein:
void __fastcall TSendPosFunk::Execute()
{
int ret = 0; // Fehlercode der Funktionen
while (!Terminated) // Endlos-Schleife des Thread
{
// Warten auf die Ereignisse
ret = WaitForMultipleObjects(2, FluPosEvent, False, INFINITE);
// Ein Thread-Ereignis ist aufgetreten?
switch (ret - WAIT_OBJECT_0)
{
case FluPos_Event:
{
Synchronize(BearbeiteEreignis); // Ereignis bearbeiten
break; }
// Thread beenden
case FluPos_End: {
Terminate(); // beenden des Thread
break; }
default: {
// Fehler in den Logfile schreiben
ErrText->msgErrorInt
(2,
IFEHLER,
"[TSendPosFunk::Execute]",
" Ein unbekanntes Ereignis ist aufgetreten!");
break; }
} // Ende: switch (ret - WAIT_OBJECT_0)
} // Ende: while (!Terminated)
} // Ende: Funktion
Gestartet wird ein mit Resume oder mit der Variablen "CreateSuspended" im Konstruktor.
Viel Erfolg
Evi48