Hallo,
mit folgender prozedur starte ich ein Thread:
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9:
| procedure TForm1.ButtonClick(Sender: TObject); var BeispielThread: TBeispielThread; begin Label1.Font.Color:= ClYellow; Label1.Caption:= 'Beispielthread läuft'; BeispielThread:= TBeispielThread.Create(False); BeispielThread.FreeOnTerminate:= True; end; |
Nun will ich aus einer anderen Prozedure heraus diesen und alle anderen Threads abbrechen.
Dabei weiß ich aber nicht ob der Thread läuft oder nicht.
Jeder Thread hat bei mir eine eigene Unit. Die obige prozedur und die, aus der abgebrochen werden soll, sind in unit1.
Ciao Xenar
Moderiert von
raziel: Code- durch Delphi-Tags ersetzt.Moderiert von
Klabautermann: Topic aus Sonstiges verschoben am So 01.05.2005 um 15:19