Font

Font

offline
  • Pridružio: 14 Feb 2008
  • Poruke: 12431

Na visti sam napravio program i dodao mogucnost menjanja fonta. I kad pokrenem program kaze There Are No Fonts installed. A imam fontove. Evo koda :



Private Sub mnufpzu_Click() cmd2Font.ShowFont rtb.Font.Bold = cmd2Font.FontBold rtb.Font.Name = cmd2Font.FontName rtb.Font.Size = cmd2Font.FontSize rtb.Font.Italic = cmd2Font.FontItalic rtb.Font.Strikethrough = cmd2Font.FontStrikethru rtb.Font.Underline = cmd2Font.FontUnderline End Sub

Zasto nece? Hvala



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Ko je trenutno na forumu
 

Ukupno su 993 korisnika na forumu :: 9 registrovanih, 1 sakriven i 983 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 20624 - dana 04 Apr 2026 04:18

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: Ares12356, avijacija, berste23, HrcAk47, Komanca, simazr, spalev, TRZH92, Zastava