掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
FlVをMP3に変換 (ID:38304)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
こんには,Mr.XRAYです. >後は実行時にDOS窓がでてきるので引数で隠せるのか等 手前味噌ですが,これを非表示にするコードがあります. Fusaさんの作成したユニットをDelphi2009以降にも対応コードに修正したものです. こういうのを持っていると何かと便利です.(^^; ただし,ShellExecuteではなく,CreateProcessです. また,大変申し訳ありませんが,動作確認はDelphi5〜2010です. ■ 03_使用したリダイレクトのユニット http://mrxray.on.coocan.jp/Delphi/plSamples/552_PipeRedirect.htm#03 今回の事例では,例えば以下のようになるでしょうか. // usesにCommandLineUnitを追加 procedure TForm1.Button1Click(Sender: TObject); var ACmdLine : TCommandLineUnit; ACmdStr : String; begin ACmdStr := 'ffmpeg.exe -i "c:\a.flv" -ab 128 out.mp3'; ACmdLine := TCommandLineUnit.Create; try ACmdLine.GrabStdOutText(ACmdStr); finally FreeAndNil(ACmdLine); end; ShowMessage('END!!'); end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.