掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
既定のブラウザのアドレス部に指定した文字列を送り移動させるには? (ID:27837)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
なんども申し訳ないのですが Sleipnirでこれを行う場合どうすればよいのでしょうか? 自分なりにFN様のソースを弄ってみたのですがうまくいきません procedure TForm1.Button1Click(Sender: TObject); var h: HWND; begin h := FindWindow(PChar('SleipnirMainWindow'), nil); h := FindWindowEx(h, 0, PChar('SleipnirMainWindow'), nil); h := FindWindowEx(h, 0, PChar('FenrirEmbeddedToolbar'), nil); h := FindWindowEx(h, 0, PChar('FenrirAdressBarCtrl'), nil); SendMessage(h, WM_SETTEXT, 0, lParam(PChar(Edit1.Text))); h := FindWindowEx(h, 0, PChar('FenrirComboBoxCtrlEx'), nil); h := FindWindowEx(h, 0, PChar('Edit'), nil); SendMessage(h, WM_KEYDOWN, VK_RETURN, 0); SendMessage(h, WM_KEYUP, VK_RETURN, 0); end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.