Definition Funktion um Threads zu befüllen

[SyntaxXx]

Guten Abend zusammen,
ich bin gerade dabei, eine multithreaded Anwendung zu schreiben.

Dazu erstelle ich eine bestimmte Anzahl an Workerthreads, welche so lange arbeiten, bis es nichts mehr gibt.
Jetzt brauche ich aber eine Funktion, die die einzelnen Threads mit Werten versorgt.
Doch wo definiere ich diese Funktion?

Wenn ich die in der Threadklasse anlege und z.B. 5 Threads anlege, dann gibt es natürlich diese Methode auch 5 mal und jeder Thread würde alles abarbeiten.
Daher überlege ich, diese Funktion in der TForm Klasse zu definieren.
Doch dann müsste ich aus den Threads raus die Funktion so aufrufen: MeinWert := TForm1.MeineFunktion;

Doch macht man das so oder gibt es da nicht eine bessere Lösung?