diff options
| author | George Hazan <george.hazan@gmail.com> | 2014-02-24 19:46:11 +0000 |
|---|---|---|
| committer | George Hazan <george.hazan@gmail.com> | 2014-02-24 19:46:11 +0000 |
| commit | 0269e9306300f5ca12d5120a5a0f3051adfc4302 (patch) | |
| tree | b4aab6bb1ccf14d02250a32ac987eb01b4337ec0 /plugins/QuickSearch | |
| parent | c3b624f7b50818dc54fc9f3d82bc6ce89254fd85 (diff) | |
old/unused types removed from Pascal sources
git-svn-id: http://svn.miranda-ng.org/main/trunk@8267 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
Diffstat (limited to 'plugins/QuickSearch')
| -rw-r--r-- | plugins/QuickSearch/i_ok.inc | 6 | ||||
| -rw-r--r-- | plugins/QuickSearch/sr_window.pas | 22 |
2 files changed, 14 insertions, 14 deletions
diff --git a/plugins/QuickSearch/i_ok.inc b/plugins/QuickSearch/i_ok.inc index 40708b8901..cb4b161694 100644 --- a/plugins/QuickSearch/i_ok.inc +++ b/plugins/QuickSearch/i_ok.inc @@ -209,7 +209,7 @@ begin end;
-function DoMeta(hContact:HCONTACT):pointer;
+function DoMeta(hContact:MCONTACT):pointer;
var
pw:pWideChar;
i:integer;
@@ -433,7 +433,7 @@ end; //----- Initial table filling -----
-procedure AddContact(num:integer;hContact:HCONTACT);
+procedure AddContact(num:integer;hContact:MCONTACT);
var
col:pcolumnitem;
tmpstr:array [0..63] of AnsiChar;
@@ -476,7 +476,7 @@ end; function PrepareToFill:boolean;
var
cnt,cnt1:integer;
- hContact:THCONTACT;
+ hContact:MCONTACT;
i:integer;
begin
result:=false;
diff --git a/plugins/QuickSearch/sr_window.pas b/plugins/QuickSearch/sr_window.pas index fd241bb3d4..d9b83503c9 100644 --- a/plugins/QuickSearch/sr_window.pas +++ b/plugins/QuickSearch/sr_window.pas @@ -51,7 +51,7 @@ type end;
pQSFRec = ^tQSFRec;
tQSFRec = record // row (contact)
- contact:HCONTACT;
+ contact:MCONTACT;
proto :uint_ptr;
flags :dword;
status :dword;
@@ -115,7 +115,7 @@ begin end;
end;
-procedure AddContactToList(hContact:HCONTACT;num:integer);
+procedure AddContactToList(hContact:MCONTACT;num:integer);
var
li:LV_ITEMW;
i:integer;
@@ -337,7 +337,7 @@ end; //----- contacts actions -----
-function GetFocusedhContact:HCONTACT;
+function GetFocusedhContact:MCONTACT;
var
i:integer;
begin
@@ -348,7 +348,7 @@ begin result:=FlagBuf[i].contact;
end;
-procedure ShowContactMsgDlg(hContact:HCONTACT);
+procedure ShowContactMsgDlg(hContact:MCONTACT);
begin
if hContact<>0 then
begin
@@ -357,7 +357,7 @@ begin end;
end;
-procedure DeleteOneContact(hContact:HCONTACT);
+procedure DeleteOneContact(hContact:MCONTACT);
begin
if ServiceExists(strCListDel)>0 then
CallService(strCListDel,hContact,0)
@@ -388,8 +388,8 @@ end; procedure ConvertToMeta;
var
- hMeta:HCONTACT;
- tmp:HCONTACT;
+ hMeta:MCONTACT;
+ tmp:MCONTACT;
i,j:integer;
begin
j:=ListView_GetItemCount(grid)-1;
@@ -438,7 +438,7 @@ end; procedure UpdateLVCell(item,column:integer;text:pWideChar=pWideChar(-1));
var
li:LV_ITEMW;
- contact:HCONTACT;
+ contact:MCONTACT;
row:integer;
begin
contact:=FlagBuf[LV_GetLParam(grid,item)].contact;
@@ -469,7 +469,7 @@ end; procedure MoveToGroup(group:PWideChar);
var
- contact:HCONTACT;
+ contact:MCONTACT;
i,j,grcol,row:integer;
begin
j:=ListView_GetItemCount(grid)-1;
@@ -512,7 +512,7 @@ end; procedure MoveToContainer(container:PWideChar);
var
- contact:HCONTACT;
+ contact:MCONTACT;
i,j,grcol,row:integer;
begin
j:=ListView_GetItemCount(grid)-1;
@@ -784,7 +784,7 @@ begin UpdateLVCell(SendMessage(grid,LVM_GETNEXTITEM,-1,LVNI_FOCUSED),cmcolumn,qsr.text);
end;
-function ShowContactMenu(wnd:HWND;hContact:HCONTACT;col:integer=-1):HMENU;
+function ShowContactMenu(wnd:HWND;hContact:MCONTACT;col:integer=-1):HMENU;
var
mi:TCListMenuItem;
pt:tpoint;
|