From cf9de21af3073e29cb7b149fbd8427241de70729 Mon Sep 17 00:00:00 2001 From: George Hazan Date: Fri, 28 Oct 2016 16:18:50 +0300 Subject: - old useless helpers removed from the Options module; - mir_app functions introduced instead of them; - OPENOPTIONSDIALOG structure removed from m_options.h --- plugins/Watrack/i_opt_dlg.inc | 6 +++--- plugins/Watrack/popup/popups.pas | 2 +- 2 files changed, 4 insertions(+), 4 deletions(-) (limited to 'plugins/Watrack') diff --git a/plugins/Watrack/i_opt_dlg.inc b/plugins/Watrack/i_opt_dlg.inc index 52848bf86b..ad1f576fe4 100644 --- a/plugins/Watrack/i_opt_dlg.inc +++ b/plugins/Watrack/i_opt_dlg.inc @@ -29,13 +29,13 @@ begin odp.pszTemplate:=PAnsiChar(IDD_OPT_PARTS); odp.pfnDlgProc :=@DlgProcOptions0; odp.szTab.a :='Modules'; - CallService(MS_OPT_ADDPAGE,wParam,tlparam(@odp)); + Options_AddPage(wParam,@odp); odp.flags :=ODPF_BOLDGROUPS; odp.pszTemplate:=PAnsiChar(IDD_OPT_BASIC); odp.pfnDlgProc :=@DlgProcOptions1; odp.szTab.a :='Basic'; - CallService(MS_OPT_ADDPAGE,wParam,tlparam(@odp)); + Options_AddPage(wParam,@odp); ptr:=ModuleLink; while ptr<>nil do @@ -46,7 +46,7 @@ begin odp.pszTemplate:=tmpl; odp.pfnDlgProc :=proc; odp.szTab.a :=name; - CallService(MS_OPT_ADDPAGE,wParam,tlparam(@odp)); + Options_AddPage(wParam,@odp); if i>0 then continue; end; ptr:=ptr^.Next; diff --git a/plugins/Watrack/popup/popups.pas b/plugins/Watrack/popup/popups.pas index 689a825a9d..089fe0b957 100644 --- a/plugins/Watrack/popup/popups.pas +++ b/plugins/Watrack/popup/popups.pas @@ -361,7 +361,7 @@ begin odp.szGroup.a :='Popups'; odp.pszTemplate:=PAnsiChar(IDD_OPT_POPUP); odp.pfnDlgProc :=@DlgPopupOpt; - CallService(MS_OPT_ADDPAGE,wParam,tlparam(@odp)); + Options_AddPage(wParam,@odp); result:=0; end; -- cgit v1.2.3