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 broadcasted by the web camera installed on the current computer.
- view the video currently broadcasted by the web camera installed on the connected computer.
- 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.
- In 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. - The creation window appears: click "Window" then "Window".
- Create two Conference controls in this window: on the "Creation" tab, in the "Graphic controls" group, expand "Video and capture" and select "Conference". In our example, the first control is named "CONF_Reception" and the second control is named "CONF_Transmission".
Remark: WINDEV automatically associates these two controls 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 event "Request for connecting a new stream" is run 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 event "Request for connecting a new stream":
// Procedure used to detect a new stream
// nStreamID is an integer variable containing
// the identifier of the detected stream
PROCÉDURE NewStream(nStreamID)
// Find out the name of the caller
CallerName is string = StreamInfo(nStreamID, StreamCallerName)
// Accept the incoming stream?
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 named "BTN_Call": on the "Creation" tab, in the "Usual controls" group, click
 . This button will be used to connect the stream to a recipient. - create an edit control named "EDT_RecipientAddress": on the "Creation" tab, in the "Usual controls" group, click
 . This control will be used to enter the name of the person called. - create a button named "BTN_Done": on the "Creation" tab, in the "Usual controls" group, click . This button will be used to end the reception or the broadcast of a stream.
- create an edit control named "EDT_UserName": on the "Creation" tab, in the "Usual controls" group, click . This control will be used to enter the name of the current user.
- Write the following code in the event "Click BTN_Call":
// Specify the name of the caller
Stream1.Identifier = EDT_UserName
// Connect the stream
StreamConnect(Stream1, RecipientAddress)
// equivalent to:
// Stream1.Address = RecipientAddress
- Write the following lines of code in the event "Click BTN_Done":
// Disconnect the stream
StreamDisconnect(Stream1)
Remark: To operate, this application must run on two different computers.
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…
|
|
|
|