paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-07 20:17:13 +01:00
Code Issues Packages Projects Releases Wiki Activity

IDE: Export Html, option to use background color. Part of issue #40088

Browse Source
This commit is contained in:
Martin 2023-06-13 11:50:21 +02:00
parent b0e5787dce
commit 06bb1297c7
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/sourceeditor.pp
View File

@ -4895,10 +4895,10 @@ begin
Html.ExportAsText := True;
Html.Highlighter := FEditor.Highlighter;
Html.Title := PageName;
Html.Font.Assign(FEditor.Font);
Html.UseBackground := EditorOpts.ExportHtmlWithBackground;
if EditorOpts.ExportHtmlWithBackground then begin
Html.Color := FEditor.Color;
Html.Font.Assign(FEditor.Font);
end;
Html.ExportAll(FEditor.Lines);
Html.SaveToFile(AFileName);