pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

jvcllaz: Minor update to htmltest demo.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6949 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2019-05-25 23:20:53 +00:00
parent bdedb40277
commit fe9d27d72c
2 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
components/jvcllaz/examples/JvHTML/htmltestform.lfm
View File

@ -13,9 +13,9 @@ object MainForm: TMainForm
Height = 384 Height = 384
Top = 0 Top = 0
Width = 858 Width = 858
ActivePage = pgStringToHTML ActivePage = pgStringsToHTML
Align = alClient Align = alClient
TabIndex = 0 TabIndex = 1
TabOrder = 0 TabOrder = 0
object pgStringToHTML: TTabSheet object pgStringToHTML: TTabSheet
Caption = 'String to HTML' Caption = 'String to HTML'

1
components/jvcllaz/examples/JvHTML/htmltestform.pas
View File

@ -81,6 +81,7 @@ end;
procedure TMainForm.edHTMLTitleChange(Sender: TObject); procedure TMainForm.edHTMLTitleChange(Sender: TObject);
begin begin
JvStringListToHTML1.HTMLTitle := edHTMLTitle.Text;
MemoChange(nil); MemoChange(nil);
end; end;