如何偵測目前Outlook 2000是否已開啟,謝謝。

一個很簡單的方法，您試試看。

void __fastcall TForm1::Button1Click(TObject *Sender)
{
    if (FindWindow("rctrl_renwnd32", NULL))
    {
        ShowMessage("Outlook2000 found");
    }
}

不好意思，這是 C Builder的語法嗎還是...，我是用delphi，所以我不會套用也。 有那位板大大能再幫個忙嗎。

我把它改成這樣: procedure TForm1.Button1Click(Sender: TObject); begin if FindWindow('rctrl_renwnd32', NULL) then ShowMessage('Outlook2000 found'); end; 但卻無法compiler : [Error] Unit1.pas(28): Incompatible types: 'Variant' and 'PChar' 要怎轉型呢?

在畫面上放一個按鈕，在 OnClick 事件裡面寫下面的程式碼：

if FindWindow('rctrl_renwnd32', nil) > 0 then
begin
    ShowMessage('Outlook2000 found');
end;

發表人 - allenchan 於 2004/12/09 14:14:50

if (FindWindow('rctrl_renwnd32', nil)) then begin ShowMessage('Outlook2000 found'); end; 卻出現下列訊息: [Error] Unit1.pas(29): Type of expression must be BOOLEAN

if FindWindow('rctrl_renwnd32', nil) > 0 then begin ShowMessage('Outlook2000 found'); end; 這樣就可以了。感恩。