Artefakte beim Zeichnen auf Edit Canvas

[s.h.a.r.k]

Aber du bist doch 1px vom Rand entfernt mit deiner Grafik!? Sicher, dass es nicht daran liegt?

Was passiert, wenn du hier noch ein Repaint einfügst:

Delphi-Quellcode:

...

  case Msg.Msg of
    WM_SIZE, WM_SETFONT, WM_FONTCHANGE, WM_WINDOWPOSCHANGED,
    CM_FONTCHANGED, CM_BORDERCHANGED, CM_CTL3DCHANGED:
      if not (csLoading in ComponentState) then
        UpdateEditMargins;

      //
      // Repaint
      //

  end; 

...

(Vergiss bitte das begin und end nicht )