S
Shandrik
Наткнулся на такую конструкцию в библиотеке:
Public Property Get getUltraPrivateObject As TObject
on error goto errh
set getUltraPrivateObject = m_privateObject
ex:
Exit Property
errh:
On Error Goto 0
Error Err,Error$ & " в " & Getthreadinfo(1) & " (l. " & Cstr(Erl) & ")"
End Property
Чем она отличается от обычной функции?
Public Property Get getUltraPrivateObject As TObject
on error goto errh
set getUltraPrivateObject = m_privateObject
ex:
Exit Property
errh:
On Error Goto 0
Error Err,Error$ & " в " & Getthreadinfo(1) & " (l. " & Cstr(Erl) & ")"
End Property
Чем она отличается от обычной функции?