- Fixed loading of hue presets

- Fixed random pane sliding out of the main window
This commit is contained in:
Andreas Schneider 2011-03-29 22:57:11 +02:00
parent 086e6dbb7b
commit 4c76aafe47
2 changed files with 3 additions and 1 deletions

View File

@ -283,7 +283,7 @@ begin
presetElement := TDOMElement(FRandomHuePresetsDoc.DocumentElement.FirstChild);
while presetElement <> nil do
begin
if presetElement.NodeName = 'HuePreset' then
if presetElement.NodeName = 'Preset' then
cbRandomPreset.Items.AddObject(presetElement.AttribStrings['Name'], presetElement);
presetElement := TDOMElement(presetElement.NextSibling);
end;

View File

@ -1882,6 +1882,8 @@ end;
procedure TfrmMain.XMLPropStorage1RestoreProperties(Sender: TObject);
begin
FTextureManager.UseAnims := mnuShowAnimations.Checked;
if spTileList.Top > spTileList.Parent.Height then
spTileList.Top := spTileList.Parent.Height - 200;
end;
procedure TfrmMain.SetX(const AValue: Integer);