![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Ширина символа [D7, XP]
Quattro © (2006-07-06 14:19:00)Добрый день! Подскажите, пожалуйста, как узнать ширину и высоту символа...я хочу сделать программу, в которой реализовано действо разноцветной, бегающей буквы...с помощью TextOut научился рисовать...дело за малым осталось :)...Заранее спасибо!:)
Мефисто (2006-07-06 23:56:00) [1]
> Подскажите, пожалуйста, как узнать ширину и высоту символа.
> ..
GetTextMetrics()
GetCharWidth()
GetCharABCWidths()
Quattro (2006-07-06 23:37:00) [2]
> На www.Vr-Online.ru есть Label позволяющий форматировать
> выводимый текст. Возможно и цвет. Посмотри.
нееее...вся соль в том, чтобы самому это сделать...вот где настоящее удовольствие:)
PSPF2003 (2006-07-06 16:51:00) [3]На www.Vr-Online.ru есть Label позволяющий форматировать выводимый текст. Возможно и цвет. Посмотри.
Quattro (2006-07-06 16:46:00) [4]всё...понял как :)...надо было изменять цвет канвы Label.Canvas.Font.Color...но всё равно спасибо:)
Desdechado (2006-07-06 16:43:00) [5]Label всегда одним цветом пишется. Если хочешь разноцветный, пиши буквы сам разными цветами.
Quattro (2006-07-06 16:40:00) [6]а как с помощью TextOut(хотя может быть и без её помощи) сделать буквы разного цвета?....Если менять цвет шрифта в лэйбле (это всё дело выводиться в лэйбле), то меняется цвет всех букв....то есть, как выбирать цвет буквы, нарисовать которую ты хочешь?
Zeqfreed (2006-07-06 15:41:00) [7]> [17] Quattro © (06.07.06 15:38)
Относительно левого верхнего (по умолчанию) угла холста, на который осущствляется вывод.
Quattro (2006-07-06 15:40:00) [8]Zeqfreed вай вай вай! пропустил!!!спасибо большое!:)
PSPF2003 (2006-07-06 15:40:00) [9]Формы
Quattro (2006-07-06 15:38:00) [10]прямоугольник должен задаваться в координатах относительно экрана или относительно формы??
Zeqfreed (2006-07-06 15:35:00) [11]> [14] Quattro © (06.07.06 15:24)
Для кого написал ClipRect? :)
Desdechado (2006-07-06 15:31:00) [12]Label1.Top +Label1.Height
?
Quattro (2006-07-06 15:24:00) [13]а почему ничего не стираеться при такой команде?
Label1.Canvas.Brush.Color:=clBtnFace;
Label1.Canvas.FillRect(Rect(Label1.Left, Label1.Top,
Label1.Left + Label1.Width, Label1.Top - Label1.Height));
Zeqfreed (2006-07-06 15:06:00) [14]> [11] Quattro © (06.07.06 15:04)
Canvas.Brush.Color := . . .;
Canvas.FillRect(Canvas.ClipRect);
PSPF2003 (2006-07-06 15:05:00) [15]FillRect
Quattro (2006-07-06 15:04:00) [16]Zeqfreed спаибо!!..
Так как всё таки стирать с канваса каракули?
Zeqfreed (2006-07-06 15:02:00) [17]> [9] Quattro © (06.07.06 14:52)
for a := Low(array_variable) to High(array_variable) do begin
Quattro (2006-07-06 14:52:00) [18]Извините нуба, подскажите синтаксис выражения "for а:=от начала до конца массива" :)....забыл и не могу вспомнить:)...
antonn (2006-07-06 14:45:00) [19]antonn © (06.07.06 14:44) [7]
а, пардон, туплю:)
'AA'-'A'*2
antonn (2006-07-06 14:44:00) [20]Quattro © (06.07.06 14:38) [6]
разность м/у 'A A' и 'AA' :))