Ich habe nicht alles nachvollzogen, aber ein paar Sachen sind mir aufgefallen:
1.) keine CS bei Append und Ende
2.) in diesem Block
Delphi-Quellcode:
FThread.Append(Bild);
Sleep(250);// -> 4 Bilder / 1 Sek.
läuft der Thread ja bereits.....
3.) wenn das:
Delphi-Quellcode:
Procedure TMainForm.RepeaterTimer(Sender: TObject);
Begin
Repeater.Enabled:=False;
ScannenClick(nil);
End;
ausgeführt wird, wird jedes mal eine neuer Thread losgetreten
Vielleicht schaut Sir Rufo mal drüber ....