ソースを参照

Merge branch 'main' into isscint-update

Martijn Laan 1 年間 前
コミット
f89ca119db
1 ファイル変更1 行追加0 行削除
  1. 1 0
      Components/ScintEdit.pas

+ 1 - 0
Components/ScintEdit.pas

@@ -485,6 +485,7 @@ procedure TScintEdit.AddIndicator(const StartPos, EndPos: Integer;
 begin
 begin
   CheckPosRange(StartPos, EndPos);
   CheckPosRange(StartPos, EndPos);
   Call(SCI_SETINDICATORCURRENT, IndicatorNumber, 0);
   Call(SCI_SETINDICATORCURRENT, IndicatorNumber, 0);
+  Call(SCI_SETINDICATORVALUE, IndicatorNumber, 1);
   Call(SCI_INDICATORFILLRANGE, StartPos, EndPos - StartPos);
   Call(SCI_INDICATORFILLRANGE, StartPos, EndPos - StartPos);
 end;
 end;