From 544b56b91dfd52e6d76aa1855abb001c42f6ef35 Mon Sep 17 00:00:00 2001 From: cz_012273 Date: Fri, 7 Jan 2022 18:42:29 +0800 Subject: [PATCH] =?UTF-8?q?=E8=BF=90=E8=A1=8Chtml=E6=96=87=E4=BB=B6?= =?UTF-8?q?=E6=97=B6=E8=B0=83=E6=95=B4webbrowser1=E9=AB=98=E5=BA=A6?= =?UTF-8?q?=E4=B8=8E=E5=BD=93=E5=89=8Dmemo1=E9=AB=98=E5=BA=A6=E4=B8=80?= =?UTF-8?q?=E8=87=B4=E3=80=82?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- MyDelphi.dproj | 10 +++++----- Unit1.pas | 1 + 2 files changed, 6 insertions(+), 5 deletions(-) diff --git a/MyDelphi.dproj b/MyDelphi.dproj index 5953ea7..4fc85fe 100644 --- a/MyDelphi.dproj +++ b/MyDelphi.dproj @@ -342,23 +342,23 @@ true - + - ic_notification.png true - + true - + + ic_notification.png true - + true diff --git a/Unit1.pas b/Unit1.pas index d3249d0..8bd3670 100644 --- a/Unit1.pas +++ b/Unit1.pas @@ -225,6 +225,7 @@ begin else begin WebBrowser1.Visible := True; + WebBrowser1.height := memo1.height; //调整内嵌浏览器高度与memo1一致 WebBrowser1.url:='file://'+FFileName;//内嵌浏览器中运行当前HTML文件 button1.text:='关闭'; end; -- GitLab