File indicator_draw_x86_64.patch of Package fp-ide-en
--- ./ide/wcedit.pas.orig 2008-07-21 01:37:48.000000000 +0400
+++ ./ide/wcedit.pas 2013-02-26 09:47:48.426075567 +0400
@@ -777,6 +777,7 @@
L: array[0..1] of Longint;
S: String[15];
B: TDrawBuffer;
+ K: String;
begin
if assigned(CodeOwner) and
(CodeOwner^.ELockFlag>0) then
@@ -812,7 +813,13 @@
{$endif debug}
L[0] := Location.Y + 1;
L[1] := Location.X + 1;
- FormatStr(S, ' %d:%d ', L);
+// FormatStr(S, ' %d:%d ', L);
+ Str(L[0],S);
+ if Length(S)<6 then S:=' '+S;
+ S:=S+':';
+ Str(L[1],K);
+ if Length(K)<3 then K:=K+' ';
+ S:=S+K;
MoveStr(B[8 - Pos(':', S)], S, Color);
end;
WriteBuf(0, 0, Size.X, 1, B);