Docs: LCL/stdctrls. Removes unnecessary whitespace in code examples.

This commit is contained in:
dsiders 2023-03-29 06:09:54 +01:00
parent 02314916b4
commit 493e4b2f6c

View File

@ -1426,17 +1426,17 @@ enumeration.
For example:
</p>
<code>
// does the style include an edit box?
if AComboBox.Style.HasEditBox then DoSomething;
// does the style include an edit box?
if AComboBox.Style.HasEditBox then DoSomething;
// does the style use owner-draw?
if AComboBox.Style.IsOwnerDrawn then DoSomething;
// does the style use owner-draw?
if AComboBox.Style.IsOwnerDrawn then DoSomething;
// does the style use variable height items?
if AComboBox.Style.IsVariable then DoSomething;
// does the style use variable height items?
if AComboBox.Style.IsVariable then DoSomething;
// toggle the edit box visibility and use in the current style
AComboBox.Style := AComboBox.Style.SetEditBox(False);
// toggle the edit box visibility and use in the current style
AComboBox.Style := AComboBox.Style.SetEditBox(False);
</code>
</descr>
<seealso>
@ -8360,7 +8360,7 @@ property value can be assigned at design-time using the Object Inspector in
the Lazarus IDE, or at run-time in program code. For example:
</p>
<code>
Edit1.Text := 'Ångström';
Edit1.Text := 'Volts DC';
ShowMessage('Unit Measure = ' + Edit1.Text);
</code>
<p>
@ -8493,8 +8493,8 @@ The textual values in the multi-line control can be accessed using the
ordinal position in the list of values. For example:
</p>
<code>
// var sContent: String; ...
sContent := AMemo.Lines[2];
// var sContent: String;
sContent := AMemo.Lines[2];
</code>
<p>
This provides access to the third value in List (index positions are
@ -8507,8 +8507,8 @@ Each line of text is separated by the <var>LineEnding</var> character
sequence for the host platform or operating system. For example:
</p>
<code>
// var sContent: String; ...
sContent := AMemo.Lines.Text;
// var sContent: String; ...
sContent := AMemo.Lines.Text;
</code>
<p>
Please note: There is a difference in TCustomMemo / TMemo between the
@ -8543,9 +8543,9 @@ end;
procedure TForm1.Memo1Change(Sender: TObject);
begin
if not TCustomMemo(Sender).Modified then
StaticText1.Caption := 'Memo changed in code'
StaticText1.Caption := 'Memo changed in code'
else
StaticText1.Caption := 'Memo changed by user';
StaticText1.Caption := 'Memo changed by user';
end;
</code>
<p>
@ -9041,10 +9041,10 @@ It is a convenience method, and calls the <var>Add</var> method in the Lines
member.
</p>
<code>
// var sLine: String;
// the following are equivalent
AMemo.Append(sLine);
AMemo.Lines.Add(sLine);
// var sLine: String;
// the following are equivalent
AMemo.Append(sLine);
AMemo.Lines.Add(sLine);
</code>
</descr>
<seealso/>
@ -9100,10 +9100,10 @@ defined in TStrings. The Strings property in Lines allows an individual line
of text to be accessed by its ordinal position. For example:
</p>
<code>
// var sContent: String;
sContent := AMemo.Lines.Strings[2];
// equivalent to preceding since Strings is the default property
sContent := AMemo.Lines[2];
// var sContent: String;
sContent := AMemo.Lines.Strings[2];
// equivalent to preceding since Strings is the default property
sContent := AMemo.Lines[2];
</code>
<p>
The Text property in Lines allows access to all of the values stored in
@ -9111,8 +9111,8 @@ Lines. Text lines are separated by the <var>LineEnding</var> character
sequence defined for the host platform or operating system. For example:
</p>
<code>
// var sContent: String;
sContent := AMemo.Lines.Text;
// var sContent: String;
sContent := AMemo.Lines.Text;
</code>
<p>
Changing the values in Lines causes the Modified property to be set to
@ -9358,8 +9358,8 @@ The textual values in the multi-line control can be accessed using the
ordinal position in the list of values. For example:
</p>
<code>
// var sContent: String; ...
sContent := AMemo.Lines[2];
// var sContent: String; ...
sContent := AMemo.Lines[2];
</code>
<p>
This provides access to the third value in List (index positions are
@ -9372,8 +9372,8 @@ Each line of text is separated by the <var>LineEnding</var> character
sequence for the host platform or operating system. For example:
</p>
<code>
// var sContent: String; ...
sContent := AMemo.Lines.Text;
// var sContent: String;
sContent := AMemo.Lines.Text;
</code>
<p>
Please note: There is a difference in TCustomMemo / TMemo between the
@ -13861,7 +13861,9 @@ form will reflect the changes as well.
You can also explicitly change the properties of the object in code by typing
(in the appropriate Implementation section of the Source editor), for example
</p>
<code>Form1.Button1.Height := 48;</code>
<code>
Form1.Button1.Height := 48;
</code>
<p>
In summary, there are usually about three different ways to determine each
property of a component: