|
|
|
|
|
|
|
|
|
|
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 "Creación" pane, in the "Controles gráficos" group, pull down "Video y captura" 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 NewStream(nStreamID)
CallerName is string = StreamInfo(nStreamID, StreamCallerName)
IF YesNo(CallerName + "would like to start a conference with you", ...
"Do you accept?") = Yes THEN
StreamAccept(nStreamID, Reception)
ELSE
StreamReject(nStreamID)
END
- In the window:
- create a button called "BTN_Appel": under the "Creación" pane, in the "Controles frecuentes" group, click on
 . This button will be used to connect the stream to a recipient. - create an input field named "SAI_AdresseCorrespondant": under the "Creación" pane, in the "Controles frecuentes" group, click on
 . This control will be used to enter the name of the person called. - create a button called "BTN_Terminer": under the "Creación" pane, in the "Controles frecuentes" 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 "Creación" pane, in the "Controles frecuentes" 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:
Stream1.Identifier = EDT_UserName
StreamConnect(Stream1, RecipientAddress)
- Write the following lines of code in the "Click BTN_Done" event:
StreamDisconnect(Stream1)
Note To work, this application must be run on two different workstations.
Esta página también está disponible para…
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|