From Xojo Documentation
If True, the password is encrypted when being sent to the mail server.
EncryptPassword uses the APOP protocol to transfer the login and password, as described in RFC 1939. If set to false, the POP3 commands USER and PASS are used instead, i.e. the password is sent in clear.
Socket1.Address = NthField(ServerFld.Text, ":", 1)
Socket1.Port = Val(NthField(ServerFld.Text, ":", 2))
If socket1.Port = 0 Then
Socket1.Port = 110
Socket1.EncryptPassword = True
Socket1.Username = UsernameFld.Text
Socket1.Password = PasswordFld.Text
ProgressBar1.Maximum = 0
Me.Caption = "Disconnect"
Me.Caption = "Connect"