CSS 和 TWebbrowser delphi

Question

我想知道是否可以操纵网站的 CSS。例如输入字段中的颜色？我查看了几个问题，但我不清楚这是否可能。

例如，在 Google Chrome 中，每当选择一个字段时，它都会在外部站点周围显示一条金色线条。是否可以在 delphi 中通过任何网站执行此操作和其他操作。编写应用于在 Twebbrowser 中打开的网站的 CSS 代码？仅供个人查看，

谢谢

我也可以使用此代码更改输入字段背景的颜色吗？我可以更改背景颜色并更改字体大小，但似乎无法弄清楚输入字段的颜色或边框。这是代码：

http://www.delphidabbler.com/tips/58

Answer 1

加载页面后，可以通过从代码添加样式表来修改 CSS：

var
   document: IHTMLDocument2;
   stylesheet: IHTMLStyleSheet;
   stylesheetIndex: Integer;
begin

   // Inject CSS Style Sheets
   document := webBrowser1.Document as IHTMLDocument2;

   stylesheetIndex := document.styleSheets.length;
   if stylesheetIndex > 31 then
      raise Exception.Create('Already have the maximum amount of CSS stylesheets');

   stylesheet := document.createStyleSheet('', stylesheetIndex);
   stylesheet.cssText := ...

Answer 2

使用 @jasonpenny 的答案添加样式表，接下来需要更改具有焦点的输入元素周围的边框，这在 CSS 中称为焦点伪类或选择器。有关详细信息，请参阅以下文章：

• http://www.w3schools.com/css/css_pseudo_classes.asp< /a>
• http://www.w3schools.com/css/sel_focus.asp
• < a href="http://www.w3schools.com/css/css_border.asp" rel="nofollow">http://www.w3schools.com/css/css_border.asp

http://www.w3schools.com 站点拥有大量有关 Web 开发的信息。它还允许您尝试许多示例，以便您可以看到更改内容时会产生什么效果。如果您想学习如何进行 CSS 样式设置，那么最好掌握其中的所有信息，而不是尝试同时学习编程和编程语言。