UseSystemFont???

[ivanadin]

when run this code

Code: Select all

Private Sub Form_Load()
    IPAddressBox1.Font.Name = "Tahoma"
    IPAddressBox1.UseSystemFont = False
    HotKeyBox1.Font.Name = "Tahoma"
    HotKeyBox1.UseSystemFont = False
    TextBox1.Font.Name = "Tahoma"
    TextBox1.UseSystemFont = False
    UpDownTextBox1.Font.Name = "Tahoma"
    UpDownTextBox1.UseSystemFont = False
    
    IPAddressBox2.Font.Name = "Trebuchet MS"
    IPAddressBox2.UseSystemFont = False
    HotKeyBox2.Font.Name = "Trebuchet MS"
    HotKeyBox2.UseSystemFont = False
    TextBox2.Font.Name = "Trebuchet MS"
    TextBox2.UseSystemFont = False
    UpDownTextBox2.Font.Name = "Trebuchet MS"
    UpDownTextBox2.UseSystemFont = False
End Sub

for the first time on the run. no problem
when I stop and run again
for the font "Tahoma" do not like tahoma
for the font "Trebuchet MS" like Trebuchet MS

[TiKu]

Sorry, I don't understand what you're trying to tell me. Can you rephrase it?

[TiKu]

Ah, I see what you mean. This problem was caused by some strange behavior of the native ip address control. Everything would have been okay, if one of the following conditions would have been fulfilled:

• no IPAddressControl on the Form
• UseSystemFont set to True for the IPAddressControls

I've attached a pre-release of version 1.8.1 which fixes this problem.

Regards
TiKu

[ivanadin]

well yes that's what I mean.
Thank you very much for the help.
now I'll use this component