掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
他アプリのタブのテキスト取得 (ID:29959)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
すいません。 LhaplusはTPageControlでした。 取得するＴａｂコントロールは Ｗｉｎｄｏｗｓ標準の日付と時刻のプロパティに変えました。 procedure TForm1.BitBtn1Click(Sender: TObject); Var hwind : HWND; hwind2 : HWND; s : String; begin hwind := FindWindow(nil,'日付と時刻のプロパティ'); hwind2 := FindWindowEX(hwind, 0, 'SysTabControl32', 0); s := GetTabText(hwind2,0); if s <> '' then Begin ShowMessage(s); End; end; ボタンの中を上記のように変更しましたが、 SendMessage(hWindow,TCM_GETITEM,indx,LPARAM(@tci)); の行で落ちてしまいます。 Delphiではタブのテキスト取得は出来ないのでしょうか。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.