[Lazarus] Is it posibble change cursor in source editor
FreeMan
freeman35 at delphiturkiye.com
Fri Feb 6 14:50:23 CET 2015
Hello Martin,
After this message, syneditpointclasses.pas file is changed, create
codes etc. If its possible sent new suggestion please?
On 31.01.2015 21:50, FreeMan wrote:
> thank you Martin, I can look next week.
>
> On 31.01.2015 21:24, Martin Frb wrote:
>>
>> It might be now, but you need to do a couple of code changes, since
>> no options exist.
>>
>> unit:
>> components\synedit\syneditpointclasses.pas
>>
>> line 2410
>> constructor TSynEditScreenCaret.Create(AHandleOwner: TWinControl);
>>
>> change (old)
>> FCaretPainter :=
>> TSynEditScreenCaretPainterSystem.Create(AHandleOwner);
>> into (new)
>> FCaretPainter :=
>> TSynEditScreenCaretPainterInternal.Create(AHandleOwner);
>>
>>
>> Then find (same unit),
>> procedure TSynEditScreenCaretPainterInternal.Paint;
>>
>> and change the color
>> - black inverts
>> - white does nothing
>> - red inverts the blue and green, but leaves red untouched.
>> if you have some medium grey as background, try $808080
>
>
> --
> _______________________________________________
> Lazarus mailing list
> Lazarus at lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
>
More information about the Lazarus
mailing list