paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-18 07:29:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

Docs: LCL/forms. Updates TApplication.Run topic for changes in 4b4e2cef.

Browse Source
This commit is contained in:
dsiders 2022-10-29 23:28:32 +01:00
parent dc60b24979
commit 73d10c2d3d
1 changed files with 29 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
docs/xml/lcl/forms.xml
View File

@ -14302,7 +14302,7 @@ signal idle handlers for the application or wait for a new message before
exit.
</p>
<p>
HandleMessage is called from the <var>RunLoop</var> method in
HandleMessage is called from the private RunLoop method in
<var>TApplication</var>.
</p>
</descr>
@ -14742,11 +14742,38 @@ any application handlers using the ahtIdleEnd handler type.
<element name="TApplication.Run">
<short>
Loads the MainForm and passes control to the event loop for the application.
Loads the form and passes control to the event loop for the application.
</short>
<descr>
<p>
<var>Run</var> is the method called to start execution of the application. It
reimplements the method introduced in TCustomApplication to provide support
for the MainForm and processing loop used in a GUI application. The Run
method is generally called, via the Application singleton, from the .lpr
project file.
</p>
<p>
If the MainForm property has been assigned, and should be displayed, the
AppSetupMainForm method in the widgetset class is called to set the window
state for the main form. The Show method in MainForm is also called to scale
the form (when needed) to the PixelsPerInch for the monitor. The form is made
visible and brought to the top of the Z-Order in the application.
</p>
<p>
The AppRun method in the widgetset class is called to start the message loop
using the private RunLoop method.
</p>
</descr>
<seealso>
<link id="TApplication.MainForm"/>
<link id="TApplication.ShowMainForm"/>
<link id="TApplication.Scaled"/>
<link id="Application"/>
<link id="TCustomForm.Show"/>
<link id="TCustomForm.Visible"/>
<link id="TCustomForm.Monitor"/>
<link id="TMonitor.PixelsPerInch"/>
<link id="#lcl.controls.TControl.BringToFront">TControl.BringToFront</link>
<link id="#fcl.CustApp.TCustomApplication.Run">TCustomApplication.Run</link>
</seealso>
</element>