掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ブラウザにスクロールバーを表示させたいのですが (ID:41341)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
とにかく新規作成して何も貼り付けずFormCreateに下記コードをコピペして下さい。 XE2で確認しました。 これでスクロールバーが出なければ環境が変です。 usesは適宜変更よろしくです。 unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.OleCtrls, SHDocVw, Vcl.ExtCtrls; type TForm1 = class(TForm) procedure FormCreate(Sender: TObject); private { Private 宣言 } public { Public 宣言 } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.FormCreate(Sender: TObject); var Panel:TPanel; Browser:TWebBrowser; begin Panel := TPanel.Create(Self); Panel.SetBounds(30,30,130,130); Panel.Parent := Self; Browser := TWebBrowser.Create(Self); Browser.Align := alClient; TOleControl(Browser).Parent := Panel; Browser.Navigate('http://google.com'); end; end.
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.