Hi all,

Sorry to send the bug reports here but I can not access  mantis or
freepascal.org. Does any one know why?


BUG1:

In TStringGrid when onDrawCell is triggered if  a Cell is selected the
gdSelected and gdFocused should be on state (as is on Delphi).

BUG2:
In TToolbar when we have a set of CheckButton followed by a separator
and more checkbuttons and they are all grouped=true (including
separator) they should all toggle each other (as in Delphi) .

If the separator is not grouped the the two groups of checkbuttons
should only toggle the group.

Since I was working in Windows and had no Diff here is just the two
changed lines.

toolbutton.inc:540
where:
if (CurButton<>nil) and (CurButton.Style=tbsCheck) and
(CurButton.Grouped)
should be
if (CurButton<>nil) and ((CurButton.Style=tbsCheck) or
(CurButton.Style=tbsSeparator) or (CurButton.Style=tbsDivider) and
(CurButton.Grouped))

toolbutton.inc:548
where:
if (CurButton<>nil) and (CurButton.Style=tbsCheck) and
(CurButton.Grouped)
should be
if (CurButton<>nil) and ((CurButton.Style=tbsCheck) or
(CurButton.Style=tbsSeparator) or (CurButton.Style=tbsDivider) and
(CurButton.Grouped))


With best regards,

Luís Rodrigues

_________________________________________________________________
     To unsubscribe: mail [EMAIL PROTECTED] with
                "unsubscribe" as the Subject
   archives at http://www.lazarus.freepascal.org/mailarchives

Reply via email to