Threads und TBitmaps

[Whookie]

Lockst du deinen MyBild.Canvas auch korrekt?

Delphi-Quellcode:

procedure TPaintThread.CalcABitmap(const MyBild: TBitmap);
begin
   MyBild.Lock;
   try
     .. malen bis der bär kommt ..
   finally
     MyBild.Unlock;
  end;
end;