Разноцветные буквы.

← →
Quattro © (2006-05-10 14:48) [0]

Добрый день! подскажите пожалуйста, как можно сделать разноцветные буквы в слове??...

← →
Poirot © (2006-05-10 14:51) [1]

1) RichEdit
2) рисовать самому :)
...
Остальные варианты после уточнений - где? чем пытались? о чём речь?

← →
Quattro © (2006-05-10 16:32) [2]

Ну..обычное слово на буттоне...допустим, чтобы одна буква была белой , а остальные чёрными....и по таймерубелой будет становиться следующая буква, а предыдущая принимать исходный черный цвет...что то вроде бегающего пятна:)....вот пытаюсь понять, с чего вообще начинать....рисовать вручную это как?

← →
Ega23 © (2006-05-10 16:32) [3]

> рисовать вручную это как?

Это TCanvas.TextOut

← →
Quattro © (2006-05-10 17:10) [4]

хм...не могли бы вы подсказать примерный алгоритм...а то я что то не пойму как это "Рисует данную строку на канвасе начиная с координат (x,y) - фон текста заполняется текущим цветом кисти." может помочь в вопросе с разноцветными буквами....

← →
Quattro © (2006-05-12 15:01) [5]

Господа!!....неужто это так сложно?..подскажите , пожалуйста!...даже не знаю с чего начать...

← →
Der Nechk@ssoff © (2006-05-12 15:22) [6]

> неужто это так сложно

Сложно.

← →
Algol (2006-05-12 15:23) [7]

> даже не знаю с чего начать...

начать - с наследования TButton...
а лучше книжку почитать ))

Может быть это делается следующим способом?..допустим слово МИР..делаем цикл с процедурой BtnCnv.TextOut (x,y,string)
Slovo:Array [0..2] of Char = ("М","И","Р");
x=10;y=10 s:String
Begin
BtnCnv.TextOut(x,y,s)
end;
и меням координаты и букву....верно??

← →
Мефисто (2006-05-12 20:58) [9]

S: String; - с данной переменной уже можно рабоать, как с массивом + F1
Данный стринг просто достаточно пргнать в цикле...

>> и меням координаты и букву....верно?

Верно.
В том же цикле координаты меняем еще с учетом ширины символа фонта.

GetCharABC...
GetCharWidth...

Перед выводом новго символа не забываем менять атрибуты фонта канвы на нужные. Canvas.Font

Удачи в пеореваривании алгоритма.

P.S.
Рекомендуем библию которую можно найти в этой ветке:
http://delphimaster.net/view/8-1146665803/

Разноцветные буквы. Найти похожие ветки