Преглед на файлове

onpaint for TColorSpeedButton

lainz преди 8 години
родител
ревизия
2422e66232
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      colorspeedbutton.pas

+ 1 - 1
colorspeedbutton.pas

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