Difference between revisions of "TWebStatusMouse"

From Ultibo.org
Jump to: navigation, search
(Created page with "Return to Unit WebStatus __TOC__ === Description === ---- ''To be documented'' === Class definitions === ---- <div class="toccolours mw-collapsible m...")
 
 
Line 26: Line 26:
 
|colspan="2"|<div style="font-family: monospace,courier;">'''private'''</div>
 
|colspan="2"|<div style="font-family: monospace,courier;">'''private'''</div>
 
|-
 
|-
|colspan="2"|&nbsp;
+
| <code>function MouseFlagsToFlagNames(AFlags:LongWord):TStringList;</code>
 +
| &nbsp;
 +
|-
 +
| <code>function MouseButtonsToNames(AButtons:LongWord):TStringList;</code>
 +
| &nbsp;
 
|-
 
|-
 
|colspan="2"|<div style="font-family: monospace,courier;">'''protected'''</div>
 
|colspan="2"|<div style="font-family: monospace,courier;">'''protected'''</div>
Line 47: Line 51:
 
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
<pre style="border: 0; padding-bottom:0px;">constructor TWebStatusMouse.Create(AMain:TWebStatusMain);</pre>
 
<pre style="border: 0; padding-bottom:0px;">constructor TWebStatusMouse.Create(AMain:TWebStatusMain);</pre>
 +
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 +
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 +
{| class="wikitable" style="font-size: 14px; background: white;"
 +
|-
 +
! Note
 +
| None documented
 +
|-
 +
|}
 +
</div></div>
 +
<br />
 +
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 +
<pre style="border: 0; padding-bottom:0px;">function TWebStatusMouse.MouseFlagsToFlagNames(AFlags:LongWord):TStringList;</pre>
 +
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 +
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 +
{| class="wikitable" style="font-size: 14px; background: white;"
 +
|-
 +
! Note
 +
| None documented
 +
|-
 +
|}
 +
</div></div>
 +
<br />
 +
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 +
<pre style="border: 0; padding-bottom:0px;">function TWebStatusMouse.MouseButtonsToNames(AButtons:LongWord):TStringList;</pre>
 
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">

Latest revision as of 04:49, 18 October 2022

Return to Unit WebStatus


Description


To be documented

Class definitions



TWebStatusMouse = class(TWebStatusSub)

public
constructor Create(AMain:TWebStatusMain);  
private
function MouseFlagsToFlagNames(AFlags:LongWord):TStringList;  
function MouseButtonsToNames(AButtons:LongWord):TStringList;  
protected
function DoGet(AHost:THTTPHost; ARequest:THTTPServerRequest; AResponse:THTTPServerResponse):Boolean; override;  
public
 


Function declarations



constructor TWebStatusMouse.Create(AMain:TWebStatusMain);
Description: To be documented
Note None documented


function TWebStatusMouse.MouseFlagsToFlagNames(AFlags:LongWord):TStringList;
Description: To be documented
Note None documented


function TWebStatusMouse.MouseButtonsToNames(AButtons:LongWord):TStringList;
Description: To be documented
Note None documented


function TWebStatusMouse.DoGet(AHost:THTTPHost; ARequest:THTTPServerRequest; AResponse:THTTPServerResponse):Boolean;
Description: To be documented
Note None documented


Return to Unit Reference