parent
7859332e70
commit
a9583c24b2
|
|
@ -4246,7 +4246,7 @@ type thighlightercoloredter=class(tvcform)
|
|||
begin
|
||||
if flistboxchanging then return ;
|
||||
idx := listbox1.ItemIndex;
|
||||
if idx >=0 and idx<7 then
|
||||
if idx <7 and idx>=0 then
|
||||
begin
|
||||
cl := colorcombobox1.getcurrentColor();
|
||||
ffrontcolors[idx] := cl;
|
||||
|
|
|
|||
|
|
@ -1928,7 +1928,7 @@ type TColorbox=class(TcustomListBox)
|
|||
r["color"] := cl;
|
||||
FitemData.splice(0,1,r);
|
||||
p := parent ;
|
||||
if p is TColorCombobox then p.Notification(self,"customcolorchanged");
|
||||
if p is class(TColorCombobox) then p.Notification(self,"customcolorchanged");
|
||||
end
|
||||
end
|
||||
fcustomcolor;
|
||||
|
|
|
|||
Loading…
Reference in New Issue