Incorrect iteration direction for SelectLast method caused it to act like SelectFirst

This commit is contained in:
Mark van Renswoude 2010-03-30 13:24:19 +00:00
parent 6b13daa2dc
commit 7c3d746844
1 changed files with 1 additions and 1 deletions

View File

@ -2661,7 +2661,7 @@ begin
if AllowInteraction then
begin
Result := Iterate(FindEnabledItem, mbdDown);
Result := Iterate(FindEnabledItem, mbdUp);
if Assigned(Result) then
SelectedItem := Result;
end;