Получение размера шрифта в webbrowser

[natcap]

Все, сдаюсь, прошу помощи зала ((
не могу получить размер текста в веббраузере.
исходные данные:
Веббраузер с редактируемым дивом. в нем выделен некий текст ( приозвольный) надо получить все данные для окна выбора шрифтов: Тип шрифта, начертание, цвет, размер

что делаю:

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

    Set objRange = doc.selection.createRange()
    With CommonDialog1
        .Flags = cdlCFBoth Or cdlCFEffects
        If IsNull(objRange.queryCommandValue("FontName")) = False Then
          .FontName = objRange.queryCommandValue("FontName")
        Else
          .FontName = ""
        End If
        f = .FontName
        If IsNull(objRange.queryCommandValue("FontSize")) = False Then
          .FontSize = objRange.queryCommandValue("FontSize")
        Else
          .FontSize = 0
        End If
        s = .FontSize
        If IsNull(objRange.queryCommandValue("ForeColor")) = False Then
          .Color = objRange.queryCommandValue("ForeColor")
        Else
          .Color = 0
        End If
        .FontBold = objRange.queryCommandValue("Bold")
        .FontItalic = objRange.queryCommandValue("Italic")
        .FontStrikethru = objRange.queryCommandValue("StrikeThrough")
        .FontUnderline = objRange.queryCommandValue("Underline")
        .ShowFont
     End With


что получаю в итоге:
1. стиль фона определяется нормально,
2. цвет - ХЗ, но он и не актуален, его через другую опцию поменять можно,
3. именя шрифта тоже определяется на ура,
4. а вот размер....полная труба. Размер определяется только если выделенный кусок теста содержит явное указание на него (т.е. тег FONT) если текст чистый, то размер не оперделяется вообще никак если указание есть, то определяестя в ШТМЛ понятиях (+1, +2 и т.д.) от чего мне легче не становится... т.к. как перевести их в нармальные значения я все равно не знаю

Помогите, кто знает, как лечить эту "болезнь"????

[GM]

Вот тут в реестре, как я понял находится исходный размер шрифта:

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

"Software\Microsoft\Internet Explorer\International\Scripts\6", "IEFontSize"


Может он чем, то тебе поможет.

[natcap]

Самое противное, что помочь не сможет... ну что мне может дать значение этого поля в регистре равное 01 00 00 00Я идиот! Убейте меня, кто-нибудь!?? Кто расшифрует - тому приз..... ((

А сложность еще в том, что к странице приеплена таблица стилей в которой 99,9% заданы размеры шрифта, но не как тег.style.fontsize, а те же 99,9% что как тотже стиль у ID или сласа, которые присвоены этому тегу

[GM]

Вот таблицу нашел:
1 - 8 pt
2 - 10 pt
3 - 12 pt
4 - 14 pt
5 - 18 pt
6 - 24 pt
7 - 36 pt
Может она хоч чем то поможет.

[natcap]

Спасибо После долгих самостоятельных мучений и пытки Ennor'а как раз к такой таблице и пришла Просто хотелось что-то универсальное ))) типа супер-функции )))
Т.к. самое смешное то, что в ряде случаев получить размер шрифта в принципе нереально (теми способами которые я смогла придумать)

[tyomitch]

Ну-ну. А потом юзер выберет View -> Text size -> Larger, и таблица окажется не у дел...

[natcap]

ну в данном случае не выбирает наверное, т.к. это редактор НТМЛ.... но менно этого я и боюсь (((((
но пока нет другого решения хоть такое как заплатку поставила (( Если кто знает лучшее скажите, ПЛИИИИИИИИИИИИИИЗ

[Ennor]

Темыч, это будут его проблемы, причем они не исчезнут до тех пор, пока не прекратятся, наконец, браузерные войны. А этому, как я понимаю, не бывать.
Видел бы ты, к примеру, какой мелкий у меня в Мозилле моноспейс...

[natcap]

Не, есть конечно вариант... отказаться от стандартного окна выбора фонтов и использовать свой.. но это так не хочет делать, ты не представляешь но тогда можно будет не конвертить

И опять же, догадайся, кто мне в этом случае будет рассказывать как получить список шрифтов в системе и их свойств? Не знаешь?

[tyomitch]

Получение списка шрифтов в системе и их свойств: http://groups.google.com/groups?selm=20 ... put=gplain

[natcap]

))))))))))
Спасибо ))

[GM]

Ну-ну. А потом юзер выберет View -> Text size -> Larger, и таблица окажется не у дел...

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

"Software\Microsoft\Internet Explorer\International\Scripts\6", "IEFontSize"


Это вроде бы оно и есть.

[tyomitch]

Это вроде бы оно и есть.

Угу... Но всё равно нужна не одна таблица, а пять