From 2bbb9971bf1711850504d93828f571e27147abc7 Mon Sep 17 00:00:00 2001
From: George Hazan <george.hazan@gmail.com>
Date: Sat, 30 Mar 2013 20:10:26 +0000
Subject: MS_DB_EVENT_* services' calls removed from pascal sources

git-svn-id: http://svn.miranda-ng.org/main/trunk@4262 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
---
 plugins/HistoryPlusPlus/hpp_searchthread.pas | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'plugins/HistoryPlusPlus/hpp_searchthread.pas')

diff --git a/plugins/HistoryPlusPlus/hpp_searchthread.pas b/plugins/HistoryPlusPlus/hpp_searchthread.pas
index 7d1669a5e4..30effa8ae4 100644
--- a/plugins/HistoryPlusPlus/hpp_searchthread.pas
+++ b/plugins/HistoryPlusPlus/hpp_searchthread.pas
@@ -204,7 +204,7 @@ procedure TSearchThread.BuildContactsList;
     SetLength(Contacts, Length(Contacts) + 1);
     Contacts[High(Contacts)].hContact := Cont;
     Contacts[High(Contacts)].Timestamp := 0;
-    hDB := CallService(MS_DB_EVENT_FINDLAST, Cont, 0);
+    hDB := db_event_last(Cont);
     if hDB <> 0 then
     begin
       Contacts[High(Contacts)].Timestamp := GetEventTimestamp(hDB);
@@ -415,7 +415,7 @@ end;
 
 function TSearchThread.GetItemsCount(hContact: THandle): Integer;
 begin
-  Result := CallService(MS_DB_EVENT_GETCOUNT, hContact, 0);
+  Result := db_event_count(hContact);
 end;
 
 procedure TSearchThread.IncProgress;
@@ -432,12 +432,12 @@ begin
   CurContactCP := GetContactCodePage(Contact);
   CurContact := Contact;
   DoMessage(HM_STRD_NEXTCONTACT, wParam(Contact), lParam(GetContactsCount));
-  hDBEvent := CallService(MS_DB_EVENT_FINDLAST, Contact, 0);
+  hDBEvent := db_event_last(Contact);
   while (hDBEvent <> 0) and (not Terminated) do
   begin
     if SearchEvent(hDBEvent) then
       SendItem(hDBEvent);
-    hDBEvent := CallService(MS_DB_EVENT_FINDPREV, hDBEvent, 0);
+    hDBEvent := db_event_prev(hDBEvent);
   end;
   SendBatch;
 end;
-- 
cgit v1.2.3