TThread objekt finden mit ThreadID

[bart57]

Hallo,

wie kann ich das TThread objekt finden wenn ich nur die ThreadID habe ?


Danke im Voraus.

[hoika]

Hallo,

warum packst die deine erzeugten Threads nicht in eine
zusätzliche Liste ?
Dann kannst du die ihn dort suchen.


Heiko

[bart57]

???

[Udontknow]

Hallo!

Geht es um nicht selber erzeugte Threads? Ansonsten hat Hoika ja recht: Wenn du einen Thread erstellst, schreibst du die Objektvariable in eine TObjectlist-Instanz...

Cu,
UDontknow

[bart57]

Ich habe nur die ThreadID un möchte gern damit das TThread-Objekt finden.

Damke

[hoika]

Hallo,

warum hast du nur die ID ?
Vielleicht von einem anderen Programm ?

Dann bekommst du natürlich kein TThread-Objekt,
wie soll das auch gehen.
Falls das andere Programm z.B. c++ ist, gibt es dort sowas nicht,
TThread kapselt ja nur die API-Methoden
und ein fremdes das Handle unterzuschieben, geht afaik nicht.


Heiko

[bart57]

ich habe eine Client-Server Anwendung.
Im Client habe ich die ThreadId.
Der Benutzer kann/soll eine bestimmte Server-Thread anhand der ThreadId beenden können.

Im Server konnte ich ja die Procedure TerminateThread benutzen, aber ich möchte
gern das TThread-Objekt raus gewinnen und dann TThread.Terminate benutzen !



Danke

[hoika]

Hallo,

das geht aber so nicht.
Da könnte ja jeder mit ner Thread-ID (da sich wohl auch ermitteln lässt),
den Thread eines anderen Programmes beenden.

Du musst schon per Kommunikation machen,
der Client teilt dem Server die ID mit,
und der Server beendet den Thread.


Heiko

[bart57]

Dass ist mir ja alles klaar, ich mache es ja auch so ich schick im Server die ThreadID die im Server zu Beenden ist.

Aber ich was nicht wie aus der ThreadID das TThread bekommen....



Danke

[sh17]

Zitat:

Zitat von hoika

Da könnte ja jeder mit ner Thread-ID (da sich wohl auch ermitteln lässt),
den Thread eines anderen Programmes beenden.

Da würde ich mal gegenhalten. z.B. der Prozess-Explorer von MS SysInternals kann so was. Der zeigt alle Threads eines Prozesses an und kann jeden einzeln killen.

[hoika]

Hallo,

1. geht das nur als Admin,
2. es geht hier nicht um API Thread killen, sondern per TThread

Und nun zum Server.
Packe im Server-Prozess alle erzeugten Threads in eine (TObjectList)
und suche das TThread dann.

Anderes geht es afaik nicht.

Wenn ich z.B. folgendes habe.

Delphi-Quellcode:

procedure TForm1.Add(theList: TList);
var
  MyClass: TMyClass;
begin
  MyClass:= TMyClass.Create;
  theList.Add(MyClass);
end;

procedure TForm1.OnButtonClick;
begin
  Add(List);  // List ist hier mal Form-Varaible
end;

,komme ich nur noch über die Liste an das MyClass.



Heiko

[bart57]

Danke,

aber dass helft mich glaube ich nicht so....
Wie kann ich in der Liste das TThread-Objekt finden wenn ich nur die ThreadID habe ?

[CCRDude]

1. RTFM, TThread.ThreadID
2. Überdenke das Kommunikationsprotokoll zwischen Client und Server noch einmal, wenn Du nichts besseres hast.

[bart57]

Was ist RTFM?

[hoika]

RTM

read the fucking manual ;)
ThreadId ist eine Variable in TThread

Das Eintragen in eine TObjectList solltest zu alleine schaffen
und for-Schleife, um die Liste zu durchsuchen auch, oder ?


Heiko

[bart57]

Leider nicht...

Es ist mir gar nicht klaar wie Sie es machen wollen... :-( Sorry



Danke !

[hoika]

Hallo,

dein Client fordert vom Server ja eine Dienstleistung.
Der Server erzeugt einen Thread (TThread) und gibt die Thread-Id an den Client weiter.

Der Server zeugt den Thread aber nicht nur,
sondern packt ihn in eine Liste.
Die Liste (ThreadList) ist "global" für den Server.

Delphi-Quellcode:

var
  ThreadList: TList;  // oder was immer für eine Liste

procedure CreateMyThread;
var
  MyThread: TMyThread;
begin
  MyThread:= TMyThread.Create;

  ThreadList.Add(MyThread);
end;

Diese ThreadList musst du führen,
wird ein Thread beendet, fliegt er aus der Liste raus.

Zum Suchen dann einfahc ne Schleife über "ThreadList".


Heiko

[bart57]

Danke!!!

[Luckie]

Siehe dazu auch: http://www.michael-puff.de/Developer...er_Klassen.php