Joomla 3.2 Template by webtemplatesbox

User Rating: 5 / 5

Star ActiveStar ActiveStar ActiveStar ActiveStar Active

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)

Comments powered by CComment


Who's Online

We have 57 guests and no members online

Site Search

Thursday the 29th. Author: Ion GROZEA.