Верхний индекс в тексте

[KPEATOP]

У меня в ячейке MSFlexGrid пишется тект :
Form3.MSFlexGrid1.TextMatrix(2, 0) = "Дебит скважины, м3/сут"

Как мне сделать 3 верхним индексом ?
Заранее сенкс!

[alibek]

U+00B3. Либо картинкой.

[KPEATOP]

??? я не понял как при помощи U+00B3 сделать верхний индекс? Я никогда этим не пользовался.

[alibek]

U+00B3 — это код (в юникоде) символа "³".

[KPEATOP]

если я с этим не сталкивался, я все равно не понял как мне исползовать U+00B3 как нибудь так :

Form3.MSFlexGrid1.TextMatrix(2, 0) = "Дебит скважины, м" & StrConv(U+00B3, 64) & "/сут"

Может подскажите подробней ?

[Viper]

Ключевое слово - код символа! Что делают с кодами символа? Правильно! Преобразовывают в символ.

[KPEATOP]

Form3.MSFlexGrid1.TextMatrix(2, 0) = "Дебит скважины, м" & StrConv(U+00B3, 64) & "/сут"

у меня это не работает

[alibek]

Не StrConv, а ChrW$(). Только маловероятно, что будет работать, FlexGrid не поддерживает полноценный Unicode.
Или балуйся с Charset, или подбирай шрифт, или используй картинку.

[Viper]

Код: Выделить всё

StrConv(U+00B3, 64)

Это вообще что? ChrW используй, только надо CharSet подбирать для отображения Unicode-символов.

[Денис]

Что-то вы не то советуете, парни
Я попробовал такой код

Код: Выделить всё

MSFlexGrid1.TextMatrix(1, 1) = _
   "Дебит скважины, м" & _
   ChrW$(&H0 & &HB3) & "/сут"

В итоге получаю

Дебит скважины, м?/сут

Шрифт Lucida Sans Unicode, с ним проблем нет.

[KPEATOP]

если U+00B3 - код символа 3(верхний индекс), тогда, чтоб получить верхний индекс 3, нужно:

ChrW$(U+00B3)
но это не работает

[Viper]

если U+00B3 - код символа 3(верхний индекс), тогда, чтоб получить верхний индекс 3, нужно:
ChrW$(U+00B3)
но это не работает

Тяжелый случай, а попробовать

Код: Выделить всё

ChrW(&H00B3)

не судьба?

[KPEATOP]

Попробовал как говорит Viper :
Form3.MSFlexGrid2.TextMatrix(1, 0) = "Дебит жидкости, м" & ChrW(&H00B3) & "/сут"

Во первых, когда я курсор с этой строки убераю, у меня автоматически 00 проподают и остается:
Form3.MSFlexGrid2.TextMatrix(1, 0) = "Дебит жидкости, м" & ChrW(&HB3) & "/сут"

А это в итоге дает вопросительный знак:
Дебит жилкости, м?/сут

[Viper]

Попробовал как говорит Viper :
Form3.MSFlexGrid2.TextMatrix(1, 0) = "Дебит жидкости, м" & ChrW(&H00B3) & "/сут"

Во первых, когда я курсор с этой строки убераю, у меня автоматически 00 проподают и остается:
Form3.MSFlexGrid2.TextMatrix(1, 0) = "Дебит жидкости, м" & ChrW(&HB3) & "/сут"

Это нормально, лидирующие нули опускаются, число от этого не поменяется.

А это в итоге дает вопросительный знак:
Дебит жилкости, м?/сут

Это конечно ненормально, и говорит о том, что шрифт во FlexGrid не поддерживает Unicode. Бороться можно путем установки ширифта, поддерживающего Unicode, либо установкой соответствующего значения CharSet. Есть правда нехорошее предчувствие, что это не помежет по причине того, что FlexGrid не поддерживает Unicode в принципе. Остается вариант с картинкой.

[KPEATOP]

Не хотелось бы с картинкой делать
а как можно CharSet подобрать, методом "тыка" ?
И еще вопрос : Какой шрифт поддерживает Unicode ?

[Денис]

Не хотелось бы с картинкой делать
а как можно CharSet подобрать, методом "тыка" ?
И еще вопрос : Какой шрифт поддерживает Unicode ?

Сам FlexGrid не поддерживает Unicode. Не мучайся и делай картинкой. Или используй альтернативный грид.