RTB - м.... его !!!!

[EvilCoder]

<DELETE>

[mad_Max]

А что, собственно, не так? Этот код работает у меня именно так, как и должен. Я не вижу здесь ничего странного, кроме того, что &HFFFFFF - белый цвет.

[BP]

И что?

Ну да, белый. RGB(255,255,255).

[EvilCoder]

<DELETE>

[BP]

Я бы тебе посоветовал на API попробовать, но меня уже задолбало примеры для всех писать.
Если есть время - поковыряйся.
http://basicproduction.nm.ru/bparpad2.rar

[tyomitch]

МММ.....

Делаю черный фон у RTB. И задаю цвет шрифт "Courier New", или какой-нибудь другой.. А он мне все Черным да с шрифтом "Arial"

или я с ума сошел..., или бейсик здоХ!!!

У меня всё работает правильно. Не знаю, в чём дело.
Будешь ковыряться с АПИ - учитывай, что RTB - это совсем не RichEdit20A, а своё собственное окно, т.е. сообщения RichEdit он не поддерживает.

[BP]

RTB - это не своё собственное окно, а окно класса "RichEdit".
Значит для работы с ним нужны старые версии типов CHARFORMAT и PARAFORMAT (новые с двойкой CHARFORMAT2 и PARAFORMAT2).
Форматирование шрифта в RTB через CHARFORMAT точно работает, я проверял.

[tyomitch]

RTB - это не своё собственное окно, а окно класса "RichEdit".

RTB - это окно класса "RichTextWndClass". Создай и проверь.
(RICHTX32.OCX версии 6.00.8169)

[Ruslan Demidow]

Я уже Запарился... Скоро Мышку Съем... RTB Что б его !!!!

Что не так :

RTB.Font = "Courier New"
RTB.SelColor = &HFFFFFF
RTB.SelText = "Ricth Text Box"

Может быть нужно ещё (на всякий случай) .SelStart указать?
И я бы ещё сделал бы так:
RTB.Font.Name="Courier New"

[Ennor]

Есть такой глюк. MS его сама где-то документировала, не помню, где именно. Лечится (и то не всегда) след. способом:
With rtb.font
.name = "Courier New CYR"
.size = 10
.name = "Courier New CYR" ' !!! Еще раз имя!
.Bold = False
'... etc.
end with
Мне помогало, но не всегда - видимо, зависит от текущего выделения. Вообще же желательно, чтобы никакого текста там не было при этом шаманстве...

[EvilCoder]

<DELETE>