Revision 1 of 2, by Trev on 2-12-2020. The page as it is now.
Cursor/de
Zurück zu den Zusätzlichen Informationen.
\
Mauszeigerkonstanten
Auflistung der Mauszeigerkonstanten
<table border="1">
<tr>
<td>
Konstante
</td>
<td>
Integerwert der Konstante
</td>
<td>
Bild
</td>
</tr>
<tr>
<td>
crDefault
</td>
<td align="right">
0
</td>
<td>
<figure> <img src="crArrow.png" title="crArrow.png" /> <figcaption>crArrow.png</figcaption> </figure>
</td>
</tr>
<tr>
<tr>
<td>
crNone
</td>
<td align="right">
-1
</td>
<td>
Unsichtbarer Mauszeiger
</td>
</tr>
<tr>
<tr>
<td>
crArrow
</td>
<td align="right">
-2
</td>
<td>
<figure> <img src="crArrow.png" title="crArrow.png" /> <figcaption>crArrow.png</figcaption> </figure>
</td>
</tr>
<tr>
<td>
crCross
</td>
<td align="right">
-3
</td>
<td>
<figure> <img src="crCross.png" title="crCross.png" /> <figcaption>crCross.png</figcaption> </figure>
</td>
</tr>
<tr>
<td>
crIBeam
</td>
<td align="right">
-4
</td>
<td>
<figure> <img src="crIBeam.png" title="crIBeam.png" /> <figcaption>crIBeam.png</figcaption> </figure>
</td>
</tr>
<tr>
<td>
crSize
</td>
<td align="right">
-22
</td>
<td>
<figure> <img src="crSize.png" title="crSize.png" /> <figcaption>crSize.png</figcaption> </figure>
</td>
</tr>
<tr>
<td>
crSizeNESW
</td>
<td align="right">
-6
</td>
<td>
<figure> <img src="crSizeNESW.png" title="crSizeNESW.png" /> <figcaption>crSizeNESW.png</figcaption> </figure>
</td>
</tr>
<tr>
<td>
crSizeNS
</td>
<td align="right">
-7
</td>
<td>
<figure> <img src="crSizeNS.png" title="crSizeNS.png" /> <figcaption>crSizeNS.png</figcaption> </figure>
</td>
</tr>
<tr>
<td>
crSizeNWSE
</td>
<td align="right">
-8
</td>
<td>
<figure> <img src="crSizeNWSE.png" title="crSizeNWSE.png" /> <figcaption>crSizeNWSE.png</figcaption> </figure>
</td>
</tr>
<tr>
<td>
crSizeWE
</td>
<td align="right">
-9
</td>
<td>
<figure> <img src="crSizeWE.png" title="crSizeWE.png" /> <figcaption>crSizeWE.png</figcaption> </figure>
</td>
</tr>
<tr>
<td>
crUpArrow
</td>
<td align="right">
-10
</td>
<td>
<figure> <img src="crUpArrow.png" title="crUpArrow.png" /> <figcaption>crUpArrow.png</figcaption> </figure>
</td>
</tr>
<tr>
<td>
crHourGlass
</td>
<td align="right">
-11
</td>
<td>
<figure> <img src="crHourGlass.png" title="crHourGlass.png" /> <figcaption>crHourGlass.png</figcaption> </figure>
</td>
</tr>
<tr>
<td>
crDrag
</td>
<td align="right">
-12
</td>
<td>
<figure> <img src="crDrag.png" title="crDrag.png" /> <figcaption>crDrag.png</figcaption> </figure>
</td>
</tr>
<tr>
<td>
crNoDrop
</td>
<td align="right">
-13
</td>
<td>
<figure> <img src="crNoDrop.png" title="crNoDrop.png" /> <figcaption>crNoDrop.png</figcaption> </figure>
</td>
</tr>
<tr>
<td>
crHSplit
</td>
<td align="right">
-14
</td>
<td>
<figure> <img src="crHSplit.png" title="crHSplit.png" /> <figcaption>crHSplit.png</figcaption> </figure>
</td>
</tr>
<tr>
<td>
crVSplit
</td>
<td align="right">
-15
</td>
<td>
<figure> <img src="crVSplit.png" title="crVSplit.png" /> <figcaption>crVSplit.png</figcaption> </figure>
</td>
</tr>
<tr>
<td>
crMultiDrag
</td>
<td align="right">
-16
</td>
<td>
<figure> <img src="crMultiDrag.png" title="crMultiDrag.png" /> <figcaption>crMultiDrag.png</figcaption> </figure>
</td>
</tr>
<tr>
<td>
crSQLWait
</td>
<td align="right">
-17
</td>
<td>
<figure> <img src="crSQLWait.png" title="crSQLWait.png" /> <figcaption>crSQLWait.png</figcaption> </figure>
</td>
</tr>
<tr>
<td>
crNo
</td>
<td align="right">
-18
</td>
<td>
<figure> <img src="CrNo.png" title="CrNo.png" /> <figcaption>CrNo.png</figcaption> </figure>
</td>
</tr>
<tr>
<td>
crAppStart
</td>
<td align="right">
-19
</td>
<td>
<figure> <img src="crAppStart.png" title="crAppStart.png" /> <figcaption>crAppStart.png</figcaption> </figure>
</td>
</tr>
<tr>
<td>
crHelp
</td>
<td align="right">
-20
</td>
<td>
<figure> <img src="crHelp.png" title="crHelp.png" /> <figcaption>crHelp.png</figcaption> </figure>
</td>
</tr>
<tr>
<td>
crHandPoint
</td>
<td align="right">
-21
</td>
<td>
<figure> <img src="crHandPoint.png" title="crHandPoint.png" /> <figcaption>crHandPoint.png</figcaption> </figure>
</td>
</tr>
</table>
==Die Verwendung von Mauszeigerkonstanten== Folgende Pascalanweisung legt für die gesamte Anwendung eine Sanduhr als Mauszeiger (Cursor) fest:
Screen.Cursor := crHourGlass;Folgende Anweisung legt nur für das Formular und nicht für seine Steuerelemente (Controls) die Sanduhr als Mauszeiger (Cursor) fest:
Form1.Cursor := crHourGlass;
Legt nur für den Button1 die Sanduhr als Mauszeiger fest:
Button1.Cursor := crHourGlass;Legt nur für das Memo1 die Sanduhr als Mauszeiger fest:
Memo1.Cursor := crHourGlass;Legt für alle Steuerelemente (Controls) die Sanduhr als Mauszeiger fest:
var
intCursor: integer = 0;
begin
...
for intCursor := 0 to Form1.ControlCount - 1 do
Form1.Controls[intCursor].Cursor := crHourGlass;
...
end;From the Free Pascal wiki, page "Cursor/de", as it stood on 2020-02-12 after a change by Trev, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's Licensing page. If you have concerns about this material, message the admin.
