|
@@ -949,7 +949,7 @@ begin
|
|
|
iter := high(iter);
|
|
iter := high(iter);
|
|
|
while assigned(pcurr) and (iter>0) do
|
|
while assigned(pcurr) and (iter>0) do
|
|
|
begin
|
|
begin
|
|
|
- if (pcurr^.size>size) then
|
|
|
|
|
|
|
+ if (pcurr^.size>=size) then
|
|
|
begin
|
|
begin
|
|
|
if not assigned(pbest) or (pcurr^.size<pbest^.size) then
|
|
if not assigned(pbest) or (pcurr^.size<pbest^.size) then
|
|
|
begin
|
|
begin
|
marco