From d83baeb842ea828eaee90a0cd6575872a95240e8 Mon Sep 17 00:00:00 2001 From: Alexey Kulakov Date: Sat, 8 Mar 2014 13:10:05 +0000 Subject: Pascal-style type correction Letter case correction small fixes Actman UA part dialog slightly changed git-svn-id: http://svn.miranda-ng.org/main/trunk@8473 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c --- plugins/QuickSearch/i_ok.inc | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'plugins/QuickSearch/i_ok.inc') diff --git a/plugins/QuickSearch/i_ok.inc b/plugins/QuickSearch/i_ok.inc index da9f138b81..be7f046233 100644 --- a/plugins/QuickSearch/i_ok.inc +++ b/plugins/QuickSearch/i_ok.inc @@ -209,7 +209,7 @@ begin end; -function DoMeta(hContact:MCONTACT):pointer; +function DoMeta(hContact:TMCONTACT):pointer; var pw:pWideChar; i:integer; @@ -433,7 +433,7 @@ end; //----- Initial table filling ----- -procedure AddContact(num:integer;hContact:MCONTACT); +procedure AddContact(num:integer;hContact:TMCONTACT); var col:pcolumnitem; tmpstr:array [0..63] of AnsiChar; @@ -476,7 +476,7 @@ end; function PrepareToFill:boolean; var cnt,cnt1:integer; - hContact:MCONTACT; + hContact:TMCONTACT; i:integer; begin result:=false; -- cgit v1.2.3