掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
WindowsからDOS窓を見せないようにするには？ (ID:45614)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
例えば、こんなコードはどうでしょうか？ Win7,D6では動作しました。 ただ、Win7,XE4ではエラーが出ました。 var cmd: string; StartupInfo: TStartupInfo; ProcessInfo: TProcessInformation; begin FillChar(StartupInfo, SizeOf(TStartupInfo), 0); StartupInfo.cb := SizeOf(TStartupInfo); //コマンドプロンプトウィンドウを非表示に StartupInfo.dwFlags := StartF_UseShowWindow; StartupInfo.wShowWindow := SW_Hide; //ＤＯＳのＴｒｅｅコマンドを実行 cmd := 'command.com /c tree c:\temp > c:\tree.txt'; if CreateProcess(nil, PChar(cmd), nil, nil, False, 0, nil, 'c:\', StartupInfo, ProcessInfo) then begin WaitForSingleObject(ProcessInfo.hProcess, Infinite); CloseHandle(ProcessInfo.hProcess); end; end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.