Zitat von himitsu:

Vielliecht wurde da mal was geändert?

Der Test war jetzt mit XE3.

Zitat von himitsu:

Stellt der nach dem EndWrite das BeginWrite eigentlich wieder her?

Das BeginRead, ja!

Anscheinend gibt's da dann deutliche Unterschiede zwischen Free Pascal und den neueren Delphi-Versionen. Ich muss dringend mal schauen, wie Turbo Delphi das macht. Nicht, dass es da generelle, hinterlistige Inkompatibilitäten gibt.

Ich habe mir in der Zwischenzeit mal so weitergeholfen, dass ich eine Subklasse zu TMREW gebaut habe, die (durch eine eigene CriticalSection geschützt) über die Reader Buch führt und für jeden zählt, wie oft er reinkommt. Nur beim ersten Reinkommen und dem dazugehörigen Rauskommen eines Threads werden die entsprechenden BeginRead()- bzw. EndRead()-Aufrufe aus der TMREW-Klasse aufgerufen, anderenfalls die Zähler entsprechend erhöht bzw. verkleinert.

Da ich nur ein paar wenige Threads habe, die darauf zugreifen, geht das bis jetzt ganz gut.