References:
> QSG code example provided with the installer

After installation, a group PyBridge will appear in the Tool Palette of Delphi, where you can find the new component TPBPipes.

New component TPBPipes can be found in the Tool Palette under PyBridge group

Place TPBPipes onto the form and set up its main properties:

• ClientName – the unique name of the client to connect to the Pipe. It is randomly generated by default.
• PipeName – the name of the Pipe.
• ServerName – the name of the server where Pipe is located. The server name equal to “.” means that the server is on the same computer as the client. In Win32, the Pipe API should look like: ‘\\.\PIPE\’ to connect to the local server or ‘\\\PIPE\’ to connect to the remote server.

Now PBPipes is ready to be used. To demonstrate how it works, let’s create a very simple chat application for any number of participants.
Add following elements to the form:

• “Send”  button with an input field for sending messages
• Memo for displaying messages

Chat application layout based on PBPipes

Generate a random client name and open a Pipe during the creation of the form.

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15

procedure TPipesDemo.FormCreate(Sender: TObject);
begin
  PBPipes1.ClientName := rnd;
  PipesDemo.Caption := PBPipes1.ClientName;
  PBPipes1.Open;
end;

function TPipesDemo.rnd : string;
var
  i: integer;
begin
  Result:='Client';
  for i :=0 to 4 do
    Result:= Result+ IntToStr(RandomRange(0,9));
end;

Create an OnMessage event handler for receiving messages and create handler of clicking the “Send” button for sending messages

1
2
3
4
5
6
7
8
9

procedure TPipesDemo.PBPipes1Message(const AClientName, AMessage: string);
begin
  Memo1.Lines.Add(AClientName + ':' + #9 + AMessage);
end;

procedure TPipesDemo.SendButtonClick(Sender: TObject);
begin
  PBPipes1.SendMessage(Edit1.Text);
end;

Now run several copies of the application at the same time. Each application will generate a random client name and open access to the same Pipe. The first application to open the Pipe becomes the Pipe server. All other applications become Pipe clients until the Pipe server disconnects from the Pipe.

Applications exchange messages through PBPipes

This example demonstrates how you can easily and quickly create a chat application for any number of participants with a help of PBPipes component. Now you can also enjoy the full power of PBPipes in your applications!