2
0
Эх сурвалжийг харах

Cleanup. Value defaults to 1 so not a true fix.

Martijn Laan 1 жил өмнө
parent
commit
9fb02cf4de

+ 1 - 0
Components/ScintEdit.pas

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