From b22ff23a9b438e42eb9989b38cf3f4bd5158f532 Mon Sep 17 00:00:00 2001
From: Alexey Kulakov <panda75@bk.ru>
Date: Sun, 21 Dec 2014 20:55:35 +0000
Subject: Actman: compilation fix
git-svn-id: http://svn.miranda-ng.org/main/trunk@11565 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
---
plugins/Actman/i_opt_dlg2.inc | 16 +++++-----------
1 file changed, 5 insertions(+), 11 deletions(-)
(limited to 'plugins/Actman')
diff --git a/plugins/Actman/i_opt_dlg2.inc b/plugins/Actman/i_opt_dlg2.inc
index a8d1b2d2f0..f8d1899fb0 100644
--- a/plugins/Actman/i_opt_dlg2.inc
+++ b/plugins/Actman/i_opt_dlg2.inc
@@ -149,7 +149,7 @@ end;
procedure SetSave(Dialog:HWND);
var
TmpMacroList:tMacroList;
- TmpMacro:pMacroRecord;
+// TmpMacro:pMacroRecord;
wnd:HWND;
li:LV_ITEMW;
i,j:integer;
@@ -761,7 +761,7 @@ begin
begin
lvi.iItem :=i;
- lvi.lParam:=i or (CurMacro^.flags and ACF_MACROFLAG);
+ lvi.lParam:=LPARAM(i) or LPARAM(CurMacro^.flags and ACF_MACROFLAG);
{!!
if (CurMacro^.flags and ACF_FIRSTRUN)<>0 then
lvi.lParam:=lvi.lParam or ACF_FIRSTRUN;
@@ -995,12 +995,10 @@ begin
end;
case loword(wParam) of
-
+{
IDC_GROUP_EXPORT: begin
if ShowDlgW(xmlfilename,xmlfilename,TranslateW(inoutfilter),false) then
begin
-aExport(EditMacroList,xmlfilename,0);
-{
wnd:=MacroListWindow;
for i:=0 to ListView_GetItemCount(wnd)-1 do
begin
@@ -1025,19 +1023,15 @@ aExport(EditMacroList,xmlfilename,0);
// we MUST Export EditMacroList, NOT MacroList
// OR
// Use "Apply" code before
-
-// CallService(MS_ACT_INOUT,i,TLPARAM(@xmlfilename));
-
+ CallService(MS_ACT_INOUT,i,TLPARAM(@xmlfilename));
for i:=0 to MaxGroups-1 do
with EditMacroList[i] do
if (flags and (ACF_EXPORT or ACF_ASSIGNED))=
(ACF_EXPORT or ACF_ASSIGNED) then
flags:=flags and not ACF_EXPORT;
-}
end;
-
end;
-
+}
IDC_GROUP_IMPORT: begin
if ShowDlgW(xmlfilename,xmlfilename,TranslateW(inoutfilter)) then
begin
--
cgit v1.2.3