|
▼ Novさん
> %windir%\Sysnative を指定する方法もあったりなかったり。
ですね．
32 ビットアプリ専用ですが．以下で起動します．
procedure TForm1.Button1Click(Sender: TObject);
var
LCmdExe : string;
LCmdParam : string;
begin
LCmdExe := 'C:\Windows\Sysnative\rundll32';
LCmdParam := 'printui.dll,PrintUIEntry /s';
ShellExecute(Handle, nil, PChar(LCmdExe), PChar(LCmdParam), nil, SW_SHOWNORMAL);
end;
|