Martin wrote:
On 20/02/2012 09:24, Mark Morgan Lloyd wrote:
I've got a Synedit here which uses code as below to rule alternate
background lines to a light colour:
procedure TListForm.PaneMainEditSpecialLineColors(Sender: TObject;
Line: integer;
var Special: boolean; var FG,
BG: TColor);
begin
MusicRuleColour(line, FG, BG)
end { TListForm.PaneMainEditSpecialLineColors } ;
Add
Special := true;
The event is called for all lines, color is only taken, if Special is set
Thanks Martin, I think I was reading that the wrong way round (i.e. the
special overruled colour).
Any thoughts on what could be messing up the font?
--
Mark Morgan Lloyd
markMLl .AT. telemetry.co .DOT. uk
[Opinions above are the author's, not those of his employers or colleagues]
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
