Imports System.ComponentModel
'''
<

efaultPropertyAttribute("Добавить подпись"

> _
<Serializable()> _
Public Class main_Configuration
'''
Private _Sign_Add
As Boolean
Private _Signature
As String
'''
<CategoryAttribute("Подпись к сообщению"

, _
Browsable(
True), _
[
ReadOnly]
False), _
BindableAttribute(
False), _
 

efaultValueAttribute("
False"

, _
 

esignOnly(
False), _
 

isplayName("Добавить подпись"

, _
 

escriptionAttribute("Добавлять подпись к сообщению?"

> _
Public Property Sign_Add()
As Boolean
Get
Return _Sign_Add
End Get
Set(
ByVal Value
As Boolean)
_Sign_Add = Value
End Set
End Property
'''
<CategoryAttribute("Подпись к сообщению"

, _
Browsable(
True), _
[
ReadOnly]
False), _
BindableAttribute(
False), _
 

efaultValueAttribute(""

, _
 

esignOnly(
False), _
 

isplayName("Подпись"

, _
 

escriptionAttribute("Введите подпись (Максимум 8 символов)"

> _
Public Property Signature()
As String
Get
Return _Signature
End Get
Set(
ByVal Value
As String)
_Signature = Value
End Set
End Property
End Class
<

efaultPropertyAttribute("Включить"

> _
<Serializable()> _
Public Class connection_Configuration
'''
Private _Proxy_on
As Boolean
Private _Address
As String
Private _Port
As Integer = 3128
'''
<CategoryAttribute("Соединение через прокси-сервер"

, _
Browsable(
True), _
[
ReadOnly]
False), _
BindableAttribute(
False), _
 

efaultValueAttribute("
False"

, _
 

esignOnly(
False), _
 

isplayName("Включить"

, _
 

escriptionAttribute("Включить соединение через прокси-сервер?"

> _
Public Property Proxy_on()
As Boolean
Get
Return _Proxy_on
End Get
Set(
ByVal Value
As Boolean)
_Proxy_on = Value
End Set
End Property
'''
<CategoryAttribute("Соединение через прокси-сервер"

, _
Browsable(
True), _
[
ReadOnly]
False), _
BindableAttribute(
False), _
 

efaultValueAttribute(""

, _
 

esignOnly(
False), _
 

isplayName("Адрес"

, _
 

escriptionAttribute("Введите адрес прокси-сервера"

> _
Public Property Address()
As String
Get
Return _Address
End Get
Set(
ByVal Value
As String)
_Address = Value
End Set
End Property
<CategoryAttribute("Соединение через прокси-сервер"

, _
Browsable(
True), _
[
ReadOnly]
False), _
BindableAttribute(
False), _
 

efaultValueAttribute(""

, _
 

esignOnly(
False), _
 

isplayName("Порт"

, _
 

escriptionAttribute("Введите порт прокси-сервера"

> _
Public Property Port()
As String
Get
Return _Port
End Get
Set(
ByVal Value
As String)
_Port = Value
End Set
End Property
End Class