TParallel : "Kein Eigentümer der Objektsperre"

[Harry Stahl]

Habe nun bestimmte Rechenoperationen für Bitmaps mit TParallel.Task gelöst.

Bei Zeichenaktionen (z.B. mit einem Werkzeug über eine Grafik malen) kommt dann hin und wieder die Meldung:

"Kein Eigentümer der Objektsperre".

Nehme mal an, dass irgendwo ein Zeichenevent ausgelöst wird, während eines der zu zeichnenden Bitmaps in der TParallel.Tasks berechnet wird.

Wie löst man das am Besten:

Ein Lock vor der TParallel-Berechnung auf das Bitmap setzen und hinterher wieder freigeben und dann bei allen Zeichenaktionen prüfen, ob ein Lock auf dem Bitmap ist und z.B. so lange warten, bis das wieder frei ist?

[Uwe Raabe]

Vielleicht auf einer Kopie der Bitmap arbeiten und am Ende die Instanzen austauschen?

[Harry Stahl]

Wie tauscht man denn bei Bitmaps richtigerweise die Instanzen aus?

Temporäres Bitmap erzeugen, Original zuweisen, mit Temp-Bit arbeiten, am Ende wieder dem Original das Tempbit zuweisen?

Delphi-Quellcode:

  BitUnten := Tbitmap.Create;
  BitUnten.Assign (BitUntenA);

  // mit BitUnten arbeiten
  BitUntenA.Assign(BitUnten);
  BitUnten.Free;

[Bernhard Geyer]

Zitat von Harry Stahl:

Habe nun bestimmte Rechenoperationen für Bitmaps mit TParallel.Task gelöst.

Bei Zeichenaktionen (z.B. mit einem Werkzeug über eine Grafik malen) kommt dann hin und wieder die Meldung:

"Kein Eigentümer der Objektsperre".

Zeichnen? Ich hoffe doch nicht über die WinAPI? Das eigentliche Problem das die VCL nicht Threadsafe ist, ist das die GDI/Fenster-Handels Thread-Affin sind. D.h. das sie nur im erzeugenden Thread.
gültig sind.

[Uwe Raabe]

Zitat von Harry Stahl:

Wie tauscht man denn bei Bitmaps richtigerweise die Instanzen aus?

So geht's etwas schneller:

Delphi-Quellcode:

  BitUnten := Tbitmap.Create;
  BitUnten.Assign (BitUntenA);

  // mit BitUnten arbeiten
  BitUntenA.Free;
  BitUntenA := BitUnten;

[/QUOTE]

[Harry Stahl]

Also, es geht um diese Situation (vgl. auch anliegenden Screenshot):

Habe ein Bild, das aus mehreren Ebenen besteht. Das berechnete Ergebnis wird auf den Canvas einer Paintbox ausgegeben.

Nun kann man mit dem Zeichenstift über das Bild malen. Ich prüfe währenddessen, welche in welchem Bereich gemalt wird, übertrage diese Zeichenaktion auf den Ausschnitt der gerade bemalten Ebene und berechne alles neu und zeige es wieder auf dem Canvas der Paintbox an.

Anscheinend findet irgendwo ändern des Bitmaps und zeichnen des Bitmaps gleichzeitig statt.

Bislang hatte ich damit keine Probleme, aber wenn ich mit TParallel mehrere Tasks verwende und den geänderten Bereich der Ebenen-Bitmap aktualisiere, kommt hin und wieder diese Fehlermeldung.

[Mavarik]

Zitat von Harry Stahl:

Anscheinend findet irgendwo ändern des Bitmaps und zeichnen des Bitmaps gleichzeitig statt.

Da arbeitest aber nicht auf der Bitmap die zum Anzeigen verwendet wird, oder?

[Bernhard Geyer]

Zitat von Mavarik:

Zitat von Harry Stahl:

Anscheinend findet irgendwo ändern des Bitmaps und zeichnen des Bitmaps gleichzeitig statt.

Da arbeitest aber nicht auf der Bitmap die zum Anzeigen verwendet wird, oder?

Das habe ich schon mit http://www.delphipraxis.net/1280778-post4.html gefragt.

[Harry Stahl]

In gewisser Hinsicht kann das passieren, dass das Bitmap vom Anwender bearbeitet wird, gleichzeitig aber bestimmte Bearbeitungsprozesse damit parallel passieren (z.B. erkennen, welche Bereiche geändert wurden und diese dann in eine Redo/Undo Sicherung geschrieben werden).

Daher wäre hier die Frage, wie man den Zugriff auf das Bitmap am besten schützt (evtl. mit Lock?), bzw. prüft, ob das gerade irgendwie in der Verwendung ist.

[thesakal]

Kein Eigentümer der Objektsperre : Wenn man nicht bestimmen Height und Width von Bitmap before 'beginscene', es passiert diese Meldung.