From c0c16a96a67312c05c1e836b885fc3ae6671f1a2 Mon Sep 17 00:00:00 2001
From: George Hazan <george.hazan@gmail.com>
Date: Wed, 27 Feb 2013 12:19:08 +0000
Subject: another attempt to fix problems with FPC & CALLSERVICE_NOTFOUND

git-svn-id: http://svn.miranda-ng.org/main/trunk@3793 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
---
 plugins/QuickSearch/sr_window.pas | 40 +++++++++++++++++++--------------------
 1 file changed, 20 insertions(+), 20 deletions(-)

(limited to 'plugins/QuickSearch')

diff --git a/plugins/QuickSearch/sr_window.pas b/plugins/QuickSearch/sr_window.pas
index 517ab736ad..5655e70792 100644
--- a/plugins/QuickSearch/sr_window.pas
+++ b/plugins/QuickSearch/sr_window.pas
@@ -128,7 +128,7 @@ var
   cbkg_sub,
   cfgr_sub:TCOLORREF;
   AdvFilter:cardinal;
-  
+
 function GetQSColumn(item:integer):LPARAM;
 var
   i:integer;
@@ -500,7 +500,7 @@ var
   cni:TCONTACTINFO;
   dbei:TDBEVENTINFO;
   hDbEvent:cardinal;
-  tmp:int_ptr;
+  tmp:uint_ptr;
   protov:PAnsiChar;
 begin
   FillChar(res,SizeOf(tQSRec),0);
@@ -661,7 +661,7 @@ begin
     i2  := res2^.data;
     typ1:=i1=uint_ptr(-1);
     typ2:=i2=uint_ptr(-1);
-    
+
     if (typ1 and typ2) then // string & string
     begin
       if (res2.text=nil) and (res1.text=nil) then // nil
@@ -1101,7 +1101,7 @@ begin
       end;
     end;
   end;
-  
+
   SendMessage(grid,WM_SETREDRAW,1,0);
   InvalidateRect(grid,nil,false);
 
@@ -1128,7 +1128,7 @@ begin
   UpdateSB;
 
   AdvancedFilter; //!!
-  
+
   ListView_SetItemState(grid,0,LVIS_FOCUSED or LVIS_SELECTED,
     LVIS_FOCUSED or LVIS_SELECTED);
 end;
@@ -1541,7 +1541,7 @@ begin
             end;
           end;
           p^:=#0;
-          
+
           CopyToClipboard(pp,false);
           mFreeMem(pp);
           exit;
@@ -1762,7 +1762,7 @@ begin
   end
   else
     qsopt.ascendsort:=not qsopt.ascendsort;
-  
+
   if qsopt.ascendsort then
     hdi.hbm:=sortcoldn
   else
@@ -1830,17 +1830,17 @@ procedure SetCellColor(lplvcd:PNMLVCUSTOMDRAW;idx:integer);
 begin
   if qsopt.colorize then
   begin
-    with FlagBuf[idx] do 
+    with FlagBuf[idx] do
     begin
       if (flags and QSF_ACCDEL)<>0 then
       begin
-        lplvcd^.clrTextBk:=cbkg_del; 
+        lplvcd^.clrTextBk:=cbkg_del;
         lplvcd^.clrText  :=cfgr_del;
       end
       else if (flags and QSF_ACCOFF)<>0 then
       begin
-        lplvcd^.clrTextBk:=cbkg_dis; 
-        lplvcd^.clrText  :=cfgr_dis; 
+        lplvcd^.clrTextBk:=cbkg_dis;
+        lplvcd^.clrText  :=cfgr_dis;
       end
       else if (flags and QSF_META)<>0 then
       begin
@@ -1854,7 +1854,7 @@ begin
       end
       else if (flags and QSF_INLIST)=0 then
       begin
-        lplvcd^.clrTextBk:=cbkg_hid; 
+        lplvcd^.clrTextBk:=cbkg_hid;
         lplvcd^.clrText  :=cfgr_hid;
       end
       else
@@ -1867,8 +1867,8 @@ begin
   begin
     if (not qsopt.drawgrid) and odd(lplvcd^.nmcd.dwItemSpec) then
     begin
-      lplvcd^.clrTextBk:=cbkg_odd; 
-      lplvcd^.clrText  :=cfgr_odd; 
+      lplvcd^.clrTextBk:=cbkg_odd;
+      lplvcd^.clrText  :=cfgr_odd;
     end
     else
     begin
@@ -1897,7 +1897,7 @@ begin
       result:=CDRF_NOTIFYSUBITEMDRAW;
 
       SetCellColor(lplvcd,LV_GetLParam(grid,lplvcd^.nmcd.dwItemSpec));
-      
+
       exit;
     end;
     CDDS_SUBITEM or CDDS_ITEMPREPAINT: begin
@@ -1947,7 +1947,7 @@ begin
       begin
         i:=LV_GetLParam(grid,lplvcd^.nmcd.dwItemSpec);
         FastWideToAnsiBuf(MainBuf[i,sub].text,buf);
-        
+
 //        ListView_GetItemTextA(grid,lplvcd^.nmcd.dwItemSpec,lplvcd^.iSubItem,buf,SizeOf(buf));
         if buf[0]<>#0 then
         begin
@@ -1968,7 +1968,7 @@ var
   li:LV_ITEM;
 begin
   result:=0;
-  case hMessage of 
+  case hMessage of
     WM_CHAR: if wParam=27 then
     begin
       PostMessage(GetParent(Dialog),WM_COMMAND,(BN_CLICKED shl 16)+IDCANCEL,0);
@@ -2371,7 +2371,7 @@ begin
       FillProtoCombo(GetDlgItem(Dialog,IDC_CB_PROTOCOLS));
 
       PrepareTable;
-      
+
       if pattern<>nil then
       begin
         SetDlgItemTextW(Dialog,IDC_E_SEARCHTEXT,pattern)
@@ -2406,7 +2406,7 @@ begin
       SendMessageW(HintWnd,TTM_ADDTOOLW,0,tlparam(@TI));
 //      SetWindowsHookEx(WH_KEYBOARD,@QSKbdHook,0,GetCurrentThreadId);
       colorhook:=HookEvent(ME_COLOUR_RELOAD,@ColorReload);
-      
+
       opened:=true;
     end;
 
@@ -2880,7 +2880,7 @@ begin
         // screen
         with qsopt.columns[column] do // atm - to the end only
           addcolumn(grid,tablecolumns,width,TranslateW(title));
-        
+
         // fill new column
         FillLVColumn(column,tablecolumns);
         // index
-- 
cgit v1.2.3