diff options
author | Vadim Dashevskiy <watcherhd@gmail.com> | 2013-11-06 15:29:23 +0000 |
---|---|---|
committer | Vadim Dashevskiy <watcherhd@gmail.com> | 2013-11-06 15:29:23 +0000 |
commit | 1109badbf7ade0bd6647654302a6ef5e1bb8fee2 (patch) | |
tree | 586b96688448e7e19e6bcd3df7c13f19457a0526 /plugins/Actman30/iac_program.pas | |
parent | f80981e76fba41be1842aefebacf6be349e76901 (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.pas | 8 |
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);
|