IEからActiveFormへパラメータを渡したい (ID:41565)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ありがとうございます。 HTMLの設定が悪かったのですね おかげで解決できました、ありがとうございます。 同じ問題に出くわす人がどれくらいいるのかは不明ですが 念のため、以下に手順をまとめておきます。 環境： WinXP、Del6、IE8 IE(HTML)側の設定 Objectタグ内にパラメータのタグを追加 仮に「param」という名前に「aaaa」を設定した場合とした前提で記述します。 <OBJECT classid="XXXXX" ...... ....... align=center hspace=0 vspace=0 > <PARAM NAME="param" VALUE="aaaa"> </OBJECT> Delphi側の設定 新規作成は「ActiveXフォーム」を選択しております。 １、メニューより、「表示(V)」 → 「タイプライブラリ(T)」を選択 ２、開いた画面の左部にある一覧からインターフェース(赤いマッチのようなアイコン)を選択 ３、選択したインターフェースを右クリックして「新規作成」→「Property」を選択 ４、名前を「param」、タイプを「VARIANT」としました ５、小窓上部にある「ソースコードの更新」ボタンをクリックします ６、小窓上部にある「レジストリに登録」ボタンをクリックします ７、プログラム部に以下の２つのfunctionが自動的に追加されています function TActiveFormX.Get_param: OleVariant; procedure TActiveFormX.Set_param(Value: OleVariant); ８、自分はPrivate部に「Param : Variant;」を追記し、７のfunctionに追記しました function TActiveFormX.Get_param: OleVariant; begin Result := Param;//←追記 end; procedure TActiveFormX.Set_param(Value: OleVariant); begin Param := Value;//←追記 end; 以上の手順で変数「Param」内に"aaaa"が入っているのを確認できました。 再度、ありがとうございました。