|
|
|
|
|
WINDEV and the streams - Use example
In this example, the application must manage a video conference between two computers. This application allows you to: - view the video currently being transmitted by the webcam installed on the current workstation.
- view the video currently being transmitted by the webcam installed on the connected workstation.
- transmit the voice of the current user to the connected user.
- hear the voice of the connected user.
From version 20, Conference controls are supported in Windows Vista and later. If you want to use the Conference control with an earlier Windows version: - Open the control description window.
- On the "UI" tab, check "Use the TAPI 3.x APIs / Windows XP (for compatibility)".
- Validate.
To develop this application: - Create a blank window:
- Click
in the quick access buttons. - When the new element window appears, click "Window" then "Window".
- Create two conference control fields in this window: under the "Creation" pane, in the "Graphic controls" group, pull down "Video and capture" and select "Conference". In our example, the first control is named "CONF_Reception" and the second control is named "CONF_Transmission".
Note: WINDEV automatically associates these two fields in the same stream. By default, the first created control is used to view the incoming video while the second created control is used to view the outgoing video. - Display the EVENTS associated with the stream ("Code of associated stream" in the context menu of one of the Conference controls).
Reminder: The "Request new stream connection" event is executed when a new stream attempts to connect with the current application. This event accepts one parameter. To handle this parameter, a procedure is automatically declared in the "Request for connecting a new stream" event. - Add the following lines of code into the "Request for connecting a new stream" event:
PROCEDURE NouveauFlux(nIDFlux)
NomAppelant is string = StreamInfo(nIDFlux, StreamCallerName)
IF YesNo(NomAppelant + "souhaite entrer en conférence avec vous", ...
"Acceptez-vous ?") = Yes THEN
StreamAccept(nIDFlux, Réception)
ELSE
StreamReject(nIDFlux)
END
- In the window:
- create a button called "BTN_Appel": under the "Creation" pane, in the "Usual controls" group, click on
. This button will be used to connect the stream to a recipient. - create an input field named "SAI_AdresseCorrespondant": under the "Creation" pane, in the "Usual controls" group, click on
. This control will be used to enter the name of the person called. - create a button called "BTN_Terminer": under the "Creation" pane, in the "Usual controls" group, click on
.. This button will be used to end the reception or the broadcast of a stream. - create an edit control named "SAI_UserName": under the "Creation" pane, in the "Usual controls" group, click on
. This control will be used to enter the name of the current user.
- Write the following code in the "Click BTN_Call" event:
Flux1.Identifiant = SAI_NomUtilisateur
StreamConnect(Flux1, AdresseCorrespondant)
- Write the following lines of code in the "Click BTN_Done" event:
Note To work, this application must be run on two different workstations.
Related Examples:
|
Complete examples (WINDEV): WD Video Conference
[ + ] This example uses the Conference control and presents the use of sockets via an instant messaging. WD Video conference enables you to start a conference (sound + video) with a remote user. Furthermore, with instant messaging, you have the ability to send a file to your contact and to dialog with him.
|
This page is also available for…
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|