[Q]$BB?=E5/F0KI;_(JAPI

Thread View: fj.lang.visualbasic

3 messages

[T] Back to Threads [V] Tree View [G] Group Articles

3 total messages Started by baba yoshinori Thu, 19 Mar 1998 00:00

#345

Author: baba yoshinori
Date: Thu, 19 Mar 1998 00:00

26 lines
1301 bytes

馬場です
VB4でスクリーンセーバーを作るのに、多重起動防止のため
下記のAPIを使用しました。
実行ファイルをhogehoge.scrとして作成しコントロールパネルに
登録したのですが、多重起動防止が効きません。
どこか間違っているのでしょうか？

Form1に記述しています。

Private Declare Function SystemParametersInfo Lib "user32" Alias
　　　 "SystemParametersInfoA" (ByVal uAction As Long, 
　　　　ByVal uParam As Long, ByVal lpvParam As Any, 
　　　　ByVal fuWinIni As Long) As Long

Const SPI_SETSCREENSAVEACTIVE = 17


Private Sub Form_Load()

    Dim result As Integer
    result = SystemParametersInfo(SPI_SETSCREENSAVEACTIVE, True, 0&, 0)

___________________________
baba yoshinori
bnb@mug.biglobe.ne.jp

Re: [Q]多重起動防止API

#354

Author: Kaoru Shiiba
Date: Thu, 19 Mar 1998 00:00

42 lines
1910 bytes

APIはさておき(^_^;　AppオブジェクトのPrevInstanceプロパティを
使用してみてはいかがでしょうか。

If App.PrevInstance Then
    MsgBox "起動しとるっちゅうねん。"
    End
End If

みたいな感じで・・・。
--
_______________________________________________________________________
差出人 Kaoru Shiiba
E-Mail  cba@pop06.odn.ne.jp   (caa52570@pop06.odn.ne.jp)

baba yoshinori wrote in message <6eq375$445$1@ipcgw.ipc.kajima.co.jp>...
>馬場です
>VB4でスクリーンセーバーを作るのに、多重起動防止のため
>下記のAPIを使用しました。
>実行ファイルをhogehoge.scrとして作成しコントロールパネルに
>登録したのですが、多重起動防止が効きません。
>どこか間違っているのでしょうか？
>
>Form1に記述しています。
>
>Private Declare Function SystemParametersInfo Lib "user32" Alias
>　　　 "SystemParametersInfoA" (ByVal uAction As Long,
>　　　　ByVal uParam As Long, ByVal lpvParam As Any,
>　　　　ByVal fuWinIni As Long) As Long
>
>Const SPI_SETSCREENSAVEACTIVE = 17
>
>
>Private Sub Form_Load()
>
>    Dim result As Integer
>    result = SystemParametersInfo(SPI_SETSCREENSAVEACTIVE, True, 0&, 0)
>
>___________________________
>baba yoshinori
>bnb@mug.biglobe.ne.jp
>

Re: [Q]多重起動防止API

#368

Author: Akira Gotoh
Date: Mon, 23 Mar 1998 00:00

14 lines
1057 bytes

baba yoshinori wrote
>馬場です
>VB4でスクリーンセーバーを作るのに、多重起動防止のため
>下記のAPIを使用しました。
>実行ファイルをhogehoge.scrとして作成しコントロールパネルに
>登録したのですが、多重起動防止が効きません。


APIの間違いについてではないのですが、VBでは割と伝統的(?!)な
App.PrevInstance を使った手法ではダメだったのでしょうか？

後藤あきら
E-mail：foxlum@cyborg.ne.jp

Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads

Thread View: fj.lang.visualbasic

[Q]$BB?=E5/F0KI;_(JAPI

Re: [Q]多重起動防止API

Re: [Q]多重起動防止API

Thread Navigation

[Q]$BB?=E5/F0KI;_(JAPI