DIM hFont AS Font

hFont = NEW Font ( [ Font AS String ] )

Создает новый объект шрифта по описанию шрифта.