L
laoyou
Unregistered / Unconfirmed
GUEST, unregistred user!
L
laoyou
Unregistered / Unconfirmed
GUEST, unregistred user!
想知道delphi 程序里面如何实现，[
]
]
L
l_x_yuan
Unregistered / Unconfirmed
GUEST, unregistred user!
shellexecute(handle, 'open', pchar(filename), nil, nil, sw_show);
?
?
D
Delphi_1.0
Unregistered / Unconfirmed
GUEST, unregistred user!
同意l_x_yuan
L
laoyou
Unregistered / Unconfirmed
GUEST, unregistred user!
handle 是指？[]
]
D
duckstar
Unregistered / Unconfirmed
GUEST, unregistred user!
WinHelp(Application.Handle, PChar(ExtractFilePath(Application.ExeName) + 'Help/HrSysSet.hlp'), HELP_CONTENTS, 0);
J
jrq
Unregistered / Unconfirmed
GUEST, unregistred user!
>：请问如何在里实现打开帮助文件 *.hlp?
代码如下：
procedure TForm1.Button1Click(Sender: TObject);
begin
application.HelpFile:='*.hlp';
application.HelpCommand(help_finder,0);
end;
这样就搞定～
当弹出对话框时你可以搜索一下指定目录！
代码如下：
procedure TForm1.Button1Click(Sender: TObject);
begin
application.HelpFile:='*.hlp';
application.HelpCommand(help_finder,0);
end;
这样就搞定～
当弹出对话框时你可以搜索一下指定目录！
小
小唐
Unregistered / Unconfirmed
GUEST, unregistred user!
是指一个整型数值，windows用来知道是哪个窗口调用了shellexecute函数。
D
D影子D
Unregistered / Unconfirmed
GUEST, unregistred user!
uses shellapi;
procedure.......click()
var
handle:hwnd;
begin
shellexecute(handle, 'open', pchar(*.hlp), '-s', '', sw_shownormal);
end;
[]
procedure.......click()
var
handle:hwnd;
begin
shellexecute(handle, 'open', pchar(*.hlp), '-s', '', sw_shownormal);
end;
[
]
L
laoyou
Unregistered / Unconfirmed
GUEST, unregistred user!
[][][]
][][]