質問編集履歴
2
コードにmarkdownのコメントが残ったままだったので修正
title
CHANGED
File without changes
|
body
CHANGED
@@ -61,9 +61,9 @@
|
|
61
61
|
lngSysListView32 = GetWindow(lngChildWindow, GW_CHILD)
|
62
62
|
If lngSysListView32 Then
|
63
63
|
|
64
|
-
|
64
|
+
' インデックス= 0 のアイコンの位置を取得します。
|
65
|
-
|
65
|
+
rc.Left = LVIR_ICON
|
66
|
-
|
66
|
+
ListView_GetItemRect lngSysListView32, LVM_GETITEMRECT, 0, rc
|
67
67
|
|
68
68
|
' X 方向に +100 移動させます
|
69
69
|
ListView_SetItemPosition lngSysListView32, LVM_SETITEMPOSITION, 0, rc.Top * &H10000 + rc.Left + 100
|
1
コードを専用の枠に移動しました。
title
CHANGED
File without changes
|
body
CHANGED
@@ -16,8 +16,7 @@
|
|
16
16
|
|
17
17
|
を教えていただきたいと思います。
|
18
18
|
WINAPI32に関しては初心者なので初歩的なミスがあるかもしれませんが、ご容赦いただければと思います。
|
19
|
-
|
20
|
-
|
19
|
+
```ここに言語を入力
|
21
20
|
Private Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
|
22
21
|
Private Declare Function GetWindow Lib "user32.dll" (ByVal hWnd As Long, ByVal uCmd As Long) As Long
|
23
22
|
Private Declare Function ListView_GetItemRect Lib "user32.dll" Alias "SendMessageA" (ByVal hWnd As Long, ByVal MSG As Long, ByVal lngIndex As Long, ByRef rc As RECT) As Long
|
@@ -73,8 +72,8 @@
|
|
73
72
|
End If
|
74
73
|
End If
|
75
74
|
End Sub
|
75
|
+
```
|
76
76
|
|
77
|
-
|
78
77
|
参考にしたサイト
|
79
78
|
https://okwave.jp/qa/q5525027.html
|
80
79
|
|