summaryrefslogtreecommitdiff
path: root/plugins/HistoryPlusPlus
diff options
context:
space:
mode:
Diffstat (limited to 'plugins/HistoryPlusPlus')
-rw-r--r--plugins/HistoryPlusPlus/HistoryForm.pas8
-rw-r--r--plugins/HistoryPlusPlus/hpp_external.pas2
-rw-r--r--plugins/HistoryPlusPlus/hpp_services.pas2
3 files changed, 6 insertions, 6 deletions
diff --git a/plugins/HistoryPlusPlus/HistoryForm.pas b/plugins/HistoryPlusPlus/HistoryForm.pas
index 0ce99caf3d..3cec81369e 100644
--- a/plugins/HistoryPlusPlus/HistoryForm.pas
+++ b/plugins/HistoryPlusPlus/HistoryForm.pas
@@ -593,7 +593,7 @@ procedure THistoryFrm.LoadHistory(Sender: TObject);
ToRead := Max(0, HistoryLength - hppFirstLoadBlock - 1);
LineIdx := HistoryLength - 2;
repeat
- hDBEvent := db_event_prev(hDBEvent);
+ hDBEvent := db_event_prev(hContact,hDBEvent);
History[LineIdx] := NotZero(hDBEvent);
{ if NeedhDBEvent = hDbEvent then begin
Result := HistoryLength-LineIdx-1;
@@ -1490,7 +1490,7 @@ begin
begin
if History[ridx] <> 0 then
break;
- hDBEvent := db_event_prev(hDBEvent);
+ hDBEvent := db_event_prev(hContact,hDBEvent);
History[ridx] := NotZero(hDBEvent);
end;
end
@@ -1508,7 +1508,7 @@ begin
begin
if History[ridx] <> 0 then
break;
- hDBEvent := db_event_next(hDBEvent);
+ hDBEvent := db_event_next(hContact,hDBEvent);
History[ridx] := NotZero(hDBEvent);
end;
end;
@@ -2050,7 +2050,7 @@ begin
begin
if Sessions[idx].hDBEventLast = hDBEvent then
begin
- hDBEvent := db_event_prev(hDBEvent);
+ hDBEvent := db_event_prev(hContact,hDBEvent);
if hDBEvent <> 0 then
begin
Sessions[idx].hDBEventLast := hDBEvent;
diff --git a/plugins/HistoryPlusPlus/hpp_external.pas b/plugins/HistoryPlusPlus/hpp_external.pas
index 39eeff99fd..5c61e363fb 100644
--- a/plugins/HistoryPlusPlus/hpp_external.pas
+++ b/plugins/HistoryPlusPlus/hpp_external.pas
@@ -177,7 +177,7 @@ begin
not boolean(event.dwFlags and IEEF_NO_SCROLLING));
if eventCount > 0 then Dec(eventCount);
if eventCount <> 0 then
- hDBNext := db_event_next(hDBNext);
+ hDBNext := db_event_next(event.hContact,hDBNext);
end;
ExtGrid.EndUpdate;
end;
diff --git a/plugins/HistoryPlusPlus/hpp_services.pas b/plugins/HistoryPlusPlus/hpp_services.pas
index 05821743bc..3ffda00576 100644
--- a/plugins/HistoryPlusPlus/hpp_services.pas
+++ b/plugins/HistoryPlusPlus/hpp_services.pas
@@ -193,7 +193,7 @@ begin
sel := -1;
while (hDbEvent <> oep.hDbEvent) and (hDbEvent <> 0) do
begin
- hDbEvent := db_event_prev(hDbEvent);
+ hDbEvent := db_event_prev(oep.hContact,hDbEvent);
Inc(item);
end;
if hDbEvent = oep.hDbEvent then