Ah, ok. Aber du kannst doch gleich den Pointer auf den Record übergeben:
Delphi-Quellcode:
type
PMyThread = ^TmyThread;
TMyThread = record
InUse :Boolean;
FormHandle :THandle;
Text :String;
..... usw.
end;
var
FThread :Array[0..20] of TMyThread;
function GeloesterThread(MyThread: PmyThread): LongInt; stdcall;
begin
//in i steht dann der index
MyThread.InUse:=False;
end;
FThread[i].ThreadHandle:=BeginThread(nil, 0, @FMake,integer(@FThread[i]), 0, FThread[i].ThreadID);