paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-11 07:40:39 +01:00
Code Issues Packages Projects Releases Wiki Activity

IDE: less hints

Browse Source 
git-svn-id: trunk@49407 -
This commit is contained in:
mattias 2015-06-22 10:26:33 +00:00
parent 56f918d463
commit 4d82c8f4d6
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/idecoolbardata.pas
View File

@ -225,6 +225,7 @@ begin
if ButtonName <> '' then
FButtonNames.Add(ButtonName);
end;
Result:=true;
end;
function TIDEToolBarOptions.Save(XMLConfig: TXMLConfig; SubPath: String; aPos: Integer): Boolean;
@ -238,6 +239,7 @@ begin
for I := 0 to ButtonNames.Count-1 do
XMLConfig.SetDeleteValue(SubPath + PosStr + '/Buttons/Name' + IntToStr(I+1) + '/Value',
ButtonNames[I], '');
Result:=true;
end;
{ TIDECoolBarOptions }