VFP 愛用者社區

[ckp6250]

各位先進：

我想在我的程式的主畫面上，擺一個電話的圖示，客戶若按這個圖示，就能透過Skype和我通話。

目前最大的問題是，我要如何偵測客戶的系統，有沒有�妍囥M上線Skype呢？

我希望做的是，他若有上線Skype，我的圖示才出現，否則圖示隱藏起來，免得誤按。

有那位先進知道如何偵測呢？

[freehotpc]

** 这个给你参考一下，思路应该能解决你的难题。
**************************************************************************
FUNCTION ReOpenWin
*程序说明：防止程序重复运行的代码。若重复则激活并返回True，否则返回Flase
*变量说明：cWinName为欲检测的程序或窗口的项目名称
LPARAMETERS cWinName
DECLARE INTEGER FindWindow IN Win32api STRING, STRING
DECLARE INTEGER SwitchToThisWindow IN "user32" Long hwnd,long yn
wclass=0
apphand = FindWindow(wclass,cWinName)
IF apphand<>0 THEN
SwitchToThisWindow(apphand,.T.)
m_conse=.t.
ELSE
m_conse=.f.
ENDIF
Clear Dlls
Return m_conse
**************************************************************************

[ckp6250]

感謝 freehotpc 開示，問題解決了

再謝再謝　

[Austin]

ckp6250, 您好.,

您的點子實在很巧妙 ! skype 正熱著.
經高人指點後, 問提即獲解決, 真棒 !
我因資質太差, 看了freehotpc的指導老半天, 還是沒能搞懂如何處理?
可否指引如何實踐您的『好點子』? 何處下手如何偵測呢 ?
謝謝您.

[ckp6250]

Austin 您好：

　　freehotpc兄的意思是，偵測 Skype.exe 這隻程式有沒有在執行中，如果有的話，那我就把我的圖示的 visible 屬性設為 .T. , 否則，設成 .F. ，就達到目的了。

　　其實，小弟原本就知道如何偵測『程式是否執行中』，只是，一開始，執著於Skype的上線與否，反而忘記了最簡單的方法。

　　freehotpc兄說得很有道理，『思路���G能解�K你的���_』，問題在思路，不在技術。

　　真的很感謝他。

[Austin]

ckp6250, 您好.,

謝謝您的講解，教授為了訓練學生思考，指引個方向，遇到笨學生悟不出所以然來，
好在有您這位熱心的助教，解析教授的方法。
感謝您！ 溫馨的論壇 ！

[m0800]

先進好....

我試這用
IF ReOpenWin("Skype.exe")
WAIT WINDOW "Open..."
ELSE
WAIT WINDOW "Not Open..."
ENDIF

明明 skype 就有啟動,可是傳回來的結果
永遠都是否.......

請問是那出問題呢....
Thx

[ckp6250]