summaryrefslogtreecommitdiff
path: root/plugins/Actman30/iac_program.pas
diff options
context:
space:
mode:
authorVadim Dashevskiy <watcherhd@gmail.com>2013-11-06 15:29:23 +0000
committerVadim Dashevskiy <watcherhd@gmail.com>2013-11-06 15:29:23 +0000
commit1109badbf7ade0bd6647654302a6ef5e1bb8fee2 (patch)
tree586b96688448e7e19e6bcd3df7c13f19457a0526 /plugins/Actman30/iac_program.pas
parentf80981e76fba41be1842aefebacf6be349e76901 (diff)
Actman 30 merged with Awk's
git-svn-id: http://svn.miranda-ng.org/main/trunk@6806 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
Diffstat (limited to 'plugins/Actman30/iac_program.pas')
-rw-r--r--plugins/Actman30/iac_program.pas8
1 files changed, 5 insertions, 3 deletions
diff --git a/plugins/Actman30/iac_program.pas b/plugins/Actman30/iac_program.pas
index 56e494b3d2..83cc60a5f9 100644
--- a/plugins/Actman30/iac_program.pas
+++ b/plugins/Actman30/iac_program.pas
@@ -320,13 +320,14 @@ begin
CheckDlgButton(Dialog,IDC_FLAG_PARALLEL,BST_UNCHECKED);
end;
-procedure FillFileName(Dialog:HWND;idc:integer);
+function FillFileName(Dialog:HWND;idc:integer):boolean;
var
pw,ppw:pWideChar;
begin
mGetMem(pw,1024*SizeOf(WideChar));
ppw:=GetDlgText(Dialog,idc);
- if ShowDlgW(pw,ppw) then
+ result:=ShowDlgW(pw,ppw);
+ if result then
begin
SetDlgItemTextW(Dialog,idc,pw);
SetEditFlags(Dialog,idc,EF_SCRIPT,0);
@@ -437,7 +438,8 @@ begin
BN_CLICKED: begin
case loword(wParam) of
IDC_PROGRAM: begin
- FillFileName(Dialog,IDC_EDIT_PRGPATH);
+ if not FillFileName(Dialog,IDC_EDIT_PRGPATH) then
+ exit;
end;
end;
SendMessage(GetParent(GetParent(Dialog)),PSM_CHANGED,0,0);