[Lazarus] Is it posibble change cursor in source editor

[Martin Frb]

Still the same, just line numbers are changed. Search for 
TSynEditScreenCaret.Create(

Or go to ide/SourceSynEditor and
in  line 1610
   constructor TIDESynEditor.Create(AOwner: TComponent);
add
ScreenCaret.ChangePainter(TSynEditScreenCaretPainterInternal);
TSynEditScreenCaretPainterInternal(ScreenCaret.Painter).Color :=



On 06/02/2015 13:50, FreeMan wrote:
> 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
>>
>
>
> -- 
> _______________________________________________
> Lazarus mailing list
> Lazarus at lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus