RUS  ENG 

вопрос по синтаксису delphi

Страницы: 1
RSS
вопрос по синтаксису delphi
 
доброго времени суток, господа.
подскажите, пожалуйста, как в Delphi использовать

TypeName
и
Nothing
 
а конкретней можно? что именно сделать надо, пример кода..
 
пример из справочника:

'Если оба объекта площадные
If TypeName(c1) = "IPolyContour" AND TypeName(c2) = "IPolyContour" Then

'Создали объект для вызова метода
Set G = New ZGeometry

'Получаем объединение объектов
Set c3 = G.CombinePolyContours(c1, c2, eCombineModeOr, 0)

'Записываем результат объединения в слой L2
L2.Active.AddPolyContour c3, Nothing , -1, -1

так то я уже обошел проблему на кривой кабылке, но хотелось бы TypeName поиспользовать для чистоты кода)
 
по идее надо у объекта Element проверять свойство GraphType на eGraphTypePrimSquare или eGraphTypeTypedSquare, потом получать у Element Contour или PolyContour и уже их проверять на nil и использовать в CombinePolyContours
 
спасибо. будем развиваться дальше
Страницы: 1