C# と VB.NET の質問掲示板

わんくま同盟

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト


■96397 / )  SendMessageの使用法
□投稿者/ 初心者 (3回)-(2020/11/19(Thu) 18:50:45)

分類:[.NET 全般] 

ネットでは SendMessageの使用法として、
ウィンドウに関連付けられたテキスト(ウィンドウタイトルやコントロールの内容など)を指定されたバッファにコピーします。
と記載してありますが、
何故か、ウィンドウタイトルが取得されます、内容を取得するにはどのように記述したら良いのでしょうか。
相手のソフトは、CADですが、古いバージョンなら、内容が取得出来ています。
対象物自体が、違うということでしょうか? Textboxのコントロールだと思っているのですが。
使い分けはどの様したらよいのでしょうか。
よろしくお願いします。
環境 Win10,VisualBasix Express2013



Public Function S1_GetTextMessage(ByVal hWin As Long, ByRef mes As String) As Long
Dim strResult As String ' 文字列を受け取るバッファ
Dim lenResult As Long ' バッファの長さ
Dim dmy As Long

' コマンドラインの文字列の長さ
lenResult = SendMessage(hWin, WM_GETTEXTLENGTH, 0, 0&)
' 文字列 +1 の長さの空白文字列を用意
strResult = Space$(lenResult * 2 + 1)
' SendMessage を使ってコマンドラインを得る
dmy = SendMessageString(hWin, WM_GETTEXT, lenResult * 2 + 1, strResult)
S1_GetTextMessage = dmy
mes = strResult
End Function
返信 編集キー/


管理者用

- Child Tree -