IDE: fixed compilation, bug #26268

git-svn-id: trunk@45336 -
This commit is contained in:
mattias 2014-06-04 11:19:35 +00:00
parent 795c406e7d
commit f7c3dcd538
2 changed files with 6 additions and 0 deletions

View File

@ -1447,7 +1447,9 @@ begin
for mwc:=low(TMsgWndColor) to high(TMsgWndColor) do
fMsgViewColors[mwc]:=XMLConfig.GetValue(
Path+'MsgView/Colors/'+MsgWndColorNames[mwc],MsgWndDefaultColors[mwc]);
{$IFDEF EnableNewExtTools}
MsgViewFilters.LoadFromXMLConfig(XMLConfig,'MsgView/Filters/');
{$ENDIF}
// glyphs
FShowButtonGlyphs := TApplicationShowGlyphs(XMLConfig.GetValue(Path+'ShowButtonGlyphs/Value',
@ -1827,7 +1829,9 @@ begin
for mwc:=low(TMsgWndColor) to high(TMsgWndColor) do
XMLConfig.SetDeleteValue(Path+'MsgView/Colors/'+MsgWndColorNames[mwc],
fMsgViewColors[mwc],MsgWndDefaultColors[mwc]);
{$IFDEF EnableNewExtTools}
MsgViewFilters.SaveToXMLConfig(XMLConfig,'MsgView/Filters/');
{$ENDIF}
// glyphs
XMLConfig.SetDeleteValue(Path+'ShowButtonGlyphs/Value',

View File

@ -617,6 +617,7 @@ begin
Result:=FXMLConfig.Filename;
end;
{$IFDEF EnableNewExtTools}
{ TLMVFilterMsgType }
procedure TLMVFilterMsgType.SetMsgID(AValue: integer);
@ -963,6 +964,7 @@ begin
E(IntToStr(i));
end;
end;
{$ENDIF}
initialization
DefaultConfigClass:=TXMLOptionsStorage;