// Mensagem indicando que o teclado é usado // Message indicating that the keyboard is used // Message indiquant que le clavier est utilisé // Mensaje que indica que se usa el teclado

SWITCH Nation()

CASE 15

sTipo_mouse_ou_teclado="bra Seleção com o teclado" // Nation(nationBrazilianPortuguese) // 15

CASE 3

sTipo_mouse_ou_teclado="inlg Selection with the keyboard" //Nation(nationEnglish) // 3

CASE 5

sTipo_mouse_ou_teclado="fre Sélection avec le clavier" // Nation(nationFrench) // 5

CASE 7

sTipo_mouse_ou_teclado="esp Selección con el teclado" //Nation(nationSpanish) // 7

OTHER CASE

END

STC_SelectionType..Color = LightBlue

CASE WM_LBUTTONDOWN

// Mensagem indicando que o mouse é usado // Message indicating that the mouse is used // Message indiquant que la souris est utilisée // Mensaje que indica que se usa el mouse

SWITCH Nation()

CASE 15

sTipo_mouse_ou_teclado="Seleção com o mouse" // Nation(nationBrazilianPortuguese) // 15

CASE 3

sTipo_mouse_ou_teclado="Selection with the mouse" //Nation(nationEnglish) // 3

CASE 5

sTipo_mouse_ou_teclado="Sélection avec le mouse" // Nation(nationFrench) // 5

CASE 7

sTipo_mouse_ou_teclado="Selección con el mouse" //Nation(nationSpanish) // 7

OTHER CASE

END

STC_SelectionType..Color = LightRed

END

STC_SelectionType = sTipo_mouse_ou_teclado

=========================

// INITIALIZING LIST_MONTH

// Adiciona os meses

// Adds the months

// Ajoute les mois

// Suma los meses

LIST_Month.DeleteAll()

FOR i = 1 TO 12

ListAdd(LIST_Month, MonthNumberInAlpha(i))

END

==================

//SELECTION A ROW OF LIST_MONTH

// Adiciona os meses

// Displays the selected month

// Ajoute les mois

// Suma los meses

EDT_SelectedMonth = LIST_Month[LIST_Month]

==========

ErpMatos - TgsSistemas

skype:amarildo.matos.informatica

email: amarildo.matos@gmail.com

whats: 51984197742

Youtube: Amarildo Matos

http://www.amarildomatos.com.br

https://groups.google.com/forum/#!forum/amarildowindev

www.windev.com

https://www.pcsoft.fr/webinaires.htm?p=forumpcs

https://forum.pcsoft.fr/fr-FR/pcsoft.br.windev/page/1.awp

https://www.windev.com/windev/WD-Express.htm

https://www.windev.com/windevmobile/WM-Express.htm

http://windevdesenvolvimento.blogspot.com.br/2017/07/menu-blog.html

Lesson 7.5. Windows event

This lesson will teach you the following concepts

Programming the Windows events.


	Estimated time: 10 mn

Previous Lesson

Table of contents

Next Lesson

Introduction

Each action performed by Windows corresponds to a Windows event. Different types of events can occur, for example:

A window is hovered by the mouse,
The system is stopped,
A dialog box is displayed,
A software error,
Etc.

When these events occur, they can be intercepted in order to prepare or to run a specific process.

WINDEV proposes an automatic management of most common events. For example, the following events are automatically proposed for an edit control:

Initializing the control,
Entry in the control,
Modifying the control,
Exit from the control.

To manage additional events, you can:

use the optional events proposed by WINDEV.
use the Windows events.

Practical example

The management of events will be presented via the unit example named "The Event function".

Open the unit example named "The Event function".

Optional events proposed by WINDEV

WINDEV proposes many optional events for each element (window, control, etc.).

To add an optional event:
1. Display the WLanguage events associated to the List Box control in the unit example window:
  - Select the List Box control.
  - Press F2.
  - The code editor is displayed.
2. Click the "Add other events..." link:
3. The complete list of available optional events is displayed:
4. To add an event, simply check the corresponding box and validate this window. Add the "Key Pressed" event for example.

Windows events

To manage more "specific" events, you have the ability to use the WLanguage Event function. Event is used to associate a WLanguage procedure to a Windows event.


	Remark	To use Event, you must be familiar with the Windows programming, especially the Windows events.

To find out the non-exhaustive list of Windows events, see Value of constants for the Windows 32-bit API.

Example : Detect the click on a list

Run the test of "WIN_Event_Function" window. This window detects if the list is manipulated with the mouse or with the keyboard.
1. Click the List Box control with the mouse.
2. Use the mouse to move the selection bar.
3. A message is displayed, specifying whether the mouse or the keyboard was used.
4. Stop the test and go back to the editor.

Let's study the code used:
1. Click in the window.
2. Display the window events (press F2).
3. Let's study the event "Global declarations" of WIN_Event_Function.
  - First of all, the code line:
    EXTERN "WINCONST.WL"
    This code line is used to include the content of WINCONST.WL file in the application code via the EXTERN keyword. This file contains the declaration and values of Windows constants. During the compilation, the entire code found in the WINCONST.WL file will be automatically included in the application code.
  - Then, all supported events are declared:
    // Events on LIST_Month control
    // Keyboard key down
    Event("MouseOrKeyboard", LIST_Month..FullName, WM_KEYDOWN)
    // Left mouse click
    Event("MouseOrKeyboard", LIST_Month..FullName, WM_LBUTTONDOWN)
    The MouseOrKeyboard procedure is called whenever the keyboard is used on the List Box control (corresponding Windows event: WM_KEYDOWN) or whenever the left mouse click is used (corresponding Windows event: WM_LBUTTONDOWN).
4. Display the WLanguage code of the procedure:
  - Position the mouse cursor on "MouseOrKeyboard".
  - Press F2.
5. The procedure code is straightforward:
  - If the keyboard is used, the caption displayed below the List Box control contains "Selection with the keyboard".
  - If the mouse is used, the caption displayed below the List Box control contains "Selection with the mouse".
    PROCEDURE MouseOrKeyboard()
    // The _EVE.wMessage variable contains the message number
    SWITCH _EVE.wMessage
    // Keyboard
    CASE WM_KEYDOWN
    // Message indicating that the keyboard is used
    STC_SelectionType = "Selection with the keyboard"
    STC_SelectionType..Color = LightRed
    
    // It's the mouse
    CASE WM_LBUTTONDOWN
    // Message indicating that the mouse is used
    STC_SelectionType = "Selection with the mouse"
    STC_SelectionType..Color = LightBlue
    END

Páginas

quarta-feira, 2 de setembro de 2020

DICAS 3062 -WINDEV TUTORIAL 85 -Licao 7.5-08-09-2020 11hrs-PROGRAMACAO AVANCADA EVENTOS WINDOWS

https://youtu.be/K6hmuVWTtKs

Esse Ao Vivo vai estrear as 11:00 do dia 08/09/2020

https://youtu.be/OydGgpZxa-8

DICAS 2978 - WINDEV TUTORIAL 1 - 1.1B - WINDEV TEMA ESCURO E IDIOMA DO AMBIENTE

Nenhum comentário:

Postar um comentário