3

私は次のコードを使用しています:

#include <WinAPI.au3>
#include <WindowsConstants.au3>

Global Const $WC_LINK = "SysLink"
Global Const $WC_LINKA = $WC_LINK
Global Const $WC_LINKW = $WC_LINK

$g_hLink = _WinAPI_CreateWindowEx(0, $WC_LINK, _
        'Test, [url="http://www.microsoft.com"]click here[/url], [url="http://www.microsoft.com"]here[/url] or [url=""]here[/url]', _
        BitOR($WS_VISIBLE, $WS_CHILD, $WS_TABSTOP), _
        10, 10, 300, 60, $Form2 _
)
GUIRegisterMsg($WM_NOTIFY, "MY_LINK_NOTIFY")

Func MY_LINK_NOTIFY($hWnd, $Msg, $wParam, $lParam)
    Local Const $tagNMLINK = $tagNMHDR & ";" & "UINT mask; int iLink; UINT state; UINT stateMask; WCHAR szID[48]; WCHAR szUrl[2083];"
    Local $NMHDR = DllStructCreate($tagNMHDR, $lParam)
    Local $hwndFrom = DllStructGetData($NMHDR, "hwndFrom");
    Switch $hwndFrom
        Case $g_hLink
            Switch DllStructGetData($NMHDR, "code")
                Case $NM_CLICK
                    ContinueCase
                Case $NM_RETURN
                    $NMHDR = DllStructCreate($tagNMLINK, $lParam)
                    Local $iLink = DllStructGetData($NMHDR, "iLink")
                    Local $szURL = DllStructGetData($NMHDR, "szURL")
                    Local $szID = DllStructGetData($NMHDR, "szID")

                    If $szURL <> "" Then
                        ShellExecute($szURL, "", "", "open", @SW_SHOW);
                    EndIf
            EndSwitch
    EndSwitch
EndFunc

syslinksをクリック可能にするには:

ここに画像の説明を入力してください

問題は、テキストのみを表示したいということです...そしてこの白/灰色の背景を透明に設定します。

これどうやってするの?

4

1 に答える 1