[リストへもどる]   [VBレスキュー(花ちゃん)]
一括表示

投稿時間:2004/11/09(Tue) 10:33
投稿者名:Shin
Eメール:
URL :
タイトル:
『CapsLockキーがオン』吹き出し表示について
VB6.0(OS:XP)にてシステム開発しております。

ログイン画面のパスワードフィールドに、CapsLockがONの場合、
『CapsLockキーがオン』吹き出し表示を実現したいと考えております。
XPシステム上での、パスワード入力に際、表示されるアレです。
以下吹き出しメッセージ内容を掲示します。

    △ CapsLock キーがオン

    CapsLock キーがオンになっていると、パスワードが誤って入力さ
    れる可能性があります。

    CapsLock キーを押してオフにしてから、パスワードを入力してくだ
    さい。

※△:警告アイコン

他アプリ(RealVNC Viewer等)では、実現できているので、
システムが保持しているものと勝手に推測しています。
特別なAPI等あるのでしょうか?
または、不可能なのでしょうか?

ご教授の程、よろしくお願い致します。

投稿時間:2004/11/09(Tue) 10:50
投稿者名:ダンボ
URL :
タイトル:
Re: 『CapsLockキーがオン』吹き出し表示について
「CapsLock 状態 取得」でググれば、一番トップにそのものずばりのサンプルがありますがな。

CapsLockState = keys(VK_CAPITAL) ですか。

質問文を投稿するより早く答えが返るので、まずWeb検索を。

投稿時間:2004/11/09(Tue) 10:54
投稿者名:ダンボ
URL :
タイトル:
Re^2: 『CapsLockキーがオン』吹き出し表示について
> CapsLockState = keys(VK_CAPITAL)

GetKeyboardState keys(0)

投稿時間:2004/11/09(Tue) 11:24
投稿者名:魔界の仮面弁士
Eメール:
URL :
タイトル:
Re: 『CapsLockキーがオン』吹き出し表示について
> 特別なAPI等あるのでしょうか?

実は、コーディングは一切不要なのです。
下記の内容のテキストファイルを、"Project1.exe.manifest" というファイル名で、
Project1.exe と同じフォルダに配置しておくだけでOKです。

この時、注意するのは2点。

・ファイルの先頭5文字は、"<?xml"で始める必要があります。
 先頭に、空白や改行が含まれないようにしてください。
・このテキストは、文字コードを UTF-8 にして保存してください。
 XPのメモ帳では、[名前を付けて保存]画面で、文字コードを指定できます。

# ソフトによっては、manifestをexe内にリソースとして取り込んでいる物もあります。


<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
<assemblyIdentity
    version="1.0.0.0"
    processorArchitecture="X86"
    name="CompanyName.ProductName.YourApplication"
    type="win32"
/>
<description>アプリケーションの詳細情報をここに記述</description>
<dependency>
    <dependentAssembly>
        <assemblyIdentity
            type="win32"
            name="Microsoft.Windows.Common-Controls"
            version="6.0.0.0"
            processorArchitecture="X86"
            publicKeyToken="6595b64144ccf1df"
            language="*"
        />
    </dependentAssembly>
</dependency>
</assembly>

投稿時間:2004/11/09(Tue) 11:46
投稿者名:Shin
Eメール:
URL :
タイトル:
Re^2: 『CapsLockキーがオン』吹き出し表示について
魔界の仮面弁士さん、迅速なる回答ならびに的を得た回答、
ありがとうございました。大変助かりました。

機会がありましたら、ご指導ご鞭撻のほどよろしくお願い致します。