Hi,


ich bin am debuggen einer Anwendung (server.exe) welche eine INDY 10 TCP Server Komponente verwendet.
Aus der Server.onexecute Methode rufe ich eine Methode PaintImageProcess auf welche dann verschiedene Proceduren aus meiner TBitMap "ZeichenKlasse"
aufruft. Der ganze Code funktioniert oft aber nicht immer.

Mit Madshi erhalte ich folgende DEBUG Info (siehe screen dump), der obige Aufrufsequenz wiedergibt. Leider kann ich nur aus der Debug Meldung keine Idee für ein Beheben meines
Fehler ableiten .... ich bin um jeden Input zum weiteren Debuggen dankbar

Das angehängte Bild ist in einer extrem schlechten Qualität. Erkennt man nichts drauf.

Aber pauschal würde ich sagen: Zeichnest du Thread-Safe?

habe gerade den screen dump nochmals in höherer Auflösung hochgeladen. Alle TBitmap.Canvas Operationen habe ich mit

markieren

Delphi-Quellcode:

Bitmap.Lock

.....



BitMap.Unlock

abgesichert.

"server.exe" scheint mir kein gut gewählter Name zu sein.

Zitat von bernhard_LA:

habe gerade den screen dump nochmals in höherer Auflösung hochgeladen.

Probiere doch mal bitte blöderweise Synchronize(BitmapPaintImageProcess) im OnExecute.

der code TThread.Synchronize war bereits von Anfang an drinnen

zusammenfalten · markieren

Delphi-Quellcode:

procedure TServerMainForm.IdTCPServerExecute(AContext: TIdContext);


   ....

    BitMap_PaintImageProcess;

    TThread.Synchronize(nil, BitMap_PaintImageProcess);

    ....