WinUserEvent
obj -> WinUserEvent(word1[, int2[, alpha3]])
Benutzerdefiniertes Ereignis auslösen
Details
- obj: Fenster-Objekt
- word1: Ereignis-Id
- int2: Argument des Benutzers (optional)
- alpha3: Argument des Benutzers (optional)
- Siehe: Verwandte Befehle ,
EvtUser
Mit dieser Anweisung wird ein Ereignis in die Ereigniswarteschlange des Betriebssystems eingefügt. Das Ereignis wird zu einem späteren Zeitpunkt aufgerufen. Zu welchem Zeitpunkt das Ereignis ausgelöst wird, kann nicht genau bestimmt werden, es wird aber nach dem Ereignis, in dem die Anweisung durchgeführt wurde, ausgelöst.
Als Objekt (obj) muss ein Fenster-Objekt übergeben werden, bei dem das Ereignis EvtUser angegeben ist. Als (int1) wird eine Benutzerdefinierte Ereignis-ID übergeben. Die ID muss im Bereich 1 - 65535 liegen und kann vom Programmierer frei gewählt werden. Die ID wird dem Ereignis übergeben und kann zur Unterscheidung mehrerer Ereignisse verwendet werden.
Die Parameter (int2) und (alpha3) können vom Benutzer frei gewählt werden. Der Inhalt wird an das Ereignis weitergereicht.
Beispiel:
define
{
_EventUser : 10000
}
...
tHdlFrame->WinUserEvent(_EventUser, 42, 'Answer to the ultimate question');
...
sub EvtUser
(
aEvt : event; // Ereignis
aEventID : word; // Benutzerdefinierte Ereignis-Nummer
aArgument1 : int; // Numerisches Argument
aArgument2 : alpha; // Alphanumerisches Argument
) : logic;
{
...
if (aArgument1 = 42)
...
}