From 0173277372e2962b8f5703a0ebad7892dda15e6c Mon Sep 17 00:00:00 2001 From: George Hazan Date: Sun, 9 Mar 2014 21:50:49 +0000 Subject: end of the old MC API git-svn-id: http://svn.miranda-ng.org/main/trunk@8534 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c --- plugins/HistoryPlusPlus/hpp_externalgrid.pas | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'plugins/HistoryPlusPlus/hpp_externalgrid.pas') diff --git a/plugins/HistoryPlusPlus/hpp_externalgrid.pas b/plugins/HistoryPlusPlus/hpp_externalgrid.pas index c0ee6c38e5..7001eda5e5 100644 --- a/plugins/HistoryPlusPlus/hpp_externalgrid.pas +++ b/plugins/HistoryPlusPlus/hpp_externalgrid.pas @@ -93,7 +93,7 @@ type FGridState: TGridState; SaveDialog: TSaveDialog; RecentFormat: TSaveFormat; - FSubContact: THandle; + FSubContact: TMCONTACT; FSubProtocol: AnsiString; function GetGridHandle: HWND; @@ -144,7 +144,7 @@ type public constructor Create(AParentWindow: HWND; ControlID: Cardinal = 0); destructor Destroy; override; - procedure AddEvent(hContact, hDBEvent: THandle; Codepage: Integer; RTL: Boolean; DoScroll: Boolean); + procedure AddEvent(hContact:TMCONTACT; hDBEvent: THandle; Codepage: Integer; RTL: Boolean; DoScroll: Boolean); procedure AddCustomEvent(hContact: THandle; const CustomItem: TExtCustomItem; Codepage: Integer; RTL: Boolean; DoScroll: Boolean); procedure SetPosition(x, y, cx, cy: Integer); @@ -277,7 +277,7 @@ begin Result := M.Result; end; -procedure TExternalGrid.AddEvent(hContact, hDBEvent: THandle; Codepage: Integer; RTL: Boolean; +procedure TExternalGrid.AddEvent(hContact:TMCONTACT; hDBEvent: THandle; Codepage: Integer; RTL: Boolean; DoScroll: Boolean); var RTLMode: TRTLMode; @@ -1110,7 +1110,7 @@ end; procedure TExternalGrid.HMMetaDefaultChanged(var M: TMessage); var - newSubContact: THandle; + newSubContact: TMCONTACT; newSubProtocol: AnsiString; begin if Grid.Contact <> M.WParam then -- cgit v1.2.3