WINDEV and the streams - Use example - PC SOFT

ONLINE HELP
WINDEV, WEBDEV AND WINDEV MOBILE

Version:

Home | Sign in | French

Overview
Use example

WINDEV

WEBDEV

WINDEV Mobile

Others

See also

WINDEV and the streams - Use example

Overview

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.

Versions 20 and later
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.

New in version 20
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.

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.

Use example

To develop this application:

Create a blank window:
- Click among the quick access buttons.
- The element creation window appears: click "Window" then "Window".
Create two Conference controls in this window: on the "Creation" pane, 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" from the popup 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 manage this parameter, a procedure is automatically declared in the event "Request for connecting a new stream".
Add the following code lines 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
PROCEDURE 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" pane, 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" pane, 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" pane, 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" pane, 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.