浏览代码

#383 avoid error if double click OK

circular17 3 年之前
父节点
当前提交
9980004381
共有 1 个文件被更改,包括 1 次插入0 次删除
  1. 1 0
      lazpaint/dialog/color/ucolorize.pas

+ 1 - 0
lazpaint/dialog/color/ucolorize.pas

@@ -97,6 +97,7 @@ end;
 
 procedure TFColorize.Button_OKClick(Sender: TObject);
 begin
+  if FFilterConnector.ActionDone then exit;
   ApplyChosenColor;
   FFilterConnector.ValidateAction;
   FFilterConnector.Parameters.Floats['Hue'] := ChosenHueDegF;