![]() StatusBar1.SimpleText :=’Connected to ’ + ed_ip.Text Procedure TForm1.LTCPComponent1Connect(aSocket:TLSocket) The status line indicates that the connection has been established, the control elements are enabled for use and the Disconnect button is active again. LTCPComponent1.Connect(ed_ip.Text, strtoint(ed_port.Text)) Īs soon as the Web-IO accepts the connection, the ClientSocket control element carries out the corresponding procedure. Procedure TForm1.bt_connectClick(Sender: TObject) The connection is opened by entering the IP address of the Web-IO in the text field ed_ip and clicking on the bt_connect button. Connection control Establishing the connection In this example the first part of the name describes the type of object and the second part the function. When naming the individual objects it is helpful to use logical names.
0 Comments
Leave a Reply. |