D
delphiboy
Unregistered / Unconfirmed
GUEST, unregistred user!
combobox1.Items.Clear ;
combobox1.Items.Assign(printer.Printers);
if combobox1.Items.CommaText='' then
begin
ShellExecute(0, 'open', 'rundll','shell32.dll,SHHelpShortcuts_RunDLL AddPrinter', '', SW_SHOWNORMAL);
end else
PrinterSetupDialog1.Execute ;
end;
我的意思是,如果当前存在打印机就显示出来,不存在就出现安装打印机向导,但
ShellExecute这句好象执行了,但没有出现安装向导啊?
combobox1.Items.Assign(printer.Printers);
if combobox1.Items.CommaText='' then
begin
ShellExecute(0, 'open', 'rundll','shell32.dll,SHHelpShortcuts_RunDLL AddPrinter', '', SW_SHOWNORMAL);
end else
PrinterSetupDialog1.Execute ;
end;
我的意思是,如果当前存在打印机就显示出来,不存在就出现安装打印机向导,但
ShellExecute这句好象执行了,但没有出现安装向导啊?