Before (Property)

ONLINE HELP
WINDEV, WEBDEV AND WINDEV MOBILE

Version:

Home | Sign in | English

Help / WLanguage / WLanguage properties / Various properties

Exiting from the sequence of procedures

WINDEV

WEBDEV

WINDEV Mobile

Others

See also

Before (Property)

In french: Avant

The Before property replaces or inserts a procedure before the other procedures in:

a variable of type Procedure.
an event associated with a control.

Example

p is procedure
p = MyProcedure
p.After = MyProcedureCalledAfter
p.Before = MyProcedureCalledBefore

// The order for calling the procedures will be:
// - MyProcedureCalledBefore
// - MyProcedure
// - MyProcedureCalledAfter
p()

// Specify the event to run on a click
BTN_BUTTON1.Process[trtClick] = myProcedure1

// Add a procedure to run on a click
BTN_BUTTON1.Process[trtClick] += myProcedure2

// Add a procedure to run before the click process
BTN_BUTTON1.Process[trtClick].Before += myProcedure3

Syntax

Replacing existing procedures with the Before property (= operator) Hide the details

<Element>.Before = <WLanguage procedure>

<Element>: Character string

Element to use:
Name of a variable of type Procedure.
Event of a control. The events of a control can be handled by the Process property.

<WLanguage procedure>: Procedure name

Name of the WLanguage procedure that will replace the existing procedures.

Inserting a procedure before the existing procedures (+= operator) Hide the details

<Element>.Before += <WLanguage procedure>

<Element>: Character string

Element to use:
Name of a variable of type Procedure.
Event of a control. The events of a control can be handled by the Process property.

<WLanguage procedure>: Procedure name

Name of the WLanguage procedure that must be placed "before".

Remarks

Exiting from the sequence of procedures

If several procedures are sequenced, the sequence of procedures can be interrupted from the code of one of the procedures by using SetFocusAndReturnToUserInput.

Example:

// Click on BTN_Button1
BTN_Button2.Process[trtClick].Before += MyProc1
BTN_Button2.Process[trtClick].Before += MyProc2

// Click on BTN_Button2
Trace("Button 2 clicked")

PROCÉDURE MyProc1()
Trace(dbgInfo(dbgProcess))
SetFocusAndReturnToUserInput(MySelf.Name)

PROCÉDURE MyProc2()
Trace(dbgInfo(dbgProcess))