Не могу сменить шрифт....

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Александр80
Bonachón
Bonachón
 
Сообщения: 659
Зарегистрирован: 20.03.2004 (Сб) 23:50
Откуда: г.Москва

Не могу сменить шрифт....

Сообщение Александр80 » 10.02.2005 (Чт) 22:36

Подскажите пожалуйста как бороться…..
:? На форме элемент TEXT в котором пишется слово в русской раскладке, по-русски …. При смене шрифта написанный текст превращается в “иероглифы”.
Меняю на другой шрифт (cyr), меняется размер, цвет написание, но по-русски ничего написать не получается…

В чем может быть проблема? :oops:

Я использую CommonDialog…. Элемент TEXT1 использовал редко, чаще RichTextBox1 и таких проблем не было…

Form1.CommonDialog1.Flags = cdlCFBoth Or cdlCFEffects
Form1.CommonDialog1.ShowFont
Form1.Text1.FontName = Form1.CommonDialog1.FontName
Form1.Text1.FontSize = Form1.CommonDialog1.FontSize
Form1.Text1.FontBold = Form1.CommonDialog1.FontBold
Form1.Text1.FontItalic = Form1.CommonDialog1.FontItalic
Form1.Text1.FontStrikethru = Form1.CommonDialog1.FontStrikethru
Form1.Text1.FontUnderline = Form1.CommonDialog1.FontUnderline
Form1.Text1.ForeColor = Form1..CommonDialog1.Color
Form1.Text1.FontSize = Form1.CommonDialog1.FontSize

Помогите пожалуйста!!! :roll:

A.A.Z.
Член-корреспондент академии VBStreets
Член-корреспондент академии VBStreets
 
Сообщения: 3035
Зарегистрирован: 30.06.2003 (Пн) 13:38

Сообщение A.A.Z. » 10.02.2005 (Чт) 22:55

Код: Выделить всё
Form1.Text1.Font.Charset = 204

Александр80
Bonachón
Bonachón
 
Сообщения: 659
Зарегистрирован: 20.03.2004 (Сб) 23:50
Откуда: г.Москва

Сообщение Александр80 » 10.02.2005 (Чт) 23:04

A.A.Z. писал(а):
Код: Выделить всё
Form1.Text1.Font.Charset = 204


Спасибо большое помогло... :lol:
А что происходит, когда Charset = 204? :oops:

Александр80
Bonachón
Bonachón
 
Сообщения: 659
Зарегистрирован: 20.03.2004 (Сб) 23:50
Откуда: г.Москва

Сообщение Александр80 » 10.02.2005 (Чт) 23:06

Все нашел.... :oops:

Это свойство представляет собой набор знаков Win32, на который выполнено переключение. В системах ANSI это свойство служит для создания шрифтов, отображающих правильный набор знаков. В системах Юникод это свойство обычно не используется. :lol: :wink:


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: AhrefsBot и гости: 87

    TopList