createprocessを使用して開いたプロセスに文字列を送信するにはどうすればよいですか?
私はここStackoverflowで見つけたものの助けを借りてこのようなものを書きました:
var
StartUpInfo:TStartUpInfo;
ProcessInfo: TProcessInformation;
Creationflags: Cardinal;
FillChar(StartUpInfo, sizeOf(TStartupinfo),0);
StartUpInfo.cb := SizeOf(StartupInfo);
Creationflags := NORMAL_PRIORITY_CLASS;
if Createprocess(nil, Pchar('c:\program files\adobe\reader 9.0\reader\acrord32.exe'
+ ' ' + '/h /O /N /T "c:\ps\test2.pdf" "Generic printer"'),nil, nil,False,
creationflags, nil, 0 , StartUpInfo , ProcessInfo) then
begin
WaitForSingleObject(ProcessInfo.HProcess, infinite);
begin
//write some information into the process (a window that opens in
//acrobatreader) and then I want to press the enter button
end;
CloseHandle(processinfo.hProcess);
end;
だから私が欲しいのは、プロセスが終了したときに(singleobjectを待つ直後に)行を書き、次に「Enter」ボタンを押して、最後にプロセスが終了したときにプロセスを閉じることです。誰かが外部プロセスと対話する方法を知っていますか?プログラミングに関しては、私はまったくの初心者です。
よろしくお願いします