TIERFBClient.Connect

Declaration

procedure Connect(const Address: string; Port: word = 5900; const Password: AnsiString = '');

Description

Connects to the specified RFB (VNC) server.
May throw EIERFBError exception if an error occurs (wrong address, wrong port, unsupported protocol version, authentication failure, etc..).

Example

var
  rfb: TIERFBClient;
begin
  rfb := TIERFBClient.Create( ImageEnView1.IEBitmap );
  rfb.OnUpdate := OnVNCUpdate;
  try
    rfb.Connect('My_VNC_Server', 5900, '12345678');
  except
    on E:Exception do
    begin
      ShowMessage(E.Message);
    end;
  end;
end;

procedure TForm1.OnVNCUpdate(Sender: TNotifyEvent);
begin
  ImageEnView1.Update;
end;

---

Loading contents...