"remove" button is now disabled if list is empty

This commit is contained in:
zueuk 2006-04-05 10:59:04 +00:00
parent d0c390ff7f
commit 7fddbe82d1

View File

@ -74,7 +74,9 @@ begin
s := Copy(s, 0, length(s) - 4);
Listitem.Caption := s;
end;
if Favorites.Count <> 0 then ListView.Selected := ListView.Items[0];
if Favorites.Count <> 0 then ListView.Selected := ListView.Items[0]
else
btnRemove.Enabled := False;
if ListView.Items.Count <= 1 then
begin
btnMoveUp.Enabled := False;