Joomla 3.2 Template by webtemplatesbox

User Rating: 4 / 5

Star ActiveStar ActiveStar ActiveStar ActiveStar Inactive

This sample code and library shows how to get windows fonts in Catia V5

Add the library to your project references: Tools -> References

Dim ff As Object
Set ff = Nothing
Set ff = CreateObject("V5_Fonts.V5Fonts")
Dim colF As New VBA.Collection
ff.GetFonts colF
For i = 1 To colF.Count
ComboBox1.AddItem colF.Item(i)'Add the fonts in to a ComboBox

Download the V5_Fonts and dont't forget to register it using "regasm V5_Fonts.dll /tlb:V5_Fonts.tlb /codebase" (take a look in the V5_Fonts_Register.bat file)


Who's Online

We have 30 guests and no members online

Site Search

Sunday the 5th. Author: Ion GROZEA.