|
@@ -757,10 +757,7 @@ begin
|
|
case GetMode of
|
|
case GetMode of
|
|
gmPrior:
|
|
gmPrior:
|
|
if (FCurrentItem^.Previous = FBeginItem) or (FCurrentItem = FBeginItem) then
|
|
if (FCurrentItem^.Previous = FBeginItem) or (FCurrentItem = FBeginItem) then
|
|
- begin
|
|
|
|
- Result := grBOF;
|
|
|
|
- FCurrentItem := FBeginItem;
|
|
|
|
- end
|
|
|
|
|
|
+ Result := grBOF
|
|
else
|
|
else
|
|
FCurrentItem:=FCurrentItem^.Previous;
|
|
FCurrentItem:=FCurrentItem^.Previous;
|
|
gmCurrent:
|
|
gmCurrent:
|