Kaynağa Gözat

onpaint for TColorSpeedButton

lainz 8 yıl önce
ebeveyn
işleme
2422e66232
1 değiştirilmiş dosya ile 1 ekleme ve 1 silme
  1. 1 1
      colorspeedbutton.pas

+ 1 - 1
colorspeedbutton.pas

@@ -333,7 +333,7 @@ begin
   PaintRect:=ClientRect;
   PaintRect:=ClientRect;
   MeasureDraw(true,PaintRect,PreferredWidth,PreferredHeight);
   MeasureDraw(true,PaintRect,PreferredWidth,PreferredHeight);
 
 
-  //inherited Paint;
+  if Assigned(OnPaint) then OnPaint(Self);
 end;
 end;
 {$endif}
 {$endif}