ISketches
Наследование 
Функции и процедуры
Эскизы документа архива
Пример на VB:
Dim TCS As CSDN.TCS
Dim App As CSDN.Tcs_Application
Sub Test()
Call Login
Dim Sketches As CSDN.Sketches
If App.Folders.RunModuleForSelect("Выберите документ", False) > 0 Then
Set Sketches = App.Folders.Properties("SKETCHES").AsIDispatch
I = Sketches.ShowModal("Эскизы документа")
Set Sketches = Nothing
End If
End Sub
Sub Login()
If TCS Is Nothing Then Set TCS = CreateObject("CSDN.TCS")
If App Is Nothing Then Set App = TCS.Login
End Sub