■ プロセスのリストの取得
初心者
2009/03/10(火) 21:32:41 <初心者> 
http://mrxray.on.coocan.jp/Delphi/plSamples/901_WMI_SoftWare.htm
上記の03_プロセスのリストを参考にして、TThreadでテキストファイルにプロセスのリストを出力することを考えています。
出力はプロセス名・パス・使用メモリ等です。
多分フォームを持たないのでエラーになっていると思いますが、解決方法がわかりません。
環境は７Pro XPです。
エラー箇所は
Locator := CoSWbemLocator.Create;
です。
エラーメッセージは
EOleSysError クラスの例外を生成しました。
'CoInitialize は呼び出されていません。'
です。
宜しくお願いします。
そのまんま
2009/03/11(水) 00:14:46
そのエラーメッセージが言ってる通りにすればエラーは出ないよ。
初心者
2009/03/11(水) 13:07:07 <初心者>
そのまんまさん回答有難う御座います。
追加しましたが同じ箇所で終了してしまいます。
try
if CoInitialize(nil) <> S_OK then Exit;
Locator := CoSWbemLocator.Create;
^^ここでエラーも発生しなくて終了してしまいます。
except
~
end;
んで...
2009/03/11(水) 13:39:30
CoInitializeの戻り値は？
初心者
2009/03/11(水) 14:02:12 <初心者>
んで...さんコメント有難う御座います。
if CoInitialize(nil) <> S_OK then Exit;
を通過しているのでS_OKだと思います
毎週金曜日はポイント最大3倍！さらに4倍のチャンスも！
